'Alte Version öffnen
With Application.FileDialog(msoFileDialogOpen)
.Title = "Bitte Datei mit alten Versionsdaten öffen"
.FilterIndex = 2
If .Show = -1 Then
'ALte Version schreibgeschütz öffnen
Set wbAlt = Workbooks.Open(Filename:=.SelectedItems(1), ReadOnly:=True)
Else
GoTo Beenden
End If
End With
Meine Frage ist nun, ist es machbar, das ich mit dem wbAlt Arbeite in einem With Konstrunkt
als Beipsiel:
With wbAlt.Worksheets("Tabelle2")
oder geht das nicht?