Live-Forum - Die aktuellen Beiträge
Anzeige
Archiv - Navigation
360to364
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
360to364
360to364
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Inhaltsverzeichnis

Dateinamen anzeigen

Dateinamen anzeigen
09.01.2004 16:00:16
veltrup
Hallo Computerfreaks,
ich hoffe ihr könnt mir bei folgendem Problem helfen:
Ich muß auf dem Tabellenblatt den Namen der Datei ohne Endung abspeichern.
Wie mach ich das ???
Bitte helft mir
Danke

4
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Dateinamen anzeigen
09.01.2004 16:05:45
Bertram
Hallo,
Probier's mal so:


Sub Dateiname()
[A3] = Mid(Application.ActiveWorkbook.Name, 1, Len(Application.ActiveWorkbook.Name) - 4)
End Sub

     Code eingefügt mit Syntaxhighlighter 2.5

Gruß
Bertram
Anzeige
AW: Dateinamen anzeigen
09.01.2004 16:14:05
veltrup
und wie kann ich das Modul so programieren das es bei jeder Speicherung den Name neun einfügt
AW: Dateinamen anzeigen
09.01.2004 16:17:28
Bertram
Schreibe den Code in das Workbook_BeforeClose-Ereignis
AW: Dateinamen anzeigen
09.01.2004 17:06:12
Hajo_Zi
Hallo Veltrup
oder mache es ohne VBA, schaue mal auf meine Homepage da ist ein Beispiel, auf der Seite ohne VBA http://home.media-n.de/ziplies/gepackt/ohne_vba/dateiname_%20in_zelle.zip.

Falls Code vorhanden wurde dieser getestet unter Betriebssystem XP Pro und Excel Version XP SBE.
Bitte keine Mail, Probleme sollten im Forum gelöst werden.
Microsoft MVP für Excel
Das Forum lebt auch von den Rückmeldungen.
Betriebssystem XP Pro und Excel Version XP Pro


Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige