Makro bricht ungefragt ab bei Zellformatierungen
28.02.2019 13:17:48
Daniel
ich habe da ein ziemlich schräges Problem.
Will ich beispielsweise auf dem aktiven Blatt die Schriftgrösse auf 11 setzen mit:
ActiveSheet.Cells.Font.Size = 11
dann funktioniert das prima, solange irgendwo eine Zelle ist, welche NICHT Schriftgrösse 11 hat.
Sobald alle Zellen bereits Schriftgrösse 11 haben, bricht das Makro bei dieser Codezeile einfach ab (ohne Meldung oder Warnung). Dementsprechend werden die restlichen Codezeilen natürlich nicht ausgeführt.
Ich konnte es unterdessen für diverse Font-Formatierungen reproduzieren, allerdings betrifft es nur ein einzige Mappe. In einer neuen Arbeitsmappe funktioniert das Makro tadellos.
Habe ich beispielsweise folgenden Code:
With ActiveSheet.Cells
.Font.Size = 11
.VerticalAlignment = xlVAlignTop
.HorizontalAlignment = xlHAlignLeft
End With
Dann ist es natürlich lästig, wenn der Code bei der Font-Size einfach abbricht ohne Meldung und Warnung.
Kann sich jemand vorstellen, was ich in dieser Mappe verbockt habe?
Es gibt zwar einen einfachen Workaround: vor jeder Formatierung des ganzen Blattes einfach die Zelle A1 kurz umformatieren, sprich Arial 10 und zentriert. Nun weicht A1 von den restlichen Zellen ab und die Codezeilen klappen perfekt. Aber das kann's ja nicht sein, öh.
Herzlichen Dank und schöne Grüsse
Daniel