none
Através do comando Shell vba não consigo abrir o word. RRS feed

  • Pergunta

  • Pessoal, o caminho que esta o arquivo é: c:\Users\hasco\Este Computador\Ok.docx.

    Escrevo o comando: 

    Shell "WINWORD, c:\Users\hasco\OneDrive\Desktop\Ok.docx", vbNormalFocus

    Shell "WINWORD, c:\Users\hasco\OneDrive\Este Computador\Ok.docx", vbNormalFocus

    Shell "WINWORD, c:\Users\hasco\Este Computador\Ok.docx", vbNormalFocus

    Shell "WINWORD, C:\Este Computador\Área de Trabalho\Ok.docx", vbNormalFocus

    enfim, já tentei de tudo e o retorno é que não existe o arquivo ou ele foi deletado. Podem me ajudar ?





    • Editado Hapdosouza quinta-feira, 29 de outubro de 2020 15:20 erro de transcrição
    quinta-feira, 29 de outubro de 2020 14:42

Todas as Respostas

  • Coloque o caminho e nome de arquivo entre aspas:

      Shell "WINWORD  ""C:\Users\hasco\OneDrive\Desktop\Ok.docx""", vbNormalFocus
    

    No Excel vc também pode usar o método FollowHyperlink:

      ThisWorkbook.FollowHyperlink "C:\Users\hasco\OneDrive\Desktop\Ok.docx"
    

    Outra alternativa é usando a função GetObject:

      Dim doc As Object
      Set doc = GetObject("C:\Users\hasco\OneDrive\Desktop\Ok.docx")
      doc.Parent.Visible = True
      AppActivate doc.Name & " - Word"

    quinta-feira, 29 de outubro de 2020 16:50
  • A primeira opção colega diz que o diretorio não é valido. 

    Nao sei como escrever o caminho correto. Acho que é isso. Não sei. 

    Quando refaço o caminho manualmente. Arquivo Abrir, Area de Trabalho, Ok.

    Na Janela lá em cima fica o caminho Este Computador - Area de Trabalho

    Mas eu coloco esse caminho ele não encontra.


    quinta-feira, 29 de outubro de 2020 17:29
  • A resposta é:

    O nome do diretório não é válido.

    (C:\Users\hasco\...\Ok.docx)

    quinta-feira, 29 de outubro de 2020 17:46
  • Mas seu arquivo está aonde? Em sua Área de Trabalho ou no OneDrive? Se está no OneDrive, você está conectado nele?

    Vá pelo Windows Explorer até onde está o arquivo, clique nele com o botão direito e escolha Propriedades. Na guia Geral copie o caminho que está na linha Local.



    • Editado Elubra quinta-feira, 29 de outubro de 2020 18:05
    quinta-feira, 29 de outubro de 2020 18:04
  • Colega deu certo. Realmente era o caminho.

    'VBA.Shell "Explorer.exe C:\Users\hasco\OneDrive\Área de Trabalho\Ok.docx, vbNormalFocus"
    'Esse deu certo.

    Obrigado !

    quinta-feira, 29 de outubro de 2020 18:58