Új hozzászólás Aktív témák

• #20071 Latis csendes tag Mutt #20031

  Új Válasz 2014-01-14 00:42:57 #20071

  Új hozzászólás

  Összes hozzászólása itt Válaszok az összes hozzászólására itt Válaszok erre a hozzászólásra

  Privát üzenet küldése

  

  Latis

  csendes tag

  válasz Mutt #20031 üzenetére

  Sziasztok!

  Köszönöm szépen a választ de sajnos nem sikerült működésre bírnom.
  Amit én szeretnék hogy menjen végig az oszlop minden elemén a kiolvasás de csak a ":"-ig tartalmazó részt olvassa be és írja egy másik cellába.

  Amit eddig csináltam az a következő:
  If Cells(j, y).Value > 0 Then
  adat = adat & Left(Cells(j, 1).Value, 6) & ";"

  End If

  Természetesen ez benne van egy ciklusban.
  A kivastagított részt kellene változó hosszúságban paraméterezni.

  Előre is köszönöm ha valaki tud segíteni!

  Üdv!

Új hozzászólás Aktív témák