Variable von einem in ein anderes Makro übergeben
19.11.2003 17:24:40
Steffen
ich baruche mal bitte Eure Hilfe.
Ich habe folgenden Code
Sub test()
Dim WS1 As Worksheet
Set WS1 = Workbooks("Test1.xls").Sheets("Daten")
daten_aktue
Set WS1 = Workbooks("Test2.xls").Sheets("Daten")
daten_aktue
End Sub
Sub daten_aktue()
Dim AR As String
AR = ActiveCell.Row
'1. Block
For i = 37 To 44
WS1.Cells(AR, i).Value = WS1.Cells(4, i).Value
Next i
End Sub
Ich möchte nun den Code einmal in der Mappe "Test1.xls" und einmal in der Mappe "Test2" ausführen.
Nur wie übergebe ich die Variable des Mappennamens?
Danke schonmal
Steffen
Anzeige