Thema Datum  Von Nutzer Rating
Antwort
Rot Dateiname auslesen & Endung entfernen
 06.06.2017 16:10:24 student
NotSolved
06.06.2017 16:38:09 The_Materialist
NotSolved
08.06.2017 15:00:48 RPP63
NotSolved

Ansicht des Beitrags:
Von:
student		 Datum:
06.06.2017 16:10:24		 Views:
1106		 Rating:
     
Antwort:
  Ja
Thema:
Dateiname auslesen & Endung entfernen

Hallo Leute,
 

Wie lässt sich der Dateiname des aktuellen Worksheets Ohne Endung in eine Zelle Schreiben?
Habe mehrere Ansätze versucht, aber es scheitert immer an eine Kleinigkeit:
Es muss doch eine ganz simple Lösung geben, aber ich komme gerade nicht drauf.... Jemand eine alternative Idee?

---------------------------

Mölichkeit1: (...macht irgendwie garnix)

 

With ActiveWorkbook
    NameOhneXLSM = Left(.Name, Len(.Name) - 5)
    Debug.Print ActiveSheet.Range("A10").Value   
End With

--------------------------

Möglichkeit2: (Error)

 

.Cells(1, 1).Formula = TEIL(ZELLE("Dateiname";A1);FINDEN("[";ZELLE("Dateiname";A1))+1;FINDEN("]";ZELLE("Dateiname";A1))-FINDEN("[";ZELLE("Dateiname";A1))-6)

 

 



 

 

 

Ihre Antwort
  • Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
  • Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
  • Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
  • Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
  • Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei Antworten auf Ihren Beitrag zu benachrichtigen
Thema: Name: Email:



  • Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
  • Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
  • Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
  • Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
  • Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei Antworten auf Ihren Beitrag zu benachrichtigen

Thema Datum  Von Nutzer Rating
Antwort
Rot Dateiname auslesen & Endung entfernen
 06.06.2017 16:10:24 student
NotSolved
06.06.2017 16:38:09 The_Materialist
NotSolved
08.06.2017 15:00:48 RPP63
NotSolved