none
Erro Criação Documento Word via VB.Net Hresult 0x8002801D RRS feed

  • Pergunta

  • Olá Pessoal,

    Faz 4 dias que busco uma solução para o seguinte erro que nunca tinha visto:

    "Não é possível converter o Objeto COM do tipo "Microsoft.Office.Interop.Word.Application" na interface tipo "Microsoft.Office.Interop.Word._Application". Esta operação falhou porque a chamada de QueryInterface no componente COM para a Interface com IID {00020970-0000-0000-C000-000000000046} falhou devido ao seguinte erro: Exeção: HRESULT: 0x8002801D. Biblioteca não registrada (TYPE_E_LIBNOTREGISTERED)"

    Essa mensagem na linha que tenta criar um arquivo Word com VisuaBasic 2010 Express Edition. O código reduzido é como segue:

    Imports Microsoft.Office.Interop.Word

        Dim oWord As Word.Application
        Dim oDoc As Word.Document

                    oWord = New Word.Application
                    oWord = CreateObject("Word.Application")          ===>linha que provoca o erro!
                    oWord.Visible = True
                    oWord.WindowState = Word.WdWindowState.wdWindowStateMinimize

    CARACTERISTICAS

    Eu uso um modelo de arquivo Word (doc) para substituir macros dentro deste como NomeUsuário, Empresa, Setor, etc. que estão previamente formatadas. Coleto os dados de um formulário WindowsForm (projeto WindowsForm com a linguagem VisualBasic 2010) e os jogo no arquivo Word (cópia) substituindo as macros (@nome, @setor, @grau, etc). Simples assim.

    HISTÓRICO

    A criação do documento Word estava funcionando sem problemas, há mais de 2 anos. Usava o Office 2007. Mês passado fui instalar o Trial do Office 2013 365 e quando expirou, desinstalei ele. Até então a criação funcionava. Depois que desinstalei o Office 2013-365 Trial não funcionou mais.

    O QUE JÁ FIZ

    1. Já desinstalei e reinstalei o Office 2007. Não funcionou

    2. Desinstalei o office 2007 e instalei o Office 2010 completo. Nada. Mesmo erro

    3. Já deletei a chave acima no HKEY_CLASSES_ROOT\TypeLib como sugerem vários autores que já passaram por isso. Nada. O mesmo erro.

    O QUE ESTÁ INSTALADO

    - Framework 4.0
    - Visual Studio 2010 e 2012

    - SQL Server 2008 R2

    - SQL Server CE

    - Office 2010 Premium

    REFERÊNCIA HABILITADAS EM MEU PROJETO

    Microsoft.Office.Core

    Microsoft.Office.Interop.Excel

    Microdoft.Office.Interop.Graph

    Microdoft.Office.Interop.Word

    Aonde pode estar o erro?. Muitos falam do problema na chave no Registro, porém mesmo deletando como sugerem ainda persiste o problema. O que mais fazer?. Obrigado.

    quinta-feira, 13 de agosto de 2015 15:15

Respostas

  • Boa tarde Marbilad,

    Experimente trocar essa linha

    oWord = CreateObject("Word.Application")  

    Por essa:

    Set oWord =CreateObject("Word.Application")

    Atenciosamente, Roberto Alves

    • Sugerido como Resposta Marcos SJ quinta-feira, 13 de agosto de 2015 20:14
    • Marcado como Resposta Marcos SJ sexta-feira, 14 de agosto de 2015 13:17
    quinta-feira, 13 de agosto de 2015 20:14

Todas as Respostas

  • Boa tarde Marbilad,

    Experimente trocar essa linha

    oWord = CreateObject("Word.Application")  

    Por essa:

    Set oWord =CreateObject("Word.Application")

    Atenciosamente, Roberto Alves

    • Sugerido como Resposta Marcos SJ quinta-feira, 13 de agosto de 2015 20:14
    • Marcado como Resposta Marcos SJ sexta-feira, 14 de agosto de 2015 13:17
    quinta-feira, 13 de agosto de 2015 20:14
  • Boa noite Marbilad.

    Você achou a solução? Estou encontrando o mesmo problema. Solicitei ajuda do support da microsoft, eles entraram remotamente aqui no meu computador mas não conseguiram resolver. Sou assinante do Office 365. O Problema começou depois que o Word passou do Office e virou Microsoft Word.

    sábado, 25 de julho de 2020 21:00