Live-Forum - Die aktuellen Beiträge
Datum
Titel
25.04.2024 08:41:49
VBA: Probleme mit pdftk zum Zusammenfügen
25.04.2024 00:42:03
Listbox mit gefilterten Daten füllen
24.04.2024 20:38:58
Summe mit Bedingung, nur letzte Ergebnisse anzeigen
24.04.2024 19:29:30
Formel filter
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
1112to1116
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
1112to1116
1112to1116
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Zahlenformat in VBA

Zahlenformat in VBA
Rainer
Hallo! Ich stehe vor einem banalen Problem ud komme nicht weiter....Per VBA lese ich einen Zellwert aus, den ich später wieder 1:1 ausgehen will. Steht in der betreffenden Zelle der Wert '21', so wird auch '21'. zurückgemeldet. Ich möchte in diesem Falle jedoch '21.00', also mit 2 Dezimalstellen zurückbekommen. Die Rundungsfunktion liefert mit immer die Ganzzahl und geht nicht auf 2 Dezimalstellen ein....Wie kann ich sowas denn machen?
Danke für euer Feedback
Rainer

10
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Benutzer
Anzeige
AW: Zahlenformat in VBA
02.11.2009 12:19:29
Ingo
hallo rainer,
numberformat ="0.00"
mfG
Ingo Christiansen
AW: Zahlenformat in VBA
02.11.2009 12:27:24
Rainer
Hallo! danke für deine Rückmeldung...Wie lautet denn die Syntax hierzu? Mit Numberformat hatte ich rumprobiert, kam aber nicht zu rande..Ich habs so probiert.
betrag_nummer = Cells(x, 11).Value NumberFormat = "0.00"
und so
betrag_nummer = Cells(x, 11). NumberFormat = "0.00"
Danke für deine Rückinfo
AW: Zahlenformat in VBA
02.11.2009 12:34:22
Rudi
Hallo,
=format(cells(x,11),"0.00")
dann ist es aber ein Text und keine Zahl mehr.
Gruß
Rudi
Du musst natürlich die Zelle formatieren,...
02.11.2009 12:57:47
Luc:-?
...wenn der Wert in eine Zelle ausgegeben wird, Rainer,
bspw mit einer udFkt, das geht dann aber nicht mit Range(...).NumberFormat, weil eine Fkt so etwas nicht darf. Alternativ mit einer Subroutine ginge das, macht aber nur Sinn, wenn du wirklich Zellen füllen willst, was ja den Anschein hat. Das erfordert aber eine separate Anweisung, denn es ist eine eigene Eigenschaft des Range-Objekts. Das wird auch alles in der VBE-Hilfe erklärt, warum dann der „Blindflug"...?
Wenn du das anderweitig ausgeben willst, wäre Rudis Lösung angesagt! Und gerundet hast du hoffentlich (kann ich jetzt nicht sehen) mit Round-Arg2 = 2 (bei %Zahlen wären es stets 2 mehr)...
Gruß Luc :-?
PS: Du merkst sicher, dass du uns zu wenig Infos gegeben hast...!
Anzeige
Wert und Format einer Zelle
02.11.2009 14:32:49
Erich
Hi Rainer,
betrag_nummer dürfte der Name einer Variablen sein, wohl vom Typ Double.
Dann könnte das im Prinzip so gehen: 

Sub aa()
Dim betrag_nummer As Double
betrag_nummer = Cells(x, 11).Value
Cells(x + 1, 12).NumberFormat = "0.00"
Cells(x + 1, 12).Value = betrag_nummer
' oder besser
With Cells(x + 1, 12)
.NumberFormat = "0.00"
.Value = betrag_nummer
End With
End Sub
Die Zielzelle hat u. a. die beiden Eigenschaften Value (z. B. 0,5) und NumberFormat.
Der Wert 0,5 kann je nach NumberFormat als 0,5, 0,50, 5,00E-01, 1, 1/2, 50%, ... angezeigt werden.
Durch diese unterschiedlichen Formate ändert sich der Wert nicht.
Rückmeldung wäre nett! - Grüße von Erich aus Kamp-Lintfort
Anzeige
AW: Wert und Format einer Zelle
02.11.2009 14:52:31
Rainer
Hallo! Vielen Dank für die Rückmeldung. Leider ändert das mein Problem nicht.....In der entsprechenden Zelle habe ich damit nur die Wertedarstellung geändert, jedoch nicht den Zellwert selbst. Den Zellwert verschicke ich später in einem Mail und da hätte ich gerne '21.00' anstelle von '21' angezeigt...
Gruß
Rainer
Rückfrage
02.11.2009 15:20:43
Erich
Hi,
"Den Zellwert verschicke ich später in einem Mail "
Wie tust du das? Hier wäre wohl die Stelle zum Eingreifen.
Rückmeldung wäre nett! - Grüße von Erich aus Kamp-Lintfort
AW: Rückfrage
02.11.2009 15:33:43
Rainer
Hallo! Ich lese den Zellwert über eine Schleife mittele cells(x,11).value aus und schreiben den in eien Variable. Diese Variable hat aber bei ganzzahligen Werten keine Dezimalen so wie ich es gerne hätte....
Anzeige
eine Variable hat kein Format
02.11.2009 17:49:30
Erich
Hi Rainer,
meine Frage war: "Den Zellwert verschicke ich später in einem Mail." Wie tust du das?
Auf die Frage hast du gar nicht geantwortet. Tust du das noch?
Ich hatte auch geschrieben: "Hier wäre wohl die Stelle zum Eingreifen."
Zu deinem letzten Beitrag:
"Diese Variable hat aber bei ganzzahligen Werten keine Dezimalen"
Eine Variable hat keine Dezimalen. Sie hat überhaupt kein Format, nur einen Wert.
Eine Zelle dagegen hat sowohl Wert als auch (Number)Format.
Davon hatte ich auch schon mal geschrieben.
Also noch mal:
Wie kommt bei dir der Wert der Variablen in die Mail?

