Geschrieben am: 08. 2017 15:34:30
um meine Zeile anzupassen muss man nicht unbedingt der VBA-Profi sein. Cells(Last, 4) = CDbl()
Geschrieben am: 08. 2017 15:41:08
Vielen Dank,
wäre ich nie drauf gekommen. von: Bernd
Geschrieben am: 08. 2017 15:19:08
Servus,
multipliziere den Wert aus der Combobox bei der Eintragung in der Tabelle mit dem Wert 1, damit sollte aus dem Text automatisch wieder ein Zahlenformat entstehen. Grüße, Bernd
Excel-Beispiele zum Thema "In VBA Text in Zahl Excel umwandeln"
Abkürzungen umwandeln
URLs eines ausgewählten Bereiches in HyperLinks umwandeln
Textstring in berechenbare Formel umwandeln
Als Text vorhandene Werte in Zahlen umwandeln
Zeichen in Zeichenfolgen umwandeln und Leerzeichen entfernen
TextBox-Eingaben im Format TTMMJJ in gültiges Datum umwandeln
5-Längen-Zeichenfolgen in Zeit mit Format mss, 00 umwandeln
Zeichenfolgen über Doppelklick in externen Bezug umwandeln. Alle "u" bis zum aktuellen Datum in "U" umwandeln
Strings, die wie Zahlen aussehen, in Zahlen umwandeln
Alle externen Links löschen und in Werte umwandeln
Email-Adressen in Hyperlinks umwandeln
Bereichsnamen in Namenn ohne Umlaute umwandeln
Umwandeln von Zeichenfolgen in Währung
Zeichenfolgen in Industriezeiten umwandeln
Werte aus Textdatei importieren und umwandeln
Vba Text In Zahl Umwandeln In Word
Gibt es eine Möglichkeit, alle Zellen, bis zur letzten Zeile, in welcher sich ein Wert befindet mit Hilfe eines VBA-Codes in eine Zahl umzuwandeln? Die Tabelle ist von der Spalte A bis zur Spalte Y gefüllt und unterschiedlich lang. Es müssten also immer die Werte ab Zeile 2 bis zur letzten Zeile umgewandelt werden. Vielen Dank schon mal im voraus. Mfg Rudi
Betrifft: AW: vba text in zahl umwandeln
Geschrieben am: 12. 2014 10:18:57
Hallo JörgB,
danke für deine Antwort. Die Variante ohne VBA ist mir bekannt und funktioniert auch einwandfrei. Meiner Meinung nach macht es aber aufgrund der ständigen Erweiterung wenig Sinn, die Umwandlung manuell durchzuführen. Zur Ermittlung der letzten Zeile: In meiner Tabelle haben alle Spalten die gleiche Anzahl an Zeilen. Es wäre super, wenn es eine kombinierte Lösung hierzu geben würde. Grüße Rudi
von: hary
Geschrieben am: 12. 2014 10:41:57
Moin
Einach: Text in Spalten nutzen. Kannst du aufzeichnen. gruss hary
Geschrieben am: 12. 2014 12:50:06
ok, diese Idee funktioniert immer nur für eine Spalte.
Text In Zahl Umwandeln Vba
Geschrieben am: 12. 2014 13:44:20
Und wie sieht es hiermit aus? Blattname anpassen. With Worksheets("Tabelle1")("A2:Y" & Worksheets("Tabelle1")(, 1)(xlUp) _). NumberFormat = "General"
=
End With
Geschrieben am: 12. 2014 14:38:03
Hallo Hary,
Danke, deine Lösung funktioniert fast perfekt. Den Zelleninhalt 44, 9833 wandelt der Code beispielsweise problemlos in eine Zahl um, den Zelleninhalt 0, 0051 jedoch nicht. An was könnte das liegen? Gruß Rudi
Geschrieben am: 12. 2014 14:55:22
Keine Ahnung was in den Zellen wirklich steht. Bei der uebertragung von SAP koennen andere Zeichen mitkopiert werden. Teste die Zelle mit Laengeformel:
Tabelle1 A B 1 0, 0051 6 verwendete Formeln Zelle Formel Bereich R1C1 für Add In B1 =LÄNGE(A1) =LEN(RC[-1]) XHTML-Tabelle zur Darstellung in Foren, einschl. der neuen Funktionen ab Version 2007 Add-In-Version 14. 02 einschl 64 Bit
Oder lad mal eine Bsp. -mappe hoch. Braucht nur die Textzahlen. Geschrieben am: 12. 2014 15:23:52
Hier mal eine Testdatei
Betrifft: AW: am einfachsten mit TEXT IN SPALTEN
von: Daniel
Geschrieben am: 12.
Vba Text In Zahl Umwandeln Google
Code:
Sub Wandeln()
Columns("A:A"). TextToColumns Destination:=Range("B1"), DataType:=xlFixedWidth, _
FieldInfo:=Array(Array(0, 9), Array(2, 1)), TrailingMinusNumbers:=True
Gru Jrgen
_________________ Freue mich ber eine kurze Rckmeldung. eller
Verfasst am: 31. Jul 2011, 22:26 Rufname:
Hallo
Sub Wert2()
("B1:B25000"). FormulaR1C1 = "=RIGHT(RC[-1], 4)"
("B1:B25000") = ("B1:B25000")
Gru
Verfasst am: 01. Aug 2011, 08:31 Rufname: Thom
Grezi Jrgen
Jrgen_H hat folgendes geschrieben:
Hmmm, dann wird aber der gesamte Inhalt der Spalte A in Spalte B wiedergegeben und nicht bloss die letzten 4 Zeichen....? Steht dann nicht auch Text in den Zellen? IMO muss zumindest die Umwandlung ins Standard- oder Zahlenformat irgendwann erfolgen, damit das Ganze zuverlssig klappt. MarcR
Scrub
Verfasst am: 01. Aug 2011, 08:58 Rufname: Marc
So hab ich das gemacht:
Code: With Sheets("Zwischenablage")("B:B") 'hier den Bereich anpassen. NumberFormat = "General" 'oder was halt gewnscht ist
Verfasst am: 01.
Discussion:
Als Text gespeicherte Zahl in Zahl umwandeln
(zu alt für eine Antwort)
Hallihallo! Eine Frage: Wie kann ich aus VBA heraus eine in einer Zelle als Text gespeicherte Zahl in eine Zahl umwandeln? Bin für jede Hilfe dankbar und sage schon mal danke. LG Jürgen
Grüezi Jürgen Post by Jürgen Fluch Eine Frage: Wie kann ich aus VBA heraus eine in einer Zelle als Text gespeicherte Zahl in eine Zahl umwandeln? Bin für jede Hilfe dankbar und sage schon mal danke. Ich habe mir zu diesem Zweck ein kleines Makro erstellt und auf einen Button in einer eigenen Symbolleiste gelegt: Sub TextSpalten_ins_Zahlenformat() 'Wandelt als Text vorliegende Zahlenwerte in 'echte' Zahlen um 'Spaltenbereich markieren (auch zu viele) und starten Dim Spalte As Range On Error Resume Next For Each Spalte In lumns Columns(). NumberFormat = "General" Columns(). TextToColumns Next End Sub Verwende davon, was Du möchtest. -- Mit freundlichen Grüssen Thomas Ramel - MVP für Microsoft-Excel - [Win 2000Pro SP-4 / xl2000 SP-3]
Grüezi Jürgen nochmals Post by Thomas Ramel Ich habe mir zu diesem Zweck ein kleines Makro erstellt und auf einen [Code gesnippt] Post by Thomas Ramel Verwende davon, was Du möchtest.