[Resolvido]Problemas com propriedades do Excel

Boa Tarde pessoal, tudo bom?

Bom, tenho um sistema em Access que tem várias informações e eu as exporto para o Excel. Porém tem uma linha que da o erro de "Run-time error '9' - Subscript out of range" na seguinte linha:

Set ExcelWS = ExcelWBK.Worksheets(vQuery)

O ExcelWS está declarado como Object e o ExcelWBK é declarada sem problemas com o nome que eu quero que apareça na planilha, e a minha vQuery é uma string (vem parte do nome da planilha)


Alguém poderia me ajudar? o meu problema está n vQuery e não sei nem o pq!

Olá! Tente colocar um On Error Resume Next para ver se funciona sem problemas. Se funcionar, faça o tratamento de erro pelo número do mesmo no lugar do On Error Resume Next.

Olá Criquio!

Consegui resolver o problema, é que na verdade a propriedade não está setando nada, ela tava vindo vazia, no código tinha outro operador com os valores corretos, alterei e deu tudo certo!

Muito obrigada pela idéia do On Error assim qualquer outro problema já não vai mais aparecer estes números de erro!

Certo. Mas o On Error Resume Next seria só para ver se passava sem problemas. Tem que ter cuidado com ele porque se acontecer algum erro que não possa acontecer, a coisa vai parar de funcionar e você não vai saber porque, pois não terá mensagem de erro. O correto é você colocar assim antes dos procedimentos iniciais:

On Error GoTo NErro

E no final do processo, manda exibir o número e uma descrição do erro, caso ocorra algum assim:

NErro

If Err.Number <> 0 Then
MsgBox "Atenção, ocorreu um erro inesperado" & VBCRLF & VBCRLF & "Número do erro: " & Err.Number & VBCRLF & "Descrição do erro: " & Err.Description, vbCritical, "ERRO"
Else
End If

Assim você saberá qual foi o erro.