Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
1136to1140
1136to1140
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Fileopen-Dialog sortieren

Forumthread: Fileopen-Dialog sortieren

Fileopen-Dialog sortieren
Pepi
Hallo zusammen
Ist es möglich, in einem Ordner bestimmte Files (*.xls) sortiert nach Filename, Mutationsdatum, etc. aufwärts oder abwärts sortiert anzuzeigen, auszuwählen und zu öffnen.
vielen Dank
mfg
Pepi
Anzeige

4
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Benutzer
Anzeige
AW: Fileopen-Dialog sortieren
16.02.2010 13:23:42
Renee
Hi Pepi,
Vorsortieren kannst du nicht, aber innerhalb des 
Application.Dialogs(xlDialogOpen).Show

kanns du ja nach Belieben durch Klick auf die entsprechenden Spaltenheaders sortieren.
GreetZ Renée
AW: Fileopen-Dialog sortieren
16.02.2010 17:45:33
Peter
Vielen Dank
Das sortieren verstehe ich, doch denke ich, dass sich auch der Filename vorselektieren lässt, zBsp "Test*.xls", d.h. dass ich nur die Files sehe die mit "Test" beginnen, wie es auch möglich ist nur die Files mit "*.xls" zu sehen.
Ich habe analoge Möglichkeiten ausprobiert, doch leider war ich nicht erfolgreich.
Hier noch der Code
Sub FileOpen()
Dim vFile As Variant, sPath As String
sPath = ThisWorkbook.Path
ChDrive Left(sPath, 2)
ChDir sPath
vFile = Application.GetOpenFilename("Exceldateien (*.xls),*.xls") ' Test*.xls geht nicht!!
If vFile = False Then Exit Sub
MsgBox Dir(vFile) 'vfile ist Filename mit Pfad
Exit Sub
Workbooks.Open vFile
End Sub
Nehme gerne weitere Tipps entgegen.
mfg
Pepi
Anzeige
AW: Fileopen-Dialog sortieren
16.02.2010 18:46:15
Nepumuk
Hallo,
bist du dir sicher mit VBA gut ;-)
Public Sub Beispiel()
    With Application.FileDialog(msoFileDialogFilePicker)
        .InitialFileName = "C:\Test*.xls"
        If .Show Then MsgBox .SelectedItems(1)
    End With
End Sub

Gruß
Nepumuk
Anzeige
AW: Fileopen-Dialog sortieren
19.02.2010 09:42:01
Pepi
Hallo Nepumuk
Herzlichen Dank für deinen Typ, der wunderbar funktioniert hat - Ja gut, schlecht, schön, hässlich, etc. sind offenbar relative Werte. Bei uns im Geschäft bin ich der Crack!, ich weiss aber, dass ich von vielem wenig weiss - aber es reicht um hier einen tollen Job machen - en schöne Tag Pepi
Anzeige
;

Forumthreads zu verwandten Themen

Zellübertragung per "Datei öffnen" Dialog
Sebastian

Hallo zusammen,
folgendes Szenario:
Excel 2000
Ich habe die Excel Datei "C:\Fillmeup.xls" in die verschiedene Zellen aus der Excel Datei "C:\Quelle.xls" importiert werden sollen. Diese Zellen sollen einfach auf dem Tabellenblatt "Tabelle_Fillmeup" in die Spalte H eingetragen werden....
16.07.2009 09:17:26
Thread-ID: 1088930
9 Beiträge
makro - datei mit variabler Datum öffnen
meixner

Hallo zusammen,
brauche ein Makro, daß eine Datei automatisch öffnet, deren Datum sich quartalsweise ändert!
Datei = "I:\99\8801\FM\IA files \Fondsbestand_20090907"
Datei heißt im Dez. aber Fondsbestand_20091207. Kann ich das Datum irgendwie variabel anlegen?
mit Datei = "I:\99\...
03.10.2009 21:02:11
Thread-ID: 1107038
2 Beiträge
VBA Datei speichern gleich wieder öffnen
Timonski

Servus
ich habe eine Exceldatei mit viel VBA und bei einem Tabellenblatt wird die Datei sehr langsam,
dann speicher ich und lad sie gleich wieder...
und diesen Befehl würde ich gern als Icon in der Symbolleiste hinterlegen...
hätte mir da einer einen Vorschlag?
vielen Dank
21.10.2009 09:36:11
Thread-ID: 1110986
4 Beiträge
Anzeige
Mit VBA Datei auf Server öffnen
egon.kernien@online.de

