Live-Forum - Die aktuellen Beiträge
Datum
Titel
24.04.2024 09:36:02
Wenn Wert x in Zelle a, dann Wert y in Zelle b
24.04.2024 09:24:20
Textketten erstellen mit unterschiedlichen Anzahl an Feldern
24.04.2024 09:04:14
Erfahrung Umstieg in Sharpoint
24.04.2024 08:01:34
Textbox Inhalt prüfen und Code abbrechen
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
744to748
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
744to748
744to748
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Zugriff auf Datei mit variablem Namen

Zugriff auf Datei mit variablem Namen
22.03.2006 14:40:03
Henning
Hallo erstmal.
Mein Problem: Ich möchte auf verschiedene Excel-Dateien zugreifen, die jedoch einen variierenden Dateinamen besitzen. Zum Beispiel lautet der Pfad Nr.1: "F:\Eigene Dateien\Schule\Arbeiten1\*.xls".
Nr.2: "F:\Eigene Dateien\Schule\Arbeiten2\*.xls".
Der Pfad zur Datei ist eindeutig, jedoch der Dateiname selbst nicht.
Es befindet sich in jedem Ordner "Arbeiten" nur eine Exceldatei, jedoch wie bereits erwähnt, mit variierendem Namen.
Das Sternchen versteht VBA nicht.
Kann mir da jemand weiterhelfen?

3
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Zugriff auf Datei mit variablem Namen
22.03.2006 14:51:16
IngGi
Hallo Henning,
so frägt er nach dem gewünschten Pfad und öffnet anschließend die darin befindliche Excel-Datei.

Sub Datei_Oeffnen()
Dim fso As Object
Dim fo As Object
Dim f As Object
Dim strPfad As String
strPfad = InputBox("Bitte den Pfad eingeben")
If Right(strPfad, 1) <> "\" Then strPfad = strPfad & "\"
Set fso = CreateObject("Scripting.FileSystemObject")
Set fo = fso.GetFolder(strPfad)
For Each f In fo.Files
If Right(f.Name, 4) = ".xls" Then
Workbooks.Open Filename = strPfad & f.Name
End If
Next 'f
End Sub
Gruß Ingolf
Anzeige
AW: Zugriff auf Datei mit variablem Namen
22.03.2006 14:53:51
ChrisL
Hallo Henning

Sub test()
MsgBox xlsDateiSuchen
End Sub



Function xlsDateiSuchen() As String
Dim fso As Object
Dim i As Integer
Set fso = Application.FileSearch
With fso
.NewSearch
.LookIn = "F:\Eigene Dateien\Schule\Arbeiten1\"
.FileType = msoFileTypeExcelWorkbooks
.SearchSubFolders = False
If .Execute() > 0 Then
xlsDateiSuchen = .FoundFiles(1)
End If
End With
Gruss
Chris
AW: Zugriff auf Datei mit variablem Namen
24.03.2006 09:29:51
Henning
Danke. Habt mir weitergeholfen.
Gruß
Henning

300 Forumthreads zu ähnlichen Themen

auf anderes sub zugreifen
Lars

Hallo,
ich möchte gerne eine Standardprozedur im sub "A" definieren, und es in anderen subs (z.B. "B") aufrufen, so dass es ausgeführt wird. Anschließend geht es in sub "B" weiter. Wie funktioniert das?
Danke
Gruß
Lars
03.09.2008 15:35:00
Thread-ID: 1007127
12 Beiträge
Anzeige
Hyperlink soll je nach KW auf andere Datei verw.
Alex

Hallo,
gleich einmal vorweg, ich bin neu im Forum und hoffe, dass ihr mir bei meinem kleinen Hyperlink- Problem helfen könnt.
Folgende Aufgabe sollte gelöst werden.
Ich möchte einen Hyperlink einrichten, der automatisch je nach Kalenderwoche auf das entsprechende Bestellformular ve...
11.10.2008 12:37:00
Thread-ID: 1015732
3 Beiträge
Hyperlink auf Sheet in anderer Datei
Christoph

Hallo zusammen, mal wieder ein kleines Problem:
Ich lese aus einer Zelle den Text Karteikartenneu\A.xls#'Nachname Vorname Ort'!A4 ein.
Ziel des unten stehenden Codes ist es, im Unterverzeichnis Karteikartenneu die Datei A.xls zu öffnen und das Sheet Nachname Vorname Ort im Vordergrund z...
21.10.2008 08:04:00
Thread-ID: 1017836
6 Beiträge
Anzeige
Kopf- & Fußzeile auf andere Dateien übertragen?
Jessi

Hallo zusammen,
habe mal wieder eine Frage:
Habe 175 Dateien, die ich mit gleicher Kopf- & Fußzeile versehe muss. Die Dateien sind alle gleich nummeriert:
001.xlsm
002.xlsm
(...)
175.xlsm
Gibt es ggf. eine geschickte Möglichkeit z.B. das erste Tabellenblatt richt...
06.12.2008 18:56:00
Thread-ID: 1030728
9 Beiträge
Zugriff auf andere Programm/Daten in/exportieren
abu

Hallo Zusammen,
ich wuerde gerne wissen ob Excel in der Lage ist aus einem anderen Programm (Prologs) Daten zu exportiern und darzustellen und umgekehrt. Desweiteren wuerde ich gerne eine Routine in Excel programmieren (besser versuchen hinzubekommen) welche ueber den InternetExplorer auf e...
09.12.2008 10:50:51
Thread-ID: 1031278
11 Beiträge
Schneller Zugriff auf andere Dateien
Marco

Hallo zusammen,
ich möchte in einer Prozedur auf Daten in einem anderen Workbook zugreifen, welches zu diesem Zeitpunkt nicht geöffnet ist. Wie kann ich dies tun ohne das Programm zu langsam zu machen.
Gruß Marco
10.12.2008 10:13:00
Thread-ID: 1031590
5 Beiträge
Gültigkeit Liste mit Bezug auf eine andere Datei
Rafi

Hallo Zusammen,
ich habe ein Problem mit einer Gültigkeitsprüfung auf eine Liste die in einer anderen Datei steht.
Bislang hat das immer funktioniert, wenn ich die Liste der Externen Datei unter Namen definiert und bei der Gültigkeit/Liste mit Quelle="Name" angegeben habe. Geht aber nic...
16.12.2008 11:28:00
Thread-ID: 1033235
4 Beiträge
SVerweis - Zugriff auf ext. Tabellen ->Datei gross
sk

Hallo zusammen,
ich habe eine Preislistendatei die ich anhand von externen Tabellen mit SVerweis aktualisiere.
Ich suche anhand der der hinterlegten Artikelnummer in meiner Datei per SVerweis im jeweiligen
Datenbankextrakt der Artikelstammdaten(12MB) und Artikelpreise(1.5MB) die pas...
26.01.2009 14:43:35
Thread-ID: 1043902
3 Beiträge
Anzeige

Links zu Excel-Dialogen

InputBox

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
11
3
2
5
2
8
10
4
3
2
1
5
1
2
3
5
3
5
13
5
3
2
4
10
3