Laufzeitfehler '449', Argument ist nicht optional
20.09.2004 15:55:47
Joerg
ich versuche aus einem Dropdown Menü verschiedenen Module laufen zu lassen, jenachdem welche Option im Dropdown Menü ich anklicke, läuft ein anderes Modul ab.
Private Sub Worksheet_Change(ByVal Target As Range)
Range("A2:A16").Font.ColorIndex = 2
If Target.Address <> "$A$6" Then Exit Sub
Run Target.Value
End Sub
Die folgenden Subs stehen in Module.
Wenn folgendes Sub aufgerufen wird funktioniert das auch einwandfrei.
Sub Inhalt_löschen()
MsgBox "Ich bin Inhalt_löschen"
End Sub
Doch bei dem folgendem Modul erhalte ich immer die Fehlermeldung : Laufzeitfehler '449', Argument ist nicht optional
Sub Inhalt_einfügen(ByVal Target As Range)
MsgBox "Ich bin Inhalt_einfügen"
' If Target.Count > 1 Then Exit Sub
If Target.Column = 1 Then
Range(Cells(Target.Row, 3), Cells(Target.Row, 8)).PasteSpecial Paste:=xlPasteValues
End If
End Sub
Wer kann mir weiterhelfen ?
Danke Joerg