Discussion:
Excel / VBA Formatierung Dezimalstellen
(zu alt für eine Antwort)
Hallo NG! Ich will in einem Makro berechnete Single-Werte auf einem Excel-Blatt ausgeben, dabei sollen die Werte mit 3 Nachkommastellen ausgegeben werden. Wenn ich mit Cells(a, b) = Format(z, "0. 000") die Werte formatiere und ausgebe, dann wird anstelle eines Dezimal- ein Tausendertrennzeichen ausgegeben. Habe schon so ziemlich alle Formatierungsmöglichkeiten mit 0, # oder einer Kombination getestet, bekomme aber keine 3 Nachkommastellen hin. Ist diese Formatierung nur über die Zellformatierung in Excel selbst möglich oder gibt es doch eine VBA Formatierung mit der das möglich ist? Excel / VBA Formatierung Dezimalstellen. Vielen Dank schon im voraus. Gruß Gilles Novic
hallo Gilles, wie wärs mit Round Cells(a, b) = Round(z, 3) oder NumberFormat Cells(a, b) = z Cells(a, b). NumberFormat = ("0. 000") Gruß stefan -----Originalnachricht----- Hallo NG! Ich will in einem Makro berechnete Single-Werte auf einem Excel-Blatt ausgeben, dabei sollen die Werte mit 3 Nachkommastellen ausgegeben werden.
Stattdessen können Sie den Zellwert auf eine Textzeichenfolge setzen. In VBA muss der gesamte Text in Anführungszeichen gesetzt werden:
Range("A2") = "Text"
Wenn Sie den Text nicht in Anführungszeichen setzen, nimmt VBA an, dass Sie eine Variable referenzieren…
Zellwert setzen – Variable
Sie können den Wert einer Zelle einer Variablen entnehmen
Dim strText as String
strText = "Zeichenfolge aus Text"
Range("A2") = strText
Zellwert abrufen
Sie können Zellenwerte mit der gleichen Eigenschaft Value abrufen, die wir oben verwendet haben. Den ActiveCell-Wert abrufen
So rufen Sie den ActiveCell-Wert ab und zeigen ihn in einem Meldungsfeld an:
MsgBox
Zellwert einer Variablen zuweisen
So rufen Sie einen Zellenwert ab und weisen ihn einer Variablen zu:
Dim var as Variant
var = Range("A1")
Hier haben wir eine Variable vom Typ Variant verwendet. VBA - So formatieren Sie das Datum - CHIP. Variant-Variablen können jeden Werttyp annehmen. Sie könnten stattdessen auch eine Variable vom Typ String verwenden:
Dim var as String
Ein Variablentyp vom Typ String akzeptiert numerische Werte, speichert diese jedoch als Text.
Format In Tabellenblatt Ndern Per Vba - - - Office-Loesung.De
Bin wie über jede Hilfe dankbar. Gruß Dennis
Betrifft: AW: Zellenformat per VBA ändern
von: Fred
Geschrieben am: 21. 2005 16:46:51
Hi,
wie übergibst du den Wert an die Zelle? mfg Fred
Geschrieben am: 21. 2005 17:20:20
Hallo Fred,
so wird er übergeben, ein paar Sachen habe ich rausgenommen, wie zurücksetzen der Optionbutton
Set frm = frmkek Sheets("KEK-Erfassung"). Activate Range("A65536")(xlUp)(1, 0) With frm =. (0, 1) = ption (0, 4) = IIf(OptionButton1, "X", " ") (0, 5) = IIf(OptionButton2, "X", " ") (0, 7) = IIf(OptionButton3, "X", " ") End With
Geschrieben am: 21. 2005 18:14:07
ActiveCell = CDbl(. TextBox1) (0, 1) = Cdate(. Label1)
von: Xelleron (Dennis)
Geschrieben am: 21. Format in Tabellenblatt ndern per VBA - - - Office-Loesung.de. 2005 20:54:33
habe das jetzt mal mit
(0, 1) = Cdate(. Label1)
z. B. im Timer 00:03 steht, dann schreibt er mir 12:03:00 AM in die Zelle. Es soll aber lediglich 00:03 in die Zelle geschrieben werden, aber so, daß man damit dann einen Mittelwert errechnen kann. In dem Format steht es auch wieder als Textformat drin.
Zellenformat via VBA ändern von Markus vom 13. 06. 2005 11:49:08
AW: Zellenformat via VBA ändern, Doppelt oT - von Hajo_Zi am 13. 2005 11:52:28
AW: Zellenformat via VBA ändern, Doppelt oT - von Markus am 13. 2005 13:17:43
AW: Zellenformat via VBA ändern, Doppelt oT - von Hajo_Zi am 13. 2005 13:20:02
AW: Zellenformat via VBA ändern - von Dieter am 13. 2005 12:27:43
AW: Zellenformat via VBA ändern - von Markus am 13. 2005 14:09:38
AW: Zellenformat via VBA ändern - von Hajo_Zi am 13. 2005 18:44:49
AW: Zellenformat via VBA ändern - von Markus am 13. 2005 13:31:08
AW: Zellenformat via VBA ändern - von Markus am 13. 2005 13:42:03
Betrifft: Zellenformat via VBA ändern
von: Markus
Geschrieben am: 13. 2005 11:49:08
Hallo zusammen,
ich muss immer auf Tabellenblatt x den eintrag in cell (a, b) ändern (wobei a und b sich ändern)
Das Format hier soll immer datum sein.. also mberFormat = "d/m/yyyy"
damit komm ich aber nicht weiter..
kann mir da jemand helfen? Danke
Markus
Betrifft: AW: Zellenformat via VBA ändern, Doppelt oT
von: Hajo_Zi
Geschrieben am: 13.
NumberFormat = "tt-mm-jjj" 'Dadurch wird das Datum auf "23-10-2019" End Sub geändert Wenn wir diesen Code ausführen, wird das Zahlenformat als " TT-MM-JJJ " auf die Zelle A1 angewendet. Ausgabe: Beispiel 2 In ähnlicher Weise habe ich auch andere Formatierungscodes für andere Zellen angewendet. Nachfolgend finden Sie den VBA-Code für Sie. Code: Sub Date_Format_Example2 () Range ("A1"). NumberFormat = "TT-MM-JJJ" Dies ändert das Datum in "23-10-2019" Bereich ("A2"). NumberFormat = "TT-MM-JJJ" 'Dadurch wird das Datum in den Bereich "Mi-10-2019" ("A3") geändert. NumberFormat = "TTT-MM-JJJ" "' Dadurch wird das Datum in den Bereich" Mittwoch-10-2019 "(" A4 ") geändert.. NumberFormat = "TT-MMM-JJJ" Dies ändert das Datum in den Bereich "23-Okt-2019" ("A5"). NumberFormat = "TT-MMM-JJJ" Dies ändert das Datum in "23-". Oktober-2019 "Bereich (" A6 "). NumberFormat =" TT-MM-JJ "Dies ändert das Datum in" 23-10-19 "Bereich (" A7 "). NumberFormat =" TTM MMM JJJJ "'Dies ändert das Datum auf "Mi Okt 2019 "Bereich (" A8 ").
Zellenformat per VBA auf "Text" einstellen
Autor
Nachricht
Adelhorst
Excel-Kenner mit VBA
Verfasst am: 15. Nov 2011, 20:43 Rufname:
Wohnort: Oberfranken
Version: Office 2003
Hallo Forum. Vielleicht hat jemand von euch eine Idee fr dieses Problem
Eine Tabelle wird ber den AutoFilter gefiltert. Die Filterkriterien werden ber VBA eingestellt. Code:
("A1"). AutoFilter Field:=3, _
Criteria1:="=*" & & "*", _
Operator:=xlAnd
Damit wird also der AutoFilter in Spalte3 auf "enthlt - " gesetzt. Dies funktioniert soweit gut. Nun habe ich einen Spalte, die ist auf "Text" formatiert. In dieser Spalte werden 5stellige Nummern eingetragen. Es sind dort 1 bis 3 solcher Nummer in einer einzelnen Zelle mglich. Die Nummern in der Zelle sind durch Komma getrennt. Nun habe ich das Problem, dass der AutoFilter in oben genannter Weise fr diese Spalte nicht anwendbar ist, da die Zellen in denen nur eine einzige Nummer steht vom AutoFilter ausgeblendet wird, obwohl diese Nummer das Kriterium enthlt!? Es scheint, da der AutoFilter in besagter Weise nur dann funktioniert, wenn der Zelleninhalt ein Textfragment enthlt, und der Zelleninhalt nicht ausschlielich numerischer Art ist.