Live-Forum - Die aktuellen Beiträge
Datum
Titel
16.04.2024 23:30:16
Anzahl Jahre Zählen aus Datumreihe
16.04.2024 19:22:16
Von exceltabelle in word per steuerelement temarker
16.04.2024 18:50:53
Fehlermeldung bei Code - Excel speichern mit Bez. aus Zelle
16.04.2024 17:18:01
Projektplan-Tabelle oder Gantt ohne Balken
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
740to744
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
740to744
740to744
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Dateinamen auslesen ohne .xls Endung

Dateinamen auslesen ohne .xls Endung
05.03.2006 19:44:55
Nossi
Ich habe gleich noch ein Problem. Um die Antworten übersichtlicher zu gestalten eröffne ich diesen zweiten Thread.
Ich habe möchte eine Datei und dort ein bestimmtes Arbeitsblatt öffnen. Es handelt sich um mehrere verschiedene Dateien. Jetzt möchte ich ein bestimmtes Arbeitsblatt öffnen das genauso heißt wie die Datei (nur eben ohne .xls). Wie bekomme ich das hin ohne das ich alle 200 Dateien öffnen muss und dort dem Arbeitsblattnamen noch ein .xls anhängen muss?
Danke im vorraus und Gruß
Nossi

7
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Dateinamen auslesen ohne .xls Endung
05.03.2006 19:50:51
Ramses
Hallo
Dim tarSheet as String
tarSheet = "Tabelle1"
Workbooks.Opne "C:\Pfad\" & tarSheet & ".xls"
Worksheets(tarSheet).Select
Das ist das was ich verstanden habe,... bei deinem Geschreibsel bin ich mir allerdings nicht sicher ob das auch richtig ist :-)
Gruss Rainer
AW: Dateinamen auslesen ohne .xls Endung
05.03.2006 19:57:26
Nossi
Hrhr :P nagut.
Ich meinte das genau andersrum.
'Einlesen des Quelldateinamens
Dateiname = ActiveWorkbook.Name
'Aktivieren des richtigen Arbeitsblattes (=Dateiname)
Worksheets(Dateiname).Activate
Bis jetzt habe ich das so geschrieben. Nur muss jetzt der Worksheet Name genau gleich der Name der Datei sein (also "Tabelle123.xls") er ist aber nur "Tabelle123".
Wie bekomme ich jetzt den reinen Dateinamen.
Gruß
Nossi
Anzeige
AW: Dateinamen auslesen ohne .xls Endung
05.03.2006 20:04:46
Ramses
Hallo
Meinst du so ?
Worksheets(left(thisworkbook.name, len(thisworkbook.name)-4)).Activate
Gruss Rainer
AW: Dateinamen auslesen ohne .xls Endung
05.03.2006 20:13:34
Nossi
Ja, das sieht gut aus, er gibt mir aber dennoch noch einen Fehler aus.
"
Laufzeitfehler '9':
Index außerhalb des gültigen Bereichs
"
Gruß
Nossi
AW: Dateinamen auslesen ohne .xls Endung
05.03.2006 20:19:03
Reinhard
Hi Nossi,
dann gibts in Tabelle123.xls kein Blatt was exakt Tabelle123 heißt
Gruß
Reinhard
ps: Ich freue mich über eine Rückmeldung ob diese Antwort hilfreich war oder nicht..
AW: Dateinamen auslesen ohne .xls Endung
05.03.2006 20:24:37
Nossi
Hmm..
nein der Fehler lag woanders, wenn ich "ActiveWorkbook.Name" anstatt "ThisWorkbook.Name" schreibe funktioniert es. Bei "This..." nimmt er die Datei bei der ich beim ausführen des Makros bin, ich brauche aber nur die zur Zeit aktivierte.
Danke für eure Antworten :)
Gruß
Nossi
Anzeige
o.w.T.
05.03.2006 22:09:38
Geschlossen
...

74 Forumthreads zu ähnlichen Themen

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
Anzeige
Dateiname ohne Pfad
Mandy

Hallo
ich möchte eine Datei per Makro abspeichern:
Neuer_Dateiname = Application.GetSaveAsFilename(InitialFileName:=Dateiname, fileFilter:="Excel-Arbeitsmappe, *.xls")
Bei meinem Neuer_Dateiname wird aber immer der komplette Pfad angegeben, ich möchte aber nur den dateiname. Was ma...
03.11.2009 09:15:45
Thread-ID: 1113997
9 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
Dateinamen/Tabellenbla aus Dateipfad herausfiltern
Xetom

Hallo zusammen,
ich bin schon fast am verzweifeln. Ich versuche folgendes:
Ich möchte aus der Funktion ZELLE() den Dateinamen und das Tabellenblatt aus dem dateipfad ermitteln. Ich weiß, dazu gibt es schon viele Anleitungen. Allerdings greifen diese nicht bei meinem Problem.
Der Dat...
31.10.2013 16:08:24
Thread-ID: 1336700
6 Beiträge
VBA - pdf-Dateiname aus Zellenwert
Frank

Hallo,
bin neu hier und benötige Hilfe.
Bin schon Stunden an meinem Makro dran, es will mir nicht gelingen.
VBA-Kenntnisse sind NICHT vorhanden, das Untengeschriebene habe ich mir z.T. kopiert und so an mein Anliegen angepasst.
Ich möchte jedoch eine Änderung vornehme, die mir e...
28.01.2014 15:44:42
Thread-ID: 1347093
5 Beiträge
Dateinamen aus Pfad extrahieren
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
12.03.2014 13:15:34
Thread-ID: 1353226
10 Beiträge
Dateiname aus Pfad
Dirk

Hallo liebe Tüftler,
in Spalte C stehen Dateinamen mit kompletter Pfandangabe in Textform.
Sowohl die Anzahl der Unterverzeichnisse (also damit auch die "\") als auch die Dateinamenserweiterungen sind unterschiedlich (.csv, .xlsm ...).
Nun benötige ich in Spalte B nur den Dateinamen...
10.02.2015 21:15:35
Thread-ID: 1408518
4 Beiträge
VBA: Dateiname aus Zelle erstellen
Niko

Guten Abend,
ich habe mir in Excel 2010 ein Makro erstellt, das mir den Dateinamen aus einer bestimmten Zelle generiert:
Sub SaveAs() savedFile = Application.GetSaveAsFilename(InitialFileName:="N:\A\B\C\" & [C1050], fileFilter:=" _ Excel-Arbeitsmappe, *.xlsm") If savedFile "Falsch"...
30.09.2015 21:48:19
Thread-ID: 1450203
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
1
18
8
4
6
5
4
9
3
2
3
12
4
6
11
1
3
7
3
3
4
8
3
2
3