mit dem folgenden Code im Modul der "Tabelle1" wird nach Doppelklick auf eine Zelle im Bereich C9:C16 der Zellwert in die Zelle M1 der Tabelle "Test" eingetragen und diese Tabelle aktiviert.
Ich möchte nun erreichen, dass dies nur geschieht, wenn in der Zellwert in Zelle T14 der "Tabelle1" = 1 ist.
Ist dies nicht der Fall, soll der Eintrag des Wertes in die Zelle M1 der Tabelle1 sowie die Aktivierung der Tabelle Test unterbleiben und stattdessen folgender Hinweis erscheinen: "Sie haben keine Teilnahmeberechtigung".
Vielen Dank für eure Unterstützung.
Mfg
Fritz
Der Code im Modul von Tabelle1 lautet:
Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
If Target.Count = 1 And Not (Intersect(Target, Range("C9:C16")) Is Nothing) Then
Worksheets("test").Range("M1").Value = Target
Worksheets("test").Activate
Worksheets("test").Range("M1").Select
End If
End Sub