Nachkommastelle abschneiden in VBA
#1
Wie kann ich in VBA realisieren (bin neu was VBA angeht), dass alle Werte in einer Spalte nach der ersten Nachkommastelle abgeschnitten werden. Also nicht runden, sondern zum Beispiel 10,681 -> 10,6
Dies soll dann automatisch auf die gesamte Spalte übertragen werden
Top
#2
Hallo,

abschneiden oder abrunden auf 1 Stelle ergibt doch das selbe Ergebnis!

Also:  WorksheetFunction.RoundDown(Zahl, Stellen)

Sigi
Top
#3
Hallo,

wenn nicht gerundet werden soll, geht das mit einem benutzerdefiniertem Format. Dazu brauchst du kein VBA.
Viele Grüße
Klaus-Dieter
Der Erfolg hat viele Väter, 
der Misserfolg ist ein Waisenkind
Richard Cobden
Top
#4
Hi,

bei einem benutzerdefinierten Format wird gerundet und nicht gekürzt.

In VBA ginge auch das:

Int(cells(1,1)*10)/10
Gruß

Edgar

Meine Antworten sind freiwillig und ohne Gewähr!
Über Rückmeldungen würde ich mich freuen.
Top
#5
Hallo,


Zitat:bei einem benutzerdefinierten Format wird gerundet und nicht gekürzt.



Einspruch: es wird ein gerundeter Wert angezeigt, der ursprüngliche Zellwert wird aber nicht verändert. Da der Themenersteller keine Rundung wollte, gehe ich davon aus, dass er die alten Werte behalten möchte. Aber möglicherweise habe ich das falsch verstanden.
Viele Grüße
Klaus-Dieter
Der Erfolg hat viele Väter, 
der Misserfolg ist ein Waisenkind
Richard Cobden
Top
#6
Hallo,

aus 10,681 soll 10,6 werden (#1), geht nicht mit benutzerdef. Format.
Gruß

Edgar

Meine Antworten sind freiwillig und ohne Gewähr!
Über Rückmeldungen würde ich mich freuen.
Top
#7
   

Hab es mit einer einfach Funktion hinbekommen, die Nachkommastellen lassen sich beliebig erweitern, indem man den Exponenten der 10 anpasst.
Top
#8
Hallo,

dafür hast Du jetzt 2 Tage gebraucht?

Gruß Uwe
Top
#9
ja, ich habe mir erstmal mehrere Tutorials über VBA angeguckt und durchgelesen, da ich es vorher nie benutzt habe.
Top


Gehe zu:


Benutzer, die gerade dieses Thema anschauen: 2 Gast/Gäste