Ich habe zwei dateien die nacheinander geöffnet werden.
Datei 2 wird nach dem speichern von datei 1 mit folgendem makro geöffnet.
Private Sub Workbook_BeforeSave(ByVal SaveAsUI As Boolean, Cancel As Boolean)
Dim objExcel As Object
Set objExcel = CreateObject("Excel.Application")
objExcel.Application.Visible = True
objExcel.Application.DisplayFullScreen = False
objExcel.Application.Workbooks.Open Filename:="C:\Users\xxxx\.xxxxxx.xlsm"
End Sub
Das klappt auch hervorragent. Ich möchte jetzt aber bevor datei 2 geöffnet wird über eine message box (oder andere funktion) gefragt werden ob datei 2 geöffnet werden soll oder nicht.
Wenn ja bitte datei 2 öffnen, wenn nein datei 1 normal speichern.
Gibt es dafür eine Lösung
Gruss und vorher schon mal Danke