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

• #41187 Delila_1 veterán dellfanboy #41186

  Új Válasz 2019-06-04 15:35:27 #41187

  Ú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 dellfanboy #41186 üzenetére

  Nem Windows, hanem Workbook, majd a következő sorban az A3-ra állás előtt aktívvá kell tenned a lapot is, ahonnan az adatokat másolni akarod.

  Sheets("Munka1").Select

  Mivel nem kell az A3-ra állnod, a Range("A3").Select sor nem is kell.

  A következő sorban másolod az eredeti lap A1-hez tartozó teljes tartományát, és a 2. lapra, az A1 cellától kezdődően beilleszted.

  Range("A1").CurrentRegion.Copy Sheets(2).Range("A1")

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