Der folgende Code erzeugt einen neue Instanz, was ich nicht möchte. Excel läuft bereits mit der gewünschten Datei.
Set ex = CreateObject("Excel.Application.9")
ex.Visible = True -- funktioniert nicht.
Danke vorab
Reinhard
Sub test()
On Error GoTo Fehler
Windows("Mappe4.xls").Activate 'anpassen
Exit Sub
Fehler:
MsgBox "Mappe4.Xls ist nicht geöffnet"
End Sub