Excel VBA DoubleClick

Question

Ich arbeite an einem Arbeitsprojekt, wo ich ein Excel-Blatt mit Werten habe, die rot werden, wenn sie außerhalb der Spezifikation sind. Was ich tun möchte, ist in der Lage zu sein, auf eine Zelle doppelt zu klicken und das Blatt in meiner Arbeitsmappe Pop-up zu haben, das Trenddaten darauf hat. Ich habe das Blatt bereits mit der Grafik darauf erstellt. Lange Rede, kurzer Sinn, ich möchte in der Lage sein, auf eine bestimmte Zelle doppelzuklicken und das entsprechende Blatt zu öffnen.

Ich habe diesen Code ausprobiert, und es wird nicht funktionieren. Kann jemand vielleicht Code von Grund auf schreiben oder den Code ändern, damit ich ihn verwenden kann? Die Zelle Ich versuche, auf klicken ist N9 und das Blatt ich es will, ist zu öffnen „Alpha Schlussbad“

Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, cancel As Boolean) 
    Sheets("Alpha Final Rinse").Select 
End Sub 

Ich tue dies in Excel 2013 Danke genannt!

Answer 1

Wenn Sie nur möchte, dass N9 den Fokus auf ein anderes Arbeitsblatt umschalten kann, isoliere Target mit der Intersect method.

In dem Codefenster des Daten Arbeitsblatt:

Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, cancel As Boolean) 
    If Not Intersect(Target, Range("N9")) Is Nothing Then 
     cancel = True 
     Worksheets("Alpha Final Rinse").Activate 
    End If 
End Sub 

Beachten Sie, dass cancel = True notwendig ist, den Benutzer die Eingabe in-cell Bearbeitungsmodus zu stoppen (das wurde in den Optionen aktiviert vorausgesetzt).

Answer 2

Ihr Code funktioniert, wenn:

• es in dem Arbeitsblatt Codebereich Ihrer Datenblatt (das Blatt, deren Zellen Sie einen Doppelklick)
• Makros
• die Datei aktiviert ist installiert Typ ist XLSM statt .xlsx