Toon posts:

[Exel VBA] Zoeken in cellen -> fout als niets is gevonden

Pagina: 1
Acties:

Verwijderd

Topicstarter
Door middel van Cells.Find(...).select doorzoek ik cellen op een bepaalde inhoud en wordt de cel getoond als die gevonden is. Maar hij geeft een foutmelding als het niet gevonden is, nl. Er wordt een functie of omgevingvariabele verwacht... Hoe kan ik dit oplossen? thx

Verwijderd

dim gevondencel as range
set gevondencel=cells.find(...)
if not gevondencel=nothing then
'gevonden
'code bv:
msgbox "gevonden op:" & gevondencell.address
else
'niets gevonden
'code bv:
msgbox "niets gevonden"
'exit sub
end if