Hallo Forum!

Habe eine Tabelle, die ich über eine Userform initialisiere, also alle Felder ab
A12 lösche.
Leider ist das Format der Zellen dann Standart. Ich hätte gerne das Format Zahl (0,00) in den Feldern A12 bis E1000.

So sieht das Makro aus

Set Tb1 = Worksheets("tabelle1")

Tb1.Range("A12:E1000").Clear

aCell = Tb1.Cells(9, 1).Value
Tb1.Cells(aCell + 13, 1).Value = 0
Tb1.Cells(aCell + 13, 2).Value = 0
Tb1.Cells(aCell + 13, 3).Value = 0
Tb1.Cells(aCell + 13, 4).Value = 0
Tb1.Cells(aCell + 13, 5).Value = 0

End Sub

Wer kann helfen?

Danke Pete!