Actie als in een cel geklikt word

[Oude leerling]

Hallo'
Ik kom er niet uit!!!
Wie helpt mij met het volgende probleem.

Als ergens in de Range(G10:G20) een cel geactiveerd word , moet
er 2 naar links gekeken worden of daar wat in staat.
Zo niet dan moet er een mededeling komen.
Zelf had ik het volgende bedacht , maar ik brouw er niets van.

If activeCell(Target, Range("G10:G19")).offset 0,-2 = "" then
msgBox "Mededeling"

Jaap

 

[snb]

Dat klopt toch niet met je bijgevoegde werkboek ?

 

[Oude leerling]

Ik ben echt een leek hoor!!
Heb het mezelf wat aangeleerd d.m.v. het boek van Wim de Groot
"Macro's programmeren met VBA"

Wil je de oplossing wat verder voor mij uitwerken??
Jaap

 

[keb]

Op cel dubbelklikken

Sub Worksheet_BeforeDoubleClick(ByVal target As Range, Cancel As Boolean)
If ActiveCell.Column = 7 And (ActiveCell.Row >= 10 And ActiveCell.Row <= 20) Then
If ActiveCell.Offset(0, -2).Value = "" Then
MsgBox "Cel is leeg"
Else
MsgBox ActiveCell.Offset(0, -2).Value
End If
End If
End Sub

 

[Oude leerling]

Macro werkt perfect maar is nog niet helemaal de oplossing zoals ik het bedoelde.

Hij moet het namelijk doen als ik eenmaal in 'n cel klik.

Is dit nog te realiseren??

 

[keb]

Klikken op cel

Helaas.
U moet een keuze maken tussen "dubbel klikken" of "klikken met rechtermuisknop".

Tip: Kijk eens achter de Help-functie van Visual Basic for Applications.

Succes
KeB

 

[Oude leerling]

Allemaal bedankt voor de genomen moeite.
Ik zal het inderdaad ook eens via de genoemde helpdesk proberen.

Groetjes Jaap