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

• #49311 Fferi50 Topikgazda z123456789 #49306

  Új Válasz 2022-07-07 11:27:21 #49311

  Ú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

  

  Fferi50

  Topikgazda

  válasz z123456789 #49306 üzenetére

  Szia!
  Az előző válaszomban írtam, hogy lehet makró is:
  Ez a makró az A3 -ban levő értéket az A10 cellától az A:B oszlopba bontja ki:
  Sub valaszto2()
a = Range("a3").Text
b = Split(a, vbLf)
For Each c In b
d = Split(c, ":")
For Each e In d
Range("A10").Offset(x, y).Value = e
y = 1
Next
x = x + 1
y = 0
Next
End Sub
  A makrót egy modulba kell bemásolni (az összefoglalóban megtalálod hogyan). Ha a makrót meg szeretnéd tartani, akkor makróbarát formában (xlsm kiterjesztés) kell menteni.
  Az A3 helyére írd annak a cellának a címét, amelyiket ki szeretnél bontani, az A10 helyére pedig azt, ahol az eredményt szeretnéd látni.
  Üdv.

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