mit nachstehendem Code speichere ich die Datei und schliesse die Datei bzw. Excel:
Private Sub CommandButton1_Click()
If Application.Workbooks.Count > 1 Then
Calculate
ActiveWorkbook.Save
ActiveWorkbook.Close
Exit Sub
ElseIf Application.Workbooks.Count = 1 Then
Calculate
ActiveWorkbook.Save
' ActiveWorkbook.Close
Application.Quit
End If
End Sub
Das Problem ist jedoch, wenn bevor der CommandButton1 aus Userform von Datei1 ausgeführt wird und eine weitere offene Excel-Datei "Datei2" aktiviert wird, dann wird nicht die Datei1 geschlossen, welche geschlossen werden soll, sondern die aktivierte Datei2. Könnt ihr mir bitte helfen!
Der Name der Datei1 kann in der Hilfstabelle.Range("B10") und mit Pfad über Hilfstabelle.Range("B8") ausge-lesen werden.
Gruss
Peter