Live-Forum - Die aktuellen Beiträge
Datum
Titel
23.04.2024 08:26:15
Rückgabewert mehrere Suchkriterien Datumsbereich
23.04.2024 08:20:37
VBA: Blatt als pdf per Mail. Blatt mit anderen pdfs vereinen
23.04.2024 08:04:28
4-fach verschachtelte WENN-Funktion
22.04.2024 22:36:13
Marko automatisch ausführen
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
904to908
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
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
904to908
904to908
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Dateien in Listbox ohne Pfad anzeigen

Dateien in Listbox ohne Pfad anzeigen
06.09.2007 15:40:00
Herbert
Hallo liebe Helfer
Ich habe auf Hans´ toller CD eine Prozedur gefunden, mit der ich alle .xls - Dateien eines Verzeichnisses in einer Listbox auflisten kann und anschließend eine ausgewählte Datei öffne. In der Listbox wird auch der komplette Pfad dargestellt.
Frage: Wie kann ich beim initialisieren der Listbox die Dateien ohne Pfad anzeigen lassen?
Danke im Voraus
Herbert

5
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Dateien in Listbox ohne Pfad anzeigen
06.09.2007 16:15:00
Hajo_Zi
Hallo Herbert,
nicht jeder hat Hans seine Cd und ich lehne es auch ab über das Internet auf fremde Rechner zu schaue, vielleicht gibt es da noch paar. Für alle dies Leute wäre der Code hilfreich.

AW: Dateien in Listbox ohne Pfad anzeigen
06.09.2007 16:28:00
Herbert
Hallo Hajo
Tja so ist das in der Firma, wenn das Internet auf einem Standalone-Rechner läuft . . . dann tippe ich mal:

Private Sub UserForm_Initialize()
Dim iCounter as Interger, verz as String
Verz = Workbooks("PERSONL.xls").Worksheets("Tabelle1").Range("B1").Value
With Application.FileSearch
.Lookin = verz
.Filename = "*.xls"
.Execute
For intCounter = 1 To .FoundFiles.Count
lstFiles.Additem .FoundFiles(intCounter)
Next
End With
End Sub


Gruß Herbert

Anzeige
AW: Dateien in Listbox ohne Pfad anzeigen
06.09.2007 16:32:00
Hajo_Zi
Hallo Herbert,
es macht sich immer gut, wennn man auf die Antwort antwortet, dann sieh man was geschrieben wurde.
Ich kann denm Code nicht testen da ich version 2007 einstze, darum live
lstFiles.Additem Mid(.FoundFiles(intCounter), len(Verz)+1)
Gruß Hajo

Danke, das wars ! o.T.
06.09.2007 16:56:50
Herbert

zu wegen erledigt! oT
06.09.2007 17:39:00
zu
zu

84 Forumthreads zu ähnlichen Themen

Userform einer Fremddatei anzeigen
Reinhard

Hallo Wissende,
ich habe in z.B. der Personl.xls eine Userform namens Userform1.
Kann ich die UF irgendwie in einer fremden Mappe anzeigen lassen oder geht das grundsätzlich nicht?
Das z.B. klappt nicht mit dem Code im Modul1 einer Fremddatei:
Sub nn() Workbooks("PERSONL.XLS")...
17.09.2008 19:55:00
Thread-ID: 1010509
5 Beiträge
Anzeige
Dateipfad in Titelleiste anzeigen
robert

Hallo zusammen,
ich würde gerne oben im Excel 2007 den kompletten Dateipfad sehen wo die gerade geöffnete Datei liegt.
Irgendwie finde ich aber die Einstellung nicht.
Wer weiss wie man das einstellt ?
danke schon mal
rob
10.02.2009 10:57:00
Thread-ID: 1048954
5 Beiträge
Variabler Speicherpfad einer Datei - Formelproblem
Susi

Hallo,
ich habe ein Problem für dass ich einfach keine Lösung finden kann.
In einer Datei wird ein Feld mit Daten einer anderen Datei befüllt (per Verknüpfung) z.B. ='D:\[Verknüpfung_Datei.xls]Tabelle1'!A1
So weit so gut. Nun wird die Datei aber zu verschiedenen Nutzern gesendet, di...
22.04.2009 12:12:51
Thread-ID: 1070306
5 Beiträge
Anzeige
VBA - Mehrere Ordner auswählen + Pfade speichern
Thomas

Hallo,
der Betreff sagt eigentlich schon alles:
ich möchte ein Dialogfenster öffnen, in dem man mehrere Ordner (nur die Ordner, nicht deren Inhalt) auswählen kann und dann deren Pfad in einem Array gespeichert haben.
Ich habe es schon mit "msoFileDialogFolderPicker" versucht, nur le...
08.10.2009 17:03:03
Thread-ID: 1108139
2 Beiträge
"Datei öffnen"-Dialog mit Pfadvorgabe
Holger

Hallo Excelaner,
wie kann ich eine Application.GetOpenFilename("Dateityp (*.txt; *.log; *.dat),")
Anweisung auf einen fixen Pfad (z.B. "H:/Test/" ) ausführen?
Es soll also im "Datei öffnen"-Dialog der Pfad schon vorbelegt werden.
Für Hilfe wäre ich sehr dankbar!
Gruß Holge...
12.01.2011 14:51:59
Thread-ID: 1195263
6 Beiträge
Datei in eigenem Pfad anlegen (VBA)
Henner

Hallo zusammen,
bisher habe ich mit folgendem Code den Inhalt bestimmter Zellen in eine Textdatei exportiert:
ifile = FreeFile Open "c:\Ordner\Unterordner\export.txt" For Append As ifile Print #ifile, Worksheets("Datenexport").Cells(10, 8) Close ifile Nun möchte ich den Pfad für die T...
17.04.2012 21:02:14
Thread-ID: 1259843
5 Beiträge
LW und per VBA Pfad wechseln, Dateiname Manuel
Pius

Hallo zusammen
Ich habe eine xltm vorlage welche auf LW G: liegt
Nach dem benützen der Vorlage soll automatisch beim Schliessen der Datei das LW auf H:\ und dem Pfad auf Budet_2013\ gewechselt werden. Nur für diese Datei.
CHdir "H:\Budget_2013\" funktioniert leider nicht
Besten...
09.07.2012 11:29:45
Thread-ID: 1270339
4 Beiträge
VBA Dateien(alle Tab) aus Pfad in Datei kopieren
Carmen

Hallo zusammen,
ich habe, mit Hilfe folgendes Makro, zum Zusammenführen von Dateien aus einem Pfad in eine neue Datei und ein Tabellenbaltt, in Benutzung.
Es funktioniert ganz wunderbar, nur möchte ich jetzt, dass alle Tabellenblätter aus den Dateien in die neue Datei eingefügt werden....
12.07.2012 15:34:31
Thread-ID: 1270787
5 Beiträge
Anzeige

Links zu Excel-Dialogen

ListBox UserForm

Beliebteste Forumthreads (12 Monate)

Anzeige
Jetzt das Excel-Portal bewerten: Deine Stimme zählt!

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige
Archiv - Verwandte Themen
Forumthread
Beiträge
4
3
4
4
5
1
5
4
3
4
5
6
5
4
9
4
3
1
1
2
5
2
17
1
3