Live-Forum - Die aktuellen Beiträge
Datum
Titel
19.04.2024 10:46:47
Bestimmte Zellen aus dynamischer Liste zurückgeben
19.04.2024 10:39:36
Schaltfläche auf einem Tabellenblatt NICHT mit abspeichern
19.04.2024 09:26:26
Median für Zeilen mit gleichen Zeitstempel
19.04.2024 08:41:23
Zwei Makros in ein Arbeitsblatt - zweite wird nicht ausführt
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
1612to1616
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
1612to1616
1612to1616
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

VBA Dateiname unvollständig

VBA Dateiname unvollständig
08.03.2018 11:22:52
Anina
Hallo zusammen,
ich will per VBA eine Datei öffnen wo sich der zwischen Teil vom Namen immer ändert. Der Dateiname ist: generic_########-######_###_****_***_buildingblock.csv
# sind Zahlen und * buchstaben
kann mir jemand sagen, wo mein Fehler liegt? 

Sub Datei_oeffnen()
Dim Dateipfad_EU As String
Dateipfad_EU = InputBox("Bitte Ordnerpfad eingeben") & "/EU/generic_*_buildingblock.csv"
Workbooks.Open Filename:=Dateipfad_EU
End Sub

6
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: VBA Dateiname unvollständig
08.03.2018 11:27:16
Hajo_Zi
es kann keine Datei geöffnet werden mit "*" im Namen ich vermute so eine Datei kann man nicht erstellen.

Beiträge von Werner, Luc, robert, J.O.Maximo und folgende lese ich nicht.
AW: VBA Dateiname unvollständig
08.03.2018 11:45:29
Anina
Hallo Hajo,
danke für deine schnelle Antwort. Das * ist mehr ein Platzhalter. statt dem * stehen dort Zahlen und Buchstaben, aber das ändert sich immer. nur generic und buildingblock bleibt immer gleich. Gibt es so etwas wie ein Platzhalter dass ich sagen kann öffne die Datei, die mit buildingblock.csv endet und in diesem ordner liegt?
AW: VBA Dateiname unvollständig
08.03.2018 12:05:31
UweD
Hallo
ist es denn nur eine Datei nach dem Muster in dem Verzeichnis?
dann könnte das hier helfen (ungetesttet)
Mit DIR() wird die erste Datei nach dem Suchmuster gefunden, und der komplette Name zurückgegeben.
Sub Datei_oeffnen()
  
    Dim Dateipfad_EU As String
  
    Dateipfad_EU = InputBox("Bitte Ordnerpfad eingeben") & "/EU/generic_*_buildingblock.csv"
    If Dir(Dateipfad_EU) <> "" Then
  
        Workbooks.Open Filename:=Dir(Dateipfad_EU)
  
    End If
End Sub

LG UweD
Anzeige
Filename:=Dir(Dateipfad_EU)
08.03.2018 12:14:19
Rudi
Hallo Uwe,
Dir() gibt ja nur den Dateinamen ohne Pfad zurück.
Gruß
Rudi
AW: Filename:=Dir(Dateipfad_EU)
08.03.2018 12:43:33
UweD
Stimmt.
Sub Datei_oeffnen()
  
    Dim Dateipfad_EU As String, Pfad_EU As String
    
    Pfad_EU = "/EU/"
    
    Dateipfad_EU = InputBox("Bitte Ordnerpfad eingeben") & Pfad_EU & "generic_*_buildingblock.csv"
    
    If Dir(Dateipfad_EU) <> "" Then
  
        Workbooks.Open Filename:=Pfad_EU & Dir(Dateipfad_EU)
  
    End If
End Sub

LG UweD
Anzeige
AW: VBA Dateiname unvollständig
08.03.2018 12:11:58
Rudi
Hallo,

Sub Datei_oeffnen()
Dim Dateipfad_EU As String, strFile As String
Dateipfad_EU = InputBox("Bitte Ordnerpfad eingeben")
If Dateipfad_EU  "" Then
If Right(Dateipfad_EU, 1)  "\" Then Dateipfad_EU = Dateipfad_EU & "\"
strFile = Dir(Dateipfad_EU & "EU\generic_*_buildingblock.csv", vbNormal)
If strFile  "" Then
Workbooks.Open Filename:=Dateipfad_EU & "EU\" & strFile
End If
End If
End Sub
Gruß
Rudi

