ich arbeite mit mehreren Mappen die untereinander zugreifen
Muss ich die in jedem Makro deklarieren oder geht das auch global.
Ich habe zum Beispiel Makro1 und Makro2 und einige Deklarationen wiederholen sich eben.
Sub Makro1()
Dim wksA As Worksheet, wksB As Worksheet, wksC As Worksheet
Set wksA = Workbooks("Mappe1.xls").Worksheets("Tabelle1")
Set wksB = Workbooks("Mappe2.xls").Worksheets("Tabelle1")
Set wksC = Workbooks("Mappe3.xls").Worksheets("Tabelle1")
'... gekürzt
wksA.Activate
ActiveWorkbook.Save
wksB.Activate
ActiveWorkbook.Save
wksC.Activate
ActiveWorkbook.Save
'... gekürzt
End Sub
und
Sub Makro2()
Dim wksA As Worksheet, wksC As Worksheet, wksD As Worksheet
Set wksA = Workbooks("Mappe1.xls").Worksheets("Tabelle1")
Set wksC = Workbooks("Mappe2.xls").Worksheets("Tabelle1")
Set wksD = Workbooks("Mappe3.xls").Worksheets("Tabelle1")
'... gekürzt
wksA.Activate
' irgendwas ausführen
wksC.Activate
' irgendwas ausführen
wksD.Activate
ActiveWorkbook.Save
'... gekürzt
End Sub
LG Sabbel