Blattregister

Sub NameInZelle()
Dim wb As Worksheet
For Each wb In Worksheets
wb.Range("A2").Value = wb.Name
Next wb
End Sub

Diese Makro führt dazu, das das was im Blattregister steht, nun in die Zelle A2 übertragen wird. Wenn ich jetzt aber das Blattregister z.B. auf 1.2; 2.2; 3.2 ändere und das gleiche Makro starte, zeigt es mir in Zelle A2 folgendes an. 1,2 und 2,2 und 3,2. Warum erscheint hier ein Komma und kein Punkt. Habe auch schon unter Format nachgeschaut und kann auch nichts daran ändern. Wer kann mir helfen?

Im Voraus besten Dank

Martin