Frage von pp2Paul, 135

Letzte Ziffer einer Zahl ermitteln?

Ich möchte die letzte Ziffer einer Zahl in einer Zelle ermittel! z.B. 123456789. In dem Bsp. die 9. Dafür brauche ich einen VBA Code.

Expertenantwort
von Ninombre, Community-Experte für Excel, 135

i = Right(Cells(1, 1).Value, 1)

Das wäre die Umsetzung der Formel, die Jackie251 schon genannt hat, für VBA. Das i ist jetzt nur eine Beispielvariable

Kommentar von Jackie251 ,

super, das VBA hatte überlesen :-D

Antwort
von Girschdien, 131

Wenn die Ziffer im Feld A1 steht, ist dies die Formel (braucht kein VBA)

= A1-PRODUKT(QUOTIENT(A1;10);10)

(auch wenn das auf den ersten Blick sinnlos erscheint, aber QUOTIENT gibt nur das ganzzahlige Ergebnis einer Division zurück, schneidet also alles hinter dem Komma ab)

Kommentar von Girschdien ,

Ich sehe schon, ich denke zu kompliziert (und kenne nicht alle Funktionalitäten von Excel)

Kommentar von PWolff ,

Äquivalent:

= REST(A1;10)

Antwort
von Jackie251, 108

Das geht sehr einfach mittels

=RECHTS(A1;1)*1
Expertenantwort
von Suboptimierer, Community-Experte für Excel, 69

Um Typcasting zu vermeiden und da die Restfunktion von VBA noch nicht vorgestellt wurde, schlage ich vor:

Excel:

=REST(A1;10)

VBA:

  Range("B1").Value = Range("A1").Value Mod 10
Kommentar von Jackie251 ,

die Idee mir Rest ist auch sehr schön

Antwort
von geri3d, 71

Die Frage wurde ja schon beantwortet ohne VBA, hier noch eine Anwort wie es im VBA Code aussieht. ( vom Prinzip her das selbe )

Sub Tues()
MsgBox Right(Cells(1, 1), 1)
End Sub

Keine passende Antwort gefunden?

Fragen Sie die Community

Weitere Fragen mit Antworten