Zahl mit 1000er Trennzeichen in Excel einfügen

zaeppi

Grünschnabel
Hallo Zusammen,

ich möchte per Makro in mehrere Zellen eine Zahl mit 1000er Trennzeichen einfügen.
Leider geschieht dies ohne Trennzeichen und wenn ich die Formatierung ändere, bekomme ich eine .0 nochmal drangehängt also statt 100.000 100000.0

Dim Zahl As Long
Zahl = 10000000
Worksheets(ABSATZPLAN).Cells(2, S_Q1).Value = Zahl

Wobei Zahl später ein Rückgabewert einer Funktion ist. Aber da geschieht das selbe

Ich hoffe ich bin nicht zu sehr auf dem Holzweg und ihr könnt mir helfen
Danke
 
Es sollte eigentlich so gehn:

Code:
Sub Makro1()

'
    Range("B2").Select
    Selection.NumberFormat = "#,##0.00"
End Sub

Gruss
 
Zurück