ich gebe mithilfe einer Userform Zahlen in eine Zelle ein:
Range("Tabelle1!V" & AZ).Value = CDbl(TextBox5.Value)
Allerdings werden die Zahlen stets mit zwei Dezimalstellen dargestellt, kann man hier noch eine Abfrage einbauen, welche dafür sorgt, dass nur Dezimalstellen angezeigt werden, wenn die Zahl auch welche hat. Folgende Formel habe ich bereits versucht, jedoch ohne Erfolg:
If InStr(Range("Tabelle1!V" & AZ).Value, ",") > 0 Then
Range("Tabelle1!V" & AZ).NumberFormat = "0.00"
Else
Range("Tabelle1!V" & AZ).NumberFormat = "0"
End If