Live-Forum - Die aktuellen Beiträge
Anzeige
Archiv - Navigation
1276to1280
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Inhaltsverzeichnis

Aus Usf Listbox in geschlossene Datei schreiben

Aus Usf Listbox in geschlossene Datei schreiben
29.09.2012 07:18:43
Judith
Hallo,
ich würde gerne aus einer UserForm Listbox Daten in eine andere (geschlossene) Exceldatei schreiben.
Irgendwie finde ich nichts im Web, das ich anpassen könnte. Es wäre super, wenn mir jemand vielleicht einen Link oder ein Beispiel nennen könnte, dass ich mit meinen begrenzten Fähigkeiten anpassen kann.
Folgendes habe ich mir vorgestellt:
UserForm Listbox ist geöffnet und mit Daten geladen, 1 Spalte
Beim Schließen des Forms Daten in andere Datei "Dokumentation" zurück schreiben (QueryClose)
- dazu zuerst Inhalte in Spalte A löschen (Dokumentation)
- dann die Daten aus der Listbox eintragen
- speichern ohne Nachfrage
Vielen, vielen Dank schon mal, für Eure Vorschläge und ein schönes Wochenende!
Gruß

2
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Aus Usf Listbox in geschlossene Datei schreiben
29.09.2012 08:37:46
Hans
Hallo Judith,
in eine geschlossene Datei kannst Du nicht schreiben, also muss sie geöffnet werden:
Private Sub UserForm_QueryClose(Cancel As Integer, CloseMode As Integer)
Dim iLst As Integer, iRow As Integer
On Error GoTo ERRORHANDLER
Application.ScreenUpdating = False
Application.EnableEvents = True
Workbooks.Open "c:\temp\test.xls", False, False
Worksheets("Tabelle1").Select
Range("A1:A100").ClearContents
iRow = 1
With ListBox1
For iLst = 0 To .ListCount - 1
If .Selected(iLst) Then
Cells(iRow, 1).Value = .List(iLst)
iRow = iRow + 1
End If
Next iLst
End With
ActiveWorkbook.Close savechanges:=True
ERRORHANDLER:
Application.EnableEvents = True
Application.ScreenUpdating = True
End Sub

gruss ahsn

Anzeige
AW: Aus Usf Listbox in geschlossene Datei schreiben
29.09.2012 11:51:05
Judith
Hallo Hans,
vielen Dank für den Beitrag, das ist ja gleich eine Komplettlösung für mein Problem.
Funktioniert bestens...ehrlich, ich bewundere Euch für Euer Wissen!
Gruß

224 Forumthreads zu ähnlichen Themen

Anzeige
Anzeige
Anzeige

Links zu Excel-Dialogen

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige