Computerwissenschaften

Konvertieren von Text in Zahlen mit VBA in Excel

 

Frage: Wie konvertiere ich mit Zeichennummern gefüllte Zellen in numerische Werte, damit ich die Werte in Excel-Mathematikformeln verwenden kann?

Ich musste kürzlich eine Spalte mit Zahlen in Excel hinzufügen, die aus einer Tabelle auf einer Webseite kopiert und eingefügt wurden. Da die Zahlen auf der Webseite durch Text dargestellt werden (dh die Zahl „10“ ist tatsächlich „Hex 3130“), führt eine Summenfunktion für die Spalte einfach zu einem Nullwert.

Sie können viele Webseiten (einschließlich Microsoft-Seiten) finden, die Ihnen einfach Ratschläge geben, die nicht funktionieren. Zum Beispiel diese Seite …

http://support.microsoft.com/kb/291047

… gibt Ihnen sieben Methoden. Die einzige Möglichkeit besteht darin, den Wert manuell erneut einzugeben. (Gee, danke, Microsoft. Daran hätte ich nie gedacht.) Die häufigste Lösung, die ich auf anderen Seiten gefunden habe, besteht darin, die Zellen zu kopieren und dann den Wert mit Paste Special einzufügen. Das funktioniert auch nicht. (Getestet in Excel 2003 und Excel 2007.)

Die Microsoft-Seite enthält ein VBA-Makro für die Ausführung des Jobs („Methode 6“):

 Sub Enter_Values() For Each xCell In SelectionxCell.Value=xCell.Value Next xCell
End Sub 

Es funktioniert auch nicht, aber alles, was Sie tun müssen, ist eine Änderung vorzunehmen und es funktioniert:

 For Each xCell In Selection xCell.Value=CDec(xCell.Value)
Next xCell 

Das ist kein Hexenwerk. Ich kann nicht verstehen, warum so viele Seiten falsch sind.

Similar Posts

Schreibe einen Kommentar

Deine E-Mail-Adresse wird nicht veröffentlicht. Erforderliche Felder sind mit * markiert.