Excel 2003 Problem...?
Jens
lange Zeit lief dieser Code unter Excel 2000 ohne Probleme!
In meiner Firma wurde jetzt alles auf Excel 2003 umgestellt
und nun bekomme ich immer nen Laufzeitfehler und dies hier [AB28:AB35].Font.ColorIndex = xlAutomatic
ist im Debugger gelb unterlegt!
Was kann / muß ich hier ändern!
Bin für jede Hilfe sehr Dankbar
Gruß
Jens
Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
Cancel = True
If Not Intersect(Target, [AB28:AB35]) Is Nothing Then
[AB28:AB35].Font.ColorIndex = xlAutomatic
var = Target
Target.Font.ColorIndex = 3
Exit Sub
End If
Target = var
End Sub
Anzeige