Haz un bucle the la siguiente forma mas o menos:


for each hojas in thisworkbook.worksheets
hojas.activate

for each celda in hojas

on error resume next
if celda.value = "n/a" then
msgbox celda.address
...












next hojas