Törölt nick Creative Commons License 2013.09.26 0 0 22290

Én egyáltalán nem használok Paste metódust, mert a Paste művelet alapjában véve redundáns, nincs rá szükség. Másolás egy lépésben:

 

Range("a1:a8").Copy Destination:=Range("h1")

 

Itt mind a forrás (piros), mind a Destination (kék) egy Range típusú objektum, amire azt adsz meg, amit akarsz. Lehet akár mindkettő másik munkafüzetben, csak megfelelően specifikálni kell:

 

Workbooks("egy.xls").Worksheets("Munka1").Range("A1:A8").Copy Destination:=Workbooks("kettő.xls").Worksheets("Munka2").Range("H1")

 

Megjegyzem, itt sem a kiindulási munkafüzetet/munkalapot/cellát, sem a cél munkafüzetet/munkalapot/cellát nem kell Select-elni, és mégis működik.

 

Ha mégis kell a Paste, mert mondjuk a főnököd ragaszkodik hozzá, akkor

Range("a1:a8").Copy

ActiveSheet.Paste Destination:=Range("H1")

 

Azt mondjuk nem tudom, mi történik, ha itt az Activesheet más mint amit esetleg a Destination-ben definiálok, de nem is érdekel :)

 

 

 

 

 

Előzmény: tbando (22286)