Verzicht auf Select(ion)
08.12.2003 12:02:21
Stefan
Nachfolgender Quelltext hab ich mit dem MA recorder aufgenommen und würde ihn gerne ohne Select schreiben. Leider fehlen mir die Kenntnisse über die Eigenschaften der Befehle.
Mann kann ja leider nicht schreiben.
Windows(Zname).Sheets("Quelle").Range("A1").Paste
=======================================================
Workbooks.Open Filename:=quelledatei
Cells.Copy
Windows(Zname).Activate
Sheets("Quelle").Select
Range("A1").Select
ActiveSheet.Paste
Rows("1:1").Select
Selection.Delete Shift:=xlUp
========================================================
Vielen Dank schon mal für eure hilfe:
mfg Stefan