Hallo Experten!
Ich lasse mit diesem Code eine Exceldatei pda.xls die auf einem Server liegt so öffnen, Daten aus einer Tabelle lesen-kopieren, schliessen.:
ChDir Pfad
strFile = Application.GetOpenFilename
If strFile = "Falsch" Then Exit Sub
Set wbSource = Workbooks.Open(Fi...
03.12.2009 11:32:17
Thread-ID: 1121538
3 Beiträge
Anzeige
Makro auf Dateien anwenden über Dialog
Bernd

Hallo,
ich würde gerne ein bestimmtes Makro auf mehrere Dateien nacheinander anwenden und diese Dateien dann am Ende wieder schließend.
Folgende Schritte sollten abgearbeitet werden:
1.
Ich öffne über eine Art Menüdialog ein Verzeichnis,
2.
Dort kann ich entweder das ge...
28.09.2010 09:45:44
Thread-ID: 1179619
9 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
Anzeige
vba Datei öffnen, Erweiterung unbekannt
Daniel

Hallo VBA - Experten,
Wie öffne ich in vba eine Exceldatei, ohne dass ich die Dateierweiterung kenne? Mein Problem: ich habe ein Makro erhalten, welches Dateien im Excel 2003 - Format öffnet. Das Öffnen sollte auch funktionieren, wenn die Dateien in einem neueren Format mit anderer Erweiter...
09.04.2011 16:16:22
Thread-ID: 1209733
4 Beiträge
Öffnen einer Datei per VBA
Christian

Hallo Forum,
ich möchte per VBA eine Datei öffnem, deren Pfad und Namen als Text in einer Zelle steht.
in A1 steht "D:\test.xls"
dann will ich im Macro den Befehl:
Datei$ = Cells(1, 1).Select
verwenden, um den Namen in der Variablen Datei$ zu speichern.
Das geht nicht....
18.08.2011 12:48:10
Thread-ID: 1226611
4 Beiträge
mit Makro andere Datei mit Makro öffnen
Peter

Guten Tag
Ich habe in der Datei "AAA.xls" ein Makro, das unter anderem die Datei "BBB.xls"öffnet, in welcher auch Makros enthalten sind. Bei mir ist die Makrosicherheit auf mittel eingestellt - das heisst, ich muss jeweils bestätigen, dass ich eine Datei mit Makros öffnen will.
Gibt es...
17.09.2011 13:36:04
Thread-ID: 1230314
5 Beiträge
Datei Öffnen Dialog
Wolfgang

Hallo,
ich habe nochmal ein kleines Problem mit meinem VBA Makro.
Und zwar geht es um folgende Sequenz:
Dateiname = Worksheets("WSG30").Cells(4, 1).Value & ".xlsx"
objexcel.Workbooks.Open (ThisWorkbook.Path & "\" & Dateiname)
objexcel.Visible = False
Rein the...
20.09.2011 10:59:12
Thread-ID: 1230691
4 Beiträge
Datei-Öffnen-Dialog für gleichen Ordner
KlausF

Hallo Excelfreaks,
in einem Makro rufe ich den Öffnen-Dialog auf und speichere den Namen der geöffneten Datei (ohne Pfad!) in eine Variable.
Das mache ich mit:
öffnen = Application.Dialogs(xlDialogOpen).Show
If öffnen = False Then Exit Sub
Projekt = ActiveWorkbook.Name
K...
04.11.2011 12:01:45
Thread-ID: 1236626
4 Beiträge
Makro - Datei schließen und neu öffnen
Chrissy

Hallo,
ich bräuchte dringend ein Makro für folgendes Problem:
(Habe eine komplexe Version davon schon mal gepostet, aber keine Antwort erhalten - daher nochmal ein vereinfachter Versuch)
Ich habe ein Excel-Formular, in das ich Werte in die Zellen B1, B2, B3 eingebe.
Nun brauche...
12.11.2012 15:10:28
Thread-ID: 1286384
7 Beiträge
Anzeige

Beliebteste Forumthreads (12 Monate)

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