Hallo,
ich bin Hobbyexcelbastler..... :-)
Ich habe folgenden Code der auch auf Doppelklick auf deklarierten Bereich funktioniert. Das Problem ist aber auserhalb des deklarierten Zellbereichs bekomme ich eine Fehlermeldung. Ich möchte aber das sich Excel bei einem Doppelklick auf Zellen auserhalb des deklrierten Bereichs normal verhält bzw. wenigstens die Fehlermeldung nicht erscheint.
Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
If Not Intersect(Range("P44:AI44", "P41:AI41"), Target) = "" Then
UserForm4.Show
Cancel = True
Else
Dim strText As String
strText = "Keine Daten zum ändern vorhanden!"
MsgBox strText, vbOKOnly + vbInformation
Cancel = True
Exit Sub
End If
End Sub
Ich danke schon mal für die Hilfe, glg
|