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

• #50378 Delila_1 veterán istvankeresz #50377

  Új Válasz 2023-02-02 12:37:43 #50378

  Ú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 istvankeresz #50377 üzenetére

  Sub Adatok()
Dim ter As Range, CV As Range, szoveg As String
Set ter = Application.InputBox(prompt:="Kérem a tartományt", Type:=8)
For Each CV In ter
szoveg = szoveg & CV & vbLf
Next
MsgBox szoveg
End Sub

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