Este fórum foi descontinuado. LEIA AQUI e participe da Comunidade BABOO :)

Ir para conteúdo
Diogo Batera

Erro 9 Tempo de Execução

Mensagem Recomendada

Boa tarde, estou com dificuldade para encontrar a solução deste erro a sintaxe abaixo.

Sub IrParaPatchRack10()
'
' IrParaPatchRack10 Macro
'

'
    If MsgBox("Você será redirecionado para uma simulação do PATCH RACK 10." & vbCrLf & vbCrLf & "Confirma?", vbYesNo, "Ir para o PATCH") = vbYes Then
        Sheets("PATCH_10").Range("B5:AA5").Value = ""
        Sheets("PATCH_10").Range("B7:AA7").Value = ""
        Sheets("PATCH_10").Range("B16:AA16").Value = ""
        Sheets("PATCH_10").Range("B18:AA18").Value = ""
        Sheets("PATCH_10").Range("B27:AA27").Value = ""
        Sheets("PATCH_10").Range("B29:AA29").Value = ""
        Sheets("PATCH_10").Select
        Range("A1").Select
    End If
End Sub

 

 

Compartilhar este post


Link para o post
Compartilhar em outros sites

Estou tentando executar esta planilha,  no entanto o erro no trecho especificado acima aparece, Gostaria da colaboração dos expert, pois eu estou iniciando em vba e ja de cara recebi esta planilha de um gerente para modificar, ai começou o problema... de qualquer forma agradeço a ajuda ... abraços..

CAMINHOCRITICO_QUESTOES_V6 MODIFICADO.xlsm

Editado por Diogo Batera

Compartilhar este post


Link para o post
Compartilhar em outros sites

O erro gerado não é de sintaxe e sim de "subscrito fora do intervalo", e ocorre porque não existe no arquivo o nome de planilha referenciado no código.


 

Osvaldo

 

Compartilhar este post


Link para o post
Compartilhar em outros sites
Em 13/09/2017 at 2:21 PM, osvaldomp disse:

O erro gerado não é de sintaxe e sim de "subscrito fora do intervalo", e ocorre porque não existe no arquivo o nome de planilha referenciado no código.

Entendi Osvaldo, ja corrigi aqui e deu certo.. Obrigado

Compartilhar este post


Link para o post
Compartilhar em outros sites

×
×
  • Criar Novo...