Live-Forum - Die aktuellen Beiträge
Datum
Titel
28.09.2025 15:31:23
Listbox durchsuchen die über list array befüllt wurde
28.09.2025 15:25:50
Excel Zufall Dienstplan
27.09.2025 15:11:53
Probleme mit dem Autovervollständigen
27.09.2025 13:16:54
Mit VBA erstellter S.-Brief erzeugt mehr Briefe als Daten
Keine passende Antwort im Forumarchiv gefunden?
Stelle deine Frage im Live-Forum
Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
780to784
780to784
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Betreff aus Dateinamen

Forumthread: Betreff aus Dateinamen

Betreff aus Dateinamen
19.07.2006 19:12:58
Nico
Werte Expertengemeinde,
meine Exceltabellen heißen immer "irgendwas"-jahr-monat-tag. Jetzt möchte den Teil außer "irgendwas" an einer Stelle in der Tabelle automatisch einfügen.
Geht das ?
Viele Dank.
Nico
Anzeige

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

Betreff
Datum
Anwender
Anzeige
AW: Betreff aus Dateinamen
19.07.2006 19:20:38
ChrisL
Hallo Nico
Leider ist die Frage nicht sehr präzis. Geht es dir um Namen von "Mappen" oder von "Tabellen" (innerhalb einer Mappe)? Haben Jahr, Monat, Tag ein fixes Nummernformat z.B. JJJJ-MM-TT? Wo genau willst du die Ausgabe (z.B. Spalte A, der gerade aktiven Tabelle)? Falls von Mappen die Rede ist, braucht es eine Suche im Verzeichnis oder ist Mappe schon geöffnet?
Gruss
Chris
Anzeige
AW: Betreff aus Dateinamen
19.07.2006 19:52:18
Nico
HAllo Chris,
ich bin eine echt Schlafnase ... es geht mir eigentlich um Word ... häääää sehr peinlich. Ich weiss nicht wie ich auf Excel gekommen bin, entschuldige bitte. Aber vielleicht weißt Du das ja auch:
Meine Worddatei benenne ich manuell in "irgendwas"-jjjj-mm-tt, und ich möchte, dass beim Öffnen des Dokuments, dieser Wert in eine Textfeld geschrieben wird.
Sorry nochmals und Danke.
Nico
Anzeige
OT: Word
20.07.2006 08:53:30
ChrisL
Hallo Nico
Bitte löchere mich jetzt nicht mit Word fragen ;-)

Private Sub Document_Open()
Dim strName As String
strName = ThisDocument.Name
strName = Right(strName, Len(strName) - InStr(strName, "-"))
strName = Left(strName, InStr(strName, ".") - 1)
TextBox1 = strName
End Sub

Viel Spass
Chris
Anzeige
;

Beliebteste Forumthreads (12 Monate)

Jetzt das Excel-Portal bewerten: Deine Stimme zählt!
Anzeige
Anzeige
Entdecke mehr
Finde genau, was du suchst

Die erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden

Suche nach den besten Antworten
Unsere beliebtesten Threads

Entdecke unsere meistgeklickten Beiträge in der Google Suche

Top 100 Threads jetzt ansehen
Anzeige