Office: Zahlenformat von Zellen ändern

Hallo zusammen,
Ich versuch grad, in meiner Datei von einem bestimmten Zellbereich per VBA die Zahlenformate in den Zellen zu ändern.
Da der Bereich variabel ist, ist das leider n bisschen komplizierter.
Jetzt hab ich im Internet gesucht und bin auf den folgenden Code gekommen:
Code:

adr1, adr2 und adr sind als string definiert, berstart und berende als range. i ist der integer, mit dem die Spalte vorgegeben wird.
Laut Internet sollte das so klappen, aber bei mir formatiert er nur die erste und die letzte Zelle in dem angegebenen Bereich um.
Woran liegt das?
Gruß,
Patrick

:)

 

Hallo Patrick,

versuch es so: adr = adr1 & "," & adr2
mit einem Komma und nicht einem Doppelpunkt als Trennung

Gruß Peter

 

Hallo,
das funktioniert leider auch nicht. Da bekomm ich dann die Fehlermeldung Laufzeitfehler 1004 "Die Methode 'Range' für Objekt '_Global' ist fehlgeschlagen".
Gruß,
Patrick

 

Hallo Patrick,

ich habe eben dein Makroschnipsel vervollständigt und komme zu dem Ergebnis: Bei mir funktioniert es mit dem Doppelpunkt.

Code eingefügt mit

 

Hallo,
Komisch, genauso isses bei mir auch. Aber bei mir verändert er nach wie vor nur die Zelle in Zeile 3 und die in Zeile 12. Die dazwischen nicht.
Kann das an der Office-Version liegen? Ich hab Office 2007.
Gruß,
Patrick

 

Hallo Patrick,

laß Dir mal den Wert von adr ausgeben.

 

Hallo,
Ich hab mir jetzt den Wert per MsgBox ausgeben lassen: C3:C12.
Sollte doch eigentlich passen, oder?
Gruß,
Patrick

 

Jetzt ist mir noch was aufgefallen. Wenn ich nach der Formatierung per Makro bei den Zellen auf formatieren geh, ist das Format zwar auf benutzerdefiniert #,##0,00, aber wenn ich was in die Zelle einfüg wird es nicht in dem Format eingefügt.
Gruß,
Patrick

 

Moin, Paddy521,

mein Vorschlag:

Code:

 

Okay, danke. Jetzt hat´s funktioniert.
Grüße,
Patrick