Neues Dokument öffnen und altes speichern & schlie
27.02.2014 11:59:06
ANNAnas
Ich habe folgendes Problem mit meinem geschriebenen Code:
Wenn ich eine Datei aus der Listbox 2 wähle und öffne, soll die letzte aktuelle Datei geschlossen werden. Das funktioniert nur leider nicht so, wie ich es mir vorstelle... :C
Die Ursprungsdatei bleibt leider geöffnet. Das internet habe ich mittlerweile auch schon durchforstet, leider ohne nütlichem Ergebnis.
Meine Code ist wie folgt:
Private Sub Listbox2_DblClick(ByVal Cancel As MSForms.ReturnBoolean)
Dim Pfad As String
Unload UserForm1
Pfad = "C:\Neuer Ordner\" 'Anpassen !!!!!!!!!
Workbooks.Open Pfad & Trim(ListBox2.List(ListBox1.ListIndex))
ThisWorkbook.Close SaveChanges:=True
End Sub
BITTE HELFT MIR!!!!!!!!
Anzeige