300 Forumthreads zu ähnlichen Themen

Sheetcode in VBA project schreiben
Dirk

Hallo Forum,
ich habe mal wieder ein Problem und brauche Eure Hilfe.
Ich versuche per VBA Macrocode in ein Sheet zu schreiben. Das funktioniert auch fuer den ersten Schleifendurchlauf meines Programms. Beim zweiten durchlauf stuerzt Excel leider ab :-(
Woran koennte das liegen? Anb...
27.08.2008 14:10:00
Thread-ID: 1005083
5 Beiträge
Anzeige
Sheet-Name einer Variablen zuweisen
TommiH

Hallöchen,
hmm, bei dieser Variante bekomme ich eine Fehlermeldung, die mir allerdings nicht wirklich hilft, den Fehler zu finden. Was mache ich da falsch?
Dim v1 As String
v1 = ActiveSheet.Name
Sheets.Add After:=v1
ActiveSheet.Name = "Dummy"
Worksheets(v1).Activate
...
01.09.2008 11:04:00
Thread-ID: 1006356
4 Beiträge
Sheet-Name in Zelle
Frank

Hallo,
mit folgendem Code lege ich ein neues Sheet an
ich möchte das der Namen des neuen Sheets auch in Zelle A2 eingetragen wird.
Nur wie?
Könnte mir bitte jemand weiterhelfen.
Private Sub ComboBox6_Change() End Sub
Private Sub CommandButton1_Click() Application.Sc...
30.10.2008 11:39:38
Thread-ID: 1020547
4 Beiträge
Anzeige
Monatsnamen mit Jahr (VBA)
Andre´

Hallo alle zusammen,
mit folgenden Makro schreibe ich das aktuelle Datum in A1:
Sub Monat() Range("A1") = Str(Date) End Sub
in A1 steht dann:
18.11.2008
Jetzt möchte ich aber den Monatsnamen und das Jahr in A1 wie folgt haben:
November 2008
Kann mir bitte jemand e...
18.11.2008 17:30:00
Thread-ID: 1025713
11 Beiträge
per VBA kopieren, kein Namenskonflikt
Peter

Guten Tag
Beim Kopieren eines Bereiches mit VBA in eine andere Tabelle erhalte ich die Meldung:
"Die Formel, die eingefügt werden soll, enthält einen Namen, der bereits in der Zieltabelle vorhanden ist. Soll die vorhandene Definition von 'xxxxx' verwendet werden?
* Klicken Sie auf '...
11.12.2008 10:45:09
Thread-ID: 1031973
3 Beiträge
worksheet.activate über Name aus Eigenschaften
michael

Hallo Kollegen.
Folgendes Thema:
Ich habe eine Datei als Kopiervorlage, bei der das erste Blatt nicht umbenannt werden soll, weil ich beim schließen der Datei dorthin zurück springe und Aufgaben erledige.
Erst habe ich über Application.CommandBars("ply").Enabled = True die Funktion...
20.01.2009 19:10:54
Thread-ID: 1041968
5 Beiträge
Namensvergabe per VBA
Boris

Hallo,
ich verwende untenstehenden Code, um per VBA automatisch Namen zuzuweisen. Wenn in Zeile 1 eines Blattes (die Überschriften enthält) der Wert einer Zelle geändert wird, wird ein Name erstellt aus Blattname + "." + Überschrift (z.B. Umsatz.2008), mit dem Bezug=Blattname!$X$#2, wobei X...
30.01.2009 12:14:00
Thread-ID: 1045354
8 Beiträge
VBA Befehl in mehreren Sheets ausführen
Tom

Hallo zusammen,
ich habe folgendes Problem:
Ich habe ein Makro aufgezeichnet wo er mir in den Sheets 1 - 24 (so habe ich sie genannt) Spalten ausblenden soll. Wärend der Aufnahme zeigt er mir auch in den Sheets an, das die gewünschten Spalten ausgeblendet sind. Wenn ich das Makro jetzt...
16.03.2009 10:46:16
Thread-ID: 1060630
8 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
4
5
3
3
4
10
2
4
7
7
11
4
3
2
1
11
2
6
7
7
3
5
5
5
11