Rückmeldung wäre nett! - Grüße von Erich aus Kamp-Lintfort
Anzeige
Ach Erich, ob er das begreift...? owehT
02.11.2009 21:25:28
Luc:-?
Gr... Luc :-?

30 Forumthreads zu ähnlichen Themen

Formatieren als Zahl/Währung im VBA
Nadine

Hallo,
ich habe jetzt folgende Formel im VBA erfasst;
Private Sub FldKurs_Exit(ByVal Cancel As MSForms.ReturnBoolean) If Not IsDate(FldKurs) Then FldKurs = "" Else FldKurs = Format(FldKurs, "#,##0.00 $") End If End Sub
Diese soll bezwecken, dass in einem Textfeld nur eine Zahl st...
20.08.2008 14:28:00
Thread-ID: 1003209
2 Beiträge
Anzeige
Letzte Stelle einer Zahl mittels VBA in 0 umwand.
Josef

Guten Morgen!
Ich habe in der Spalte A in einem Arbeitsblatt eine Menge siebenstelliger Zahlen, am Schluß mit einer Prüfziffer versehen, stehen. Ich möchte nun, wenn möglich, mittels VBA immer die letzte Zahl in eine 0 umwandeln.
Wie würde hier bitte eine VBA Lösung lauten?
Danke
10.04.2009 06:26:04
Thread-ID: 1068138
12 Beiträge
per VBA Teile einer Zelle formatieren
Steinritz

Hallo!
Ich habe folgendes Problem:
Habe in Excel mit der VERKETTEN Funktion 4 Zellen verkettet.
Im Ergebnis z.B.
Nach Abzug der Gebühr in Höhe von 10,- € ergibt sich ein Gesamtbetrag von 200,- €.
Jetzt möchte ich in dieser Zelle nur den letzen Zahlenwert mit dem Währungssymb...
10.09.2009 18:45:11
Thread-ID: 1101849
3 Beiträge
Anzeige
Vba zellen mit bestimmten Inhalt formatieren
thomas

Hallo Leute
Ich würde gerne bestimmte Zellen per VBA so formatieren, dass bei einem bestimmten Inhalt ein Zellbereich mit einer Dicken Linie oben bzw. unten formatiert wird.
Ich habe eine Excel-Datei in der per Makro 2 Zeilen mit den Wörtern "Zwischensumme" und "Übertrag" an jedem Seit...
05.09.2011 07:33:20
Thread-ID: 1228619
3 Beiträge
VBA-Makro Zellen formatieren
Huber

Hallo zusammen
Bin zur Zeit an einem komplexeren Excel und komme nicht mehr weiter. Hoffe jemand kann mir helfen.
Ich hab ein Personalcontrolling und somit immer Zahlen von Januar bis Dezember.
In jedem Register habe ich also z.B. Bezeichnung, Jan 2011, Feb 2011, März 2011 ... und d...
16.12.2011 15:10:52
Thread-ID: 1242273
4 Beiträge
mit VBA Zahl umformatieren..
jens Böhnisch

Hi,ich muss eine Zahl umformatieren.
Ursprung ist z.b. 0,23 soll werden 00000023
23,25 soll werden 00002325
also 8 Stellen, wobei die letzten beiden die kommastellen sind.
Habs schon in Excel mit formel, ist aber noch unbefriedigend.Gruss jens
26.06.2002 14:28:25
Thread-ID: 131564
5 Beiträge
VBA Zelle formatieren
Jürgen

Guten Morgen alle zusammen,
das folgende Makro funktioniert wunderbar,
ich würde es gerne um einen Arbeitschritt erweitern,
in dem das Makro in die letzte Zeile mit Text spring (das macht es schon) und dann in der ZELLE zwischen den Zeichen "[" und "]", alles was dazwischen steht i...
12.09.2013 07:44:05
Thread-ID: 1330425
3 Beiträge
VBA Formatierung Zahlen mit Sonderzeichen
Fabian

Hallo zusammen. Hab mir soeben einen halben tag um die Ohren geschlagen mit folgendem Problem:
Ich habe rund 2.000 Zahlenfolgen in einer Exceldatei geliefert bekommen. Diese sind am Stück weg geschrieben ohne jegliche Trennung. Bevor ich nun jede Zahlenfolge einzeln anpacke möchte ich ein M...
29.10.2013 16:51:48
Thread-ID: 1336367
22 Beiträge
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Jetzt das Excel-Portal bewerten: Deine Stimme zählt!

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige
Archiv - Verwandte Themen
Forumthread
Beiträge
1
5
11
2
17
2
3
4
2
21
1
5
7
2
2
3
2
7
1
8
4
3
6
2
7