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

• #52311 Delila_1 veterán NGA #52310

  Új Válasz 2024-03-14 11:29:39 #52311

  Ú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 NGA #52310 üzenetére

  Sub masolas()
    Dim innen As Integer, ide As Integer
    Sheets("Munka1").Select
    innen = Range("A2").End(xlDown).Row
    ide = Sheets("Munka2").Range("A2").End(xlDown).Row + 1
    Range("A2:D" & innen).Copy Sheets("Munka2").Range("A" & ide)
End Sub

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