Office: Dezimalzahl von TextBox in Zelle

Hallo zusammen,

ich habe folgendes Problem. Ich gebe über eine TextBox eine Zahl mit Nachkommastellen ein (max. 2 Stellen) und diese soll anschließend in eine bestimmte Zelle eingetragen werden. Problem ist, dass die übertragene Zahl von Excel als Text erkannt wird.
Ich benötige die übertragenen Werte aber, um damit anschließend weiter rechnen zu können. Erkennt Excel den übertragenen Wert nicht als Zahl an, funktioniert meine Formel natürlich nicht.

Selbstverständlich habe ich schon ein bisschen recherchiert und folgenden Code "zusammen gebastelt", welcher aber leider nicht funktioniert, da mir der Fehler "Typen unverträglich" ausgibt.

Code:

Vielleicht kann mir ja jemand erklären, was ich falsch mache?! Danke schon mal im Voraus!

VG

:)

 

Ich baue keine Datei nach. Die Zeit hat schon jemand investiert.

Ein Nachbau sieht meist anders aus als das Original.

Der Name einer hochgeladenen Mappe wird im Beitrag automatisch angezeigt, sodass es bei Verwendung von aussagekräftigen Namen leichter fällt, sie später im Ablageordner wiederzufinden und sie gedanklich einem bestimmten Thema zuzuordnen. Namen wie Test, Mappe, Beispiel usw. sind so allgemein, dass eine Zuordnung zu einem Thema unmöglich gemacht wird.

 

Hätte zwar jetzt nicht gedacht, dass dafür eine Datei notwendig ist, da ich denke, dass das ein Syntaxfehler meinerseits ist, aber anbei gerne die Datei.

 

Hallo,

versuche die Zeile

Cells(4, 5) = TextBox16.Value

zu ersetzen durch:

Cells(4, 5) = cdbl(TextBox16.Value)

oder

Cells(4, 5) = TextBox16.Value * 1

mfg

 

Hallo,

danke für die Antwort, aber es geht speziell um folgende Zeile:
Code:

Zuvor weise ich einer Zelle nur einen Text aus TextBox16 zu, das hat mit der eigentlichen Sache nichts zu tun.

 

bei mir wird ein numerischer Wert eingétragen. ich habe es nur für die erste Textbox getestet.
Ich hätte den Code ja anders geschrieben.
Code:

solche Sache kann man nur am Beispiel feststellen.

 

Ich danke dir!!!

Hätte nicht gedacht, dass ich den eingegebenen Wert einfach nur auf Zahlenwert überprüfen muss. Jetzt klappt es auch einwandfrei.

 

um dem Teil ging es nicht. Es ging darum das keine Zahl in die Zelle geschrieben wird.
Das mit Isnumeric() war nur ein Zusatz.
Du siehst aber es ist wichtig seine Aufgabe korrekt zu beschreiben.