Öffne Datei 2 mit UF schließe Datei1 mit UF
24.01.2017 12:17:19
A.Kappler
Hallo Zusammen,
ich möchte per cklick auf einen Button(auf einem Userform) eine Datei mit Userform2
öffnen. nach dem Öffnen der Userform2 soll die Datei mit Userform geschlossen werden
bisher habe ich das so:
Private Sub CommandButton1_Click()
Workbooks.Open ("Pfadx\RB_Suche.xlsm")
Application.Visible = True
Application.DisplayAlerts = False
Workbooks("RB-Manager_V_1_0.xlsm").Activate
Workbooks("RB-Manager_V_1_0.xlsm").Close SaveChanges:=False
Workbooks("RB_Suche.xlsm").Activate
End Sub
Nun ist es so, dass sich zwar die Userform aus RB_Suche.xlsm öffnet aber die Datei RB-Manager_V_1_0.xlsm sich nicht schliest.
Es ist bestimt simpel aber ich finde die Lösung nicht.......
Anzeige