VBA Fehler 9
thomas
warum wird ein Fehler 9 erzeugt wenn ich einer Zelle einen Wert zuweise? siehe nachfolgende Beispielcode.
Sub test()
Err.Clear
Cells(5, 7) = 4
if err.number = 9 then MsgBox "test"
End Sub
Wenn ich die If-Abfrage weglasse und anstelle anderen Code einfüge läuft Excel ganz normal weiter, ohne dass das Makro hängen bleibt. Ich kann hier im Direktbereich den Fehler abfragen und sehe, dass die Fehlernummer auf 9 gesetzt wird.
Sub test4()
Err.Clear
Cells(5, 7) = 4
MsgBox "Test"
'usw.
End Sub
Sub test5()
Err.Clear
Dim intAngabe As Integer
intAngabe = 40000
Cells(5, 7) = 4
MsgBox "Test"
'usw.
End Sub
Gruß aus Frankfurt (man glaubt es kaum die Sonne scheint)
Thomas
Anzeige