selection.numberformat sehr launisch
05.04.2006 15:34:33
Franz
Benutzte folgende Routine via Call Befehl:
Sub Nuller_in_letzter_Summierungszeile_anzeigen()
'Die Formatierung "#.##0,00 ;[Rot]-#.##0,00 ; " unterdrückt die Anzeige der NULL-Zahl
'und wird in der letzten Zeile wieder rückgängig gemacht
Dim lgLastRow As Long
Dim intS As Integer
Range("A3").Select
lgLastRow = ActiveSheet.UsedRange.Rows.Count
For intS = 26 To 34
Cells(lgLastRow, intS).NumberFormat = "#.##0,00 ;[rot]-#.##0,00 " 'Hinweis: "red" fehlerhaft!
Next
End Sub
Dieser Call-Befehl scheitert in der Schleife mit dem Fehler 1004 ("Eigenschaft kann nicht festgelegt werden").
Manuell gestartet (per F5-Taste) jedoch funktionniert die Formatierung. Im Archiv scheint das Problem bekannt zu sein, aber es hilft mir nicht weiter. Warum diese Instabilität? Ist ein Umschreiben eventuell sinnvoll? Wenn ja wie? Kann euch die aufrufende Routine leider nicht posten.
mfG
Franz D.