Thema Datum  Von Nutzer Rating
Antwort
Rot Excel VBA erkennt vermeintlichen String immer als Zahl
11.01.2016 14:05:22 SeamanX
Solved
11.01.2016 15:41:20 SeamanX
Solved

Ansicht des Beitrags:
Von:
SeamanX
Datum:
11.01.2016 14:05:22
Views:
1078
Rating: Antwort:
 Nein
Thema:
Excel VBA erkennt vermeintlichen String immer als Zahl

Hallo,

versuche aus einer Excel-Datei einen String auszulesen, der leider immer als Zahl interpretiert wird.

Code:
 

Sub auslesen()
    
    Workbooks.Open Filename:="C:\...\test.xls"
    
    Debug.Print Format(ActiveWorkbook.Worksheets(1).Cells(1, 1).Value, "&")
    Debug.Print CStr(ActiveWorkbook.Worksheets(1).Cells(1, 1).Value)
    Debug.Print ActiveWorkbook.Worksheets(1).Cells(1, 1).Value
                           
    ActiveWorkbook.Close savechanges:=False
            
End Sub



Die Excel-Datei ist leider keine richtige Excel-Datei, sondern eine Textdatei mit der "falschen" Dateiendung .xls in der der "String" 010.020 steht.
Als Debug Ausgabe des obigen Codes erhalte ich immer: 10,02

Wenn ein Buchstabe in dem String enthalten ist, besteht kein Problem und der komplette String bleibt unberührt.

Wie kann ich Excel dazu zwingen die eingelesenen Daten als unberührten String zu behandeln?
Tritt das Problem schon beim Befehl Workbooks.Open auf? Gibt es Alternativen oder weitere Parameter?

Ich habe das Problem abstrahiert. Der Original-Algorithmus behandelt eine vielzahl dieser "unechten" Excel-Dateien mit vielen Zeilen und Spalten, wobei die Spalten mit einem Tabstopp getrennt sind.
Eine Modifizierung dieser Dateien sollte daher nur als letztes Mittel in Betracht gezogen werden.
Versucht habe ich trotzdem, die Dateien in Excel unter einem richtigen Excel-Dateiformat abzuspeichern.
Wenn die Datei manuel geladen und gespeichert wird klappt dies auch. Bei der automatisierten Variante wandeln auch dort Excel wieder den String in eine Zahl um.

Bin für jede Hilfe dankbar!

Lieben Gruß


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 Excel VBA erkennt vermeintlichen String immer als Zahl
11.01.2016 14:05:22 SeamanX
Solved
11.01.2016 15:41:20 SeamanX
Solved