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

• #4410 Delila_1 veterán Gabcsika #4409

  Új Válasz 2009-01-29 13:15:51 #4410

  Ú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

  

  Delila_1

  veterán

  válasz Gabcsika #4409 üzenetére

  Például ilyen:

  Sub szétcincál()
  sor = 1
  Do While Cells(sor, 1) <> ""
  Cells(sor, 1) = Left(Cells(sor, 1), InStr(Cells(sor, 1), "-") - 1)
  sor = sor + 1
  Loop
  End Sub

  de másképp is meg lehet írni.
  Másik, nem makrós megoldás, hogy kijelölöd a sorokat, Adatok/Szövegből oszlopok. A varázsló második lapján a kötőjelet adod meg határoló jelnek.

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