Anzeige
Archiv - Navigation
740to744
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
740to744
740to744
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Listboxdaten per VBA in textdatei exportieren
04.03.2006 00:43:45
alex
Hallo Forum,
Hab eine Userform mit mehreren Listboxen. Ich moechte nun auf einen Button druecken (zuerst muss der Speicherort der Datei ausgewaehlt werden)und die Daten der Listboxen in eine Textdatei schreiben.
Danke fuer die Tips
Alex

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

Betreff
Datum
Anwender
Anzeige
AW: Listboxdaten per VBA in textdatei exportieren
04.03.2006 11:09:10
Worti
Hallo Alex,
mit dem folgenden Code sollte es gehen:


      
Private Sub CommandButton1_Click()
    
Dim I As Integer
    
Dim J As Integer, K As Integer
    
Dim dateischonoffen As Boolean
    
Dim speicherort
    
    speicherort = Application.GetSaveAsFilename("meineListboxen.txt")
    
If speicherort = False Then Exit Sub
    dateischonoffen = 
False
    
For I = 0 To Me.Controls.Count - 1
        
If Left(Me.Controls(I).Name, 7) = "ListBox" Then
           
If dateischonoffen = False Then
              
Open Mid(speicherort, InStrRev(speicherort, "\") + 1) For Output As #1 ' Datei zur Ausgabe öffnen
              dateischonoffen = True
           
End If
           
For J = 0 To Me.Controls(I).ListCount - 1
               
Write #1, Me.Controls(I).List(J)
           
Next J
       
End If
    
Next
    
If dateischonoffen Then
       
Close #1
    
End If
End Sub
 


Gruß Worti
Anzeige
AW: Listboxdaten per VBA in textdatei exportieren
04.03.2006 11:40:14
Cardexperte
Hallo alex,
mit Hilfe des Forums hier ein Beispiel, würde mich über eine Rückmeldung freuen,
hier die Datei: https://www.herber.de/bbs/user/31624.xls
Gruss WS

308 Forumthreads zu ähnlichen Themen

Anzeige
Anzeige
Anzeige

Links zu Excel-Dialogen

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige