Live-Forum - Die aktuellen Beiträge
Datum
Titel
19.10.2025 15:24:14
VBA -Drucken nur, wenn ich mit bestimmtem WLAN verbunden bin
19.10.2025 10:48:58
Zufällige Uhrzeit
19.10.2025 10:46:18
Zufallszahlen nur wenn Datum ab kommenden Sonntag
17.10.2025 17:57:35
Zellen-Name aus A1 nach H1 übertragen mit Prä- + Suffix
Keine passende Antwort im Forumarchiv gefunden?
Stelle deine Frage im Live-Forum
Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
712to716
712to716
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Wie Variant trennen in Integer und Bruch?

Forumthread: Wie Variant trennen in Integer und Bruch?

Wie Variant trennen in Integer und Bruch?
04.01.2006 09:40:27
urs
Hallo zusammen
Gibt es einen Befehl in VBA der mir aus dem Wert 1,23456 die Werte Integer 1
und Bruch (oder wie nennt VBA das?) 0,23456 trennt?
Gruss urs
Anzeige

6
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Wie Variant trennen in Integer und Bruch?
04.01.2006 10:06:26
Andi
Hi,
das ginge so:
Dim ganzzahl As Integer
Dim bruch As Double
ganzzahl = Int(1.23456)
bruch = 1.23456 - Int(1.23456)
Schönen Gruß,
Andi
AW: Wie Variant trennen in Integer und Bruch?
04.01.2006 10:17:16
Manfred
Hallo Andi,
deine Lösung gefällt mich noch besser, als meine. ;o)
Gruss Manfred
Danke an Andy und Manfred
04.01.2006 10:42:33
urs
Hallo Miteinander
Was für ein Service!!!!
Danke für Eure Mithilfe. Die Lösung von Andy ist idealer für mich, da kann die Ganzzahl auch mehrstellig sein.
Vielen Dank
Urs
Anzeige
Gern geschehen... (ot)
04.01.2006 10:45:09
Andi
.
Danke an Andy und Manfred
04.01.2006 10:42:37
urs
Hallo Miteinander
Was für ein Service!!!!
Danke für Eure Mithilfe. Die Lösung von Andy ist idealer für mich, da kann die Ganzzahl auch mehrstellig sein.
Vielen Dank
Urs
AW: Wie Variant trennen in Integer und Bruch?
04.01.2006 10:06:59
Manfred
Hallo urs,
hier eine Variante, bei der der Wert in Zelle "A1" (1,23456) folgendermaßen geteilt wird: Zelle "B1" (1) und Zelle "C1" (0,23456)

Sub NachkommaTrennen()
Range("B1").Select
ActiveCell.FormulaR1C1 = "=LEFT(RC[-1],(SEARCH("","",RC[-1])-1))"
Range("C1").Select
ActiveCell.FormulaR1C1 = "=RC[-2]-RC[-1]"
Range("A1").Select
End Sub

Vielleicht hilft es dir weiter, bei deinem weiterem Vorgehen.
Gruss Manfred
Rückmeldung wäre nett
Anzeige
;

Beliebteste Forumthreads (12 Monate)

Jetzt das Excel-Portal bewerten: Deine Stimme zählt!
Anzeige
Anzeige
Entdecke mehr
Finde genau, was du suchst

Die erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden

Suche nach den besten Antworten
Unsere beliebtesten Threads

Entdecke unsere meistgeklickten Beiträge in der Google Suche

Top 100 Threads jetzt ansehen
Anzeige