Range auswählen??
04.10.2003 08:36:05
Erich M.
ich habe mit dem Makrorecorder einen Code erstellt,
der auch funktioniert:
Sub Makro2()
' Makro2 Makro
' Makro am 04.10.2003 von Me aufgezeichnet
Workbooks.Open Filename:="D:\EXCEL-Makros\test.xls"
Sheets("Filialen").Select
Range("A1:G18").Select
Selection.Copy
Windows("Datenimport.xls").Activate
Range("A1").Select
ActiveSheet.Paste
Range("B1").Select
Windows("test.xls").Activate
Range("A1").Select
Application.CutCopyMode = False
ActiveWorkbook.Close
ActiveWorkbook.Save
End Sub
Nun müsste ich folgendes erreichen:
1. Die Range "A1:G18" soll variabel sein
2. Beginn der Kopie in der Zelle der Spalte A, in der "Test" steht
(das ist entweder A1, A2 oder A3)
3. In der Spalte G soll die letzte belegte Zelle gesucht werden.
Beispiel: Test in A2, letzte Zelle g = G225
dann Range: A2:G225
Besten Dank für eine Hilfe!
mfg
Erich