VBA Fehelr
23.04.2009 14:05:21
Markus
mein makro gibt mir eine fehlermeldung zurück: Index außerhalb des gültigen Bereichs.
(Die erste Zeile wird gelb markiert. )
If ActiveWorkbook.Sheets("Befundung").Range("F5").Value = "" Then
ActiveWorkbook.Sheets("Befundung").Cells("F6").MergeArea.Copy
ThisWorkbook.Activate
ActiveCell.Select
Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
:=False, Transpose:=False
Application.CutCopyMode = False
ActiveSheet.Paste
Else
ActiveWorkbook.Activate
ActiveWorkbook.Sheets("Befundung").Cells("F5").Copy
ThisWorkbook.Activate
ActiveCell.Select
Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
:=False, Transpose:=False
Application.CutCopyMode = False
Ziel: Wenn keien Motornummer angegeben ist, dann soll die Fahrzeugnummer kopiert werden.
Kann es daran liegen, dass F5 eine verbundene Zelle ist? (als F5 = FGH 5)
...und wenn ja, gibt es eine Möglichkeit dieses Problem zu beheben`?
Danke gruß , M