Reinaldo e Mauro obrigado pela disposição de vocês. Mas o problema estava na posição de uma linha de código. Estava dando o comando "End If"...