title image


Smiley Re: arbeitsblatt importieren
Hallo Susanne,



versuch es mal so:



wkb = ThisWorkbook.Name

Workbooks.Open Filename:="D:\Excel Test\2006.xls"

Windows("2006.xls").Activate

Cells.Select

Selection.Copy

Windows(wkb).Activate

Cells.Select

ActiveSheet.Paste

Cells(1, 1).Copy

Workbooks("2006.xls").Close



Gruß

surfer

geschrieben von

Login

E-Mail:
  

Passwort:
  

Beitrag anfügen

Symbol:
 
 
 
 
 
 
 
 
 
 
 
 
 

Überschrift: