Gebied controleren als het leeg is

[Guidolavespa]

Hoe kan ik een gebied contoleren als er iets is ingevuld?

werkt alvast niet !!

'contoleer als er iets is aangeduid
If Range("$H$3").End(xlDown).Value Is Empty Then
MsgBox ("niets in gevuld"), vbCritical, fout
Exit Sub
End If


Dank bij voorbaat.

 

[Gert007]

Private Sub Worksheet_SelectionChange(ByVal Target As Excel.Range)
If Range("$H$3").End(xlDown).Value = "" Then
MsgBox ("niets in gevuld"), vbCritical, fout
Exit Sub
End If
End Sub

even snel getest enzo werkt het bij mij, als ik de vraag goed begrijp moet hij toch een boodschapvenster geven als er nuetsin H3 en onderliggende is ingevuld ??

Groetjes

GeRt007

 

[jzeedijk]

Hoi Guidolavespa,

Gebruik Isempty(Range("H3")) en je zult zien dat het goed gaat.

Jeroen

 

[Guidolavespa]

hallo, GeRt007


bedankt, het werkt fantastisch


guidolavespa