Dubbelklik alleen mogelijk op eerste lege cel kolom A

[Fredemel]

Beste lezer,

Ik ben ettelijke keren geholpen door ervaren Excel-VBA specialisten.
Toch een nieuwe "uitdaging"....

In een database-tabblad wil ik in de totaal-range van de "double-click"-Range toch ALLEEN op de eerste lege cel van kolom A KUNNEN dubbel-klikken.
Wat ik nu werkend heb gaat goed, maar als ik op de tweede of derde lagere lege cel dubbelklik start de macro ook. Maar dat wil ik niet.
ALLEEN dubbelklikken op de EERSTE lege cel onder de ingevulde database-regels van kolom A

Graag uw hulp

 

[AHulpje]

Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
    With Target
        If .Column = 1 And .Value = "" And .Offset(-1, 0) <> "" Then
            MsgBox "Doe je ding"
        Else
            MsgBox "Mag niet"
        End If
    End With
End Sub

 

[Fredemel]

AHulpje,

én Snel én een werkbare oplossing......
Weer wat geleerd én..... vooral BEDANKT voor de snelle perfecte code.
Mvg Fred

 

[snb]

En de volgende keer:
- met plaatsing van de macro in gebruik
- met plaatsing van een voorbeeld Excelbestand
- zonder de plaatsing van een plaatje waarmee niemand wat kan

Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
    Cancel = Target.Address <> Columns(1).SpecialCells(4).Cells(1).Address
End Sub

 

[Fredemel]

snb,
Buiten het feit dat " AHulpje" mijn voortreffelijk heeft geholpen.....
Ik snap het en zal een volgende keer aan uw voorstellen denken.
Dank voor uw reactie.