Live-Forum - Die aktuellen Beiträge
Datum
Titel
25.04.2024 15:03:35
Unterschiedliche Dateien miteinander abgleichen lassen
25.04.2024 14:05:48
Makro in aktueller Zelle ausführen mit Doppelklick
25.04.2024 12:56:25
Werte von Kunden und Artikel stehen untereinander
25.04.2024 12:55:42
Funktionsparameter auslesen
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
1352to1356
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
1352to1356
1352to1356
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Dateinamen aus Pfad extrahieren

Dateinamen aus Pfad extrahieren
12.03.2014 13:15:34
Tom
Hallo,
habe schon eineige Versuche hinter mir, klappt aber nicht Kann mir jemand einen kurzen Code zeigen, der mir den Dateinamen liefert?
Danke
TOM

9
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Dateinamen aus Pfad extrahieren
12.03.2014 13:19:27
Rudi
Hallo,
name=split(pfad,"\")(ubound(split(pfad,"\")))
Gruß
Rudi

AW: Dateinamen aus Pfad extrahieren
12.03.2014 13:21:19
Tom
so einfach und doch so gut!!!
DANKE!
TOM

AW: Dateinamen aus Pfad extrahieren
12.03.2014 14:15:37
Tom
Hi, doch noch ein Problem,
ich lasse mir alle excel-Dateien aus einem bestimmten Verzeichnis auflisten in einer tabelle. Hierbei erscheint immer eine excel-Datei die mit ~$...xlsx anfängt. Was ist das und wie kann ich das Makro ändern um diese nicht anzuzeigen. Im explorer ist diese Datei nicht zu sehen!#
Gruß TOM

~$...xlsx
12.03.2014 14:32:20
Rudi
Hallo,
die existiert nicht wirklich. Es ist, soviel ich weiß, die Wiederherstellungsdatei für eine geöffnete Datei.
Ich kann sie im Explorer allerdings sehen, da ich auch versteckte Dateien anzeigen lasse.
Frag den Status (versteckt) oder die ersten beiden Buchstaben ab.
Gruß
Rudi

Anzeige
AW: ~$...xlsx
12.03.2014 14:45:25
Tom
Hi,
habe in If-Anweisung folgendes eingefügt: Left(fDatei, 2) = "~$". Aber die Datei wird trotzdem ausgegeben. Was ist das?
TOM

AW: ~$...xlsx
12.03.2014 15:09:17
Rudi
Hallo,
wenn ich deinen Code kennen würde, könnte ich mehr sagen.
z.B. 
Sub ListFiles()
Dim OFS As Object, oFolder As Object, oFile As Object
Dim oDict As Object
Dim sFolder As String
Set OFS = CreateObject("Scripting.filesystemobject")
Set oDict = CreateObject("Scripting.dictionary")
With Application.FileDialog(msoFileDialogFolderPicker)
.InitialFileName = ThisWorkbook.Path & "\"
If .Show = -1 Then
sFolder = .SelectedItems(1)
Set oFolder = OFS.getfolder(sFolder)
For Each oFile In oFolder.Files
If LCase(oFile) Like "*.xls*" Then      'nur Excel
If (oFile.Attributes And 2) = 0 Then  'keine versteckten
oDict(oFile) = oFile.Name
End If
End If
Next
With Sheets.Add
With .Cells(1, 1)
.Resize(oDict.Count) = _
WorksheetFunction.Transpose(oDict.keys)
.Resize(oDict.Count).Offset(, 1) = _
WorksheetFunction.Transpose(oDict.items)
End With
.Columns.AutoFit
End With
End If
End With
End Sub

Gruß
Rudi

Anzeige
AW: ~$...xlsx
12.03.2014 15:11:17
Tom
Das hilft schon, danke!!!
sonnige Grüße
TOM

AW: Dateinamen aus Pfad extrahieren
12.03.2014 13:20:21
Klaus
Hallo Tom
debug.print ActiveWorkbook.Name
Grüße,
Klaus M.vdT.

AW: Dateinamen aus Pfad extrahieren
12.03.2014 13:22:21
Tom
Problem gelöst - danke
Gruß
Tom

316 Forumthreads zu ähnlichen Themen

Zählen E-Mailadressen in einer Zeile
Enjoy82

Guten Morgen,
ich hab in die Zelle A1 einen rießigen E-Mail Verteiler kopiert und möchte nun die Anzahl der E-Mail Adressen wissen.
Mit Zählenwenn kam ich nicht wirklich weiter (wollte die @s zählen) -- Formel spuckt 0 aus
Nach jedem Beistrich einen Zeilenumbruch machen, ist mir noc...
27.08.2008 08:59:00
Thread-ID: 1004969
3 Beiträge
Anzeige
Email Hyperlinke mit Betreff aus Dateiname&Registe
Patrick

Hallo miteinander
Ich versuche von der Excel Tabelle eine Email über einen Email Hyperlink zu starten. Diese Email soll automatisch im Betreff den Dateinamen der Exceltabelle und den Namen des aktiven Tablellenblattes/Registers enthalten.
Geht das und wie heisst der Hyperlink dazu ?
...
07.12.2008 15:18:33
Thread-ID: 1030869
3 Beiträge
eMail-Adressen auf Syntax prüfen
Selter

Hallo,
kann ich in XLS auf einfache Weise eine Liste von Adressen auf Korrektheit hinsichlich Syntax prüfen?
In der Liste gibt es u.a. Umlaute etc.
Vielen Dank
Selter
17.02.2009 15:20:00
Thread-ID: 1051513
7 Beiträge
Anzeige
Datei-Namen ändern bei E-Mail-Versand aus Excel
Herbert

Hallo,
kann ich einen Datei-Namen ändern wenn ich sie aus Excel heraus per E-Mail versende und wenn ja wie bitte?
Vielen Dank im Voraus!
Herbert
09.05.2009 11:31:27
Thread-ID: 1074052
5 Beiträge
Email-Adresse automatisch
Tom

Hallo,
mit folgendem Makro wird die aktuelle Mappe per Email versandt.
Wie kann ich erreichen, dass in der Empfängerzeile (An) max.mustermann@musterfirma.de und im Betreff Ihr Auftrag steht
Sub Makro3() Application.Dialogs(xlDialogSendMail).Show End Sub Danke vorab
TOM
01.11.2009 17:30:03
Thread-ID: 1113673
3 Beiträge
Emailadresse auslesen
Tina

Guten Morgen,
in Zelle A1 steht:
achim.bode;achim.boede@vvv.de;
in B1 soll daraus
achim.boede@vvv.de
werden.
Wie geht das per Formel?
Lieben Dank
Gruss Tina
08.04.2010 07:31:20
Thread-ID: 1150565
9 Beiträge
Userform Textbox soll E-Mail Adresse anzeigen
Winfried

Hallo,
ich habe folgende Probleme: In einer Userform werden Adressen erfasst und in einer Tabelle gespeichtert. Die E-Mail Adressen werden nicht als Link erfasst, auf dem Tabellenblatt stehen sie auch nicht als Link. Wie muss ich den Code der Textbox ändern damit die E-Mail Adressen als Lin...
14.04.2010 17:39:26
Thread-ID: 1151809
4 Beiträge
E-Mail Adresse hat keinen Hyperlink VBA
andreas

Hallo zusammen,
ich habe hier einen kleinen Code, damit übertrage ich Werte aus einem Formular in eine externe Tabelle.
Wert in Textbox9 ist immer E-Mail Adresse.
Das auslesen funktioniert problemlos, nur hat die Mail-Adresse in der externen Tabelle den Hyperlink nicht.
Da muss...
09.06.2010 11:56:51
Thread-ID: 1161016
3 Beiträge
Anzeige

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
2
6
2
6
4
4
2
8
3
2
2
4
9
2
7
1
3
3
1
3
1
2
1
1
2