wie kann ich auf eine bestimmte Zelle (a1)
in allen geöffneten Mappen des Tabellenblattes (Tabelle 1)
zugreifen und den Inhalt ändern.
Danke und Gruß
Sub Test()
Dim Mappe As Workbook
For Each Mappe In Workbooks
Mappe.Sheets(1).Range("A1") = "Hallo"
Next Mappe
End Sub
Gruß
Tino
Sub Test()
Dim Mappe As Workbook
Dim a As Integer
For Each Mappe In Workbooks
For a = 1 To Mappe.Sheets.Count
If Mappe.Sheets(a).Name = "März" Then
Mappe.Sheets(a).Range("A1") = "Hallo"
Exit For
End If
Next a
Next Mappe
End Sub
Gruß
Tino
Die erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden
Suche nach den besten AntwortenEntdecke unsere meistgeklickten Beiträge in der Google Suche
Top 100 Threads jetzt ansehen