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

Ansicht des Beitrags:
Von:
The_Materialist		 Datum:
06.06.2017 16:38:09		 Views:
564		 Rating:
     
Antwort:
  Ja
Thema:
Dateiname auslesen & Endung entfernen

Hallo Padawan,

Dein Problem ist nicht der Name der Datei sondern die Zuweisung in eine Zelle.

Du schreibst folgendes:

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

Versuche aber die manchmal nützlichen Ausdrücke "ActiveSheet", "ActiveWorkbook", "Select" und "Activate" zu vermeiden. Sie führen oft zu Fehlern und sind eigentlich nicht nötig. Du kannst eine Variable "Cell" definieren vom Typ Range und dann die Zelle manipulieren also so:

Dim Cell as Range

Set Cell = Workbook("Name").Worksheet("Name").Range("A10")

Cell.value= WERT

 

möge der Code mit dir sein.

 

 

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
06.06.2017 16:10:24 student
NotSolved
Blau Dateiname auslesen & Endung entfernen
 06.06.2017 16:38:09 The_Materialist
NotSolved
08.06.2017 15:00:48 RPP63
NotSolved