Add-ins não carregar ao usar o comando CreateObject no Excel

ID do artigo: 213489 - Exibir os produtos aos quais esse artigo se aplica.
Tradução automáticaExibir Aviso de Isenção de Tradução Automática
Expandir tudo | Recolher tudo

Nesta página

Sintomas

Quando você acessar o Microsoft Excel como um objeto de automação OLE usando o comando CreateObject , add-ins, arquivos que estão localizados na pasta XLStart e a padrão nova pasta de trabalho não são carregados.
Voltar para o início | Submeter comentários

Causa

Quando você tenta carregar o add-ins e arquivos, o Excel envia uma mensagem para o aplicativo chamado, como o Visual Basic, que não está pronto para responder à solicitação e tente novamente mais tarde. O aplicativo de chamada não poderá processar essa solicitação e continuar com o restante dos comandos.
Voltar para o início | Submeter comentários

Como Contornar

Microsoft fornece exemplos de programação apenas para ilustração, sem garantia expressa ou implícita. Isso inclui, mas não está limitado a, garantias implícitas de comercialização ou adequação para uma finalidade específica. Este artigo presume que você está familiarizados com a linguagem de programação que está sendo demonstrada e com as ferramentas que são usadas para criar e depurar procedimentos. Engenheiros de suporte podem ajudar a explicar a funcionalidade de um determinado procedimento. No entanto, eles não modificarão esses exemplos para fornecer funcionalidades adicionais ou construir procedimentos para atender às suas necessidades.

Para carregar um arquivo de suplemento ao executar o Excel como um objeto de automação OLE, carrega o add-in manualmente. Os exemplos desse método são os seguintes.

Microsoft Office Excel 2007

Sub LoadAddin()

   ' Dimension variable xl as object type.
   Dim xl As Object

   ' Activate Microsoft Excel and assign to variable xl.
   Set XL = CreateObject("Excel.Application")

   ' Open the add-in file you want, in this example, XLQUERY.XLAM.
   XL.Workbooks.Open (XL.librarypath & "\MSQUERY\XLQUERY.XLAM")

   ' If you need to register the functions and commands
   ' contained in a resource (XLL), use the RegisterXLL method.
   ' In the example below, all functions of Analys32.xll are
   ' registered.
   ' XL.RegisterXLL "Analys32.xll"

   ' Run any auto macros contained in the add-in file
   ' Auto macros don't run when you open a file
   ' using the Open method.
   XL.Workbooks("xlquery.xlam").RunAutoMacros 1

   Set XL = Nothing
 End Sub

Microsoft Office Excel 2003 e versões anteriores do Excel

Sub LoadAddin()

   ' Dimension variable xl as object type.
   Dim xl As Object

   ' Activate Microsoft Excel and assign to variable xl.
   Set XL = CreateObject("Excel.Application")

   ' Open the add-in file you want, in this example, XLQUERY.XLA.
   XL.Workbooks.Open (XL.librarypath & "\MSQUERY\XLQUERY.XLA")

   ' If you need to register the functions and commands
   ' contained in a resource (XLL), use the RegisterXLL method.
   ' In the example below, all functions of Analys32.xll are
   ' registered.
   ' XL.RegisterXLL "Analys32.xll"

   ' Run any auto macros contained in the add-in file
   ' Auto macros don't run when you open a file
   ' using the Open method.
   XL.Workbooks("xlquery.xla").RunAutoMacros 1

   Set XL = Nothing
 End Sub
Voltar para o início | Submeter comentários

Mais Informações

Porque o Excel não carregue add-ins ou arquivos na pasta XLInicio quando você chamar como um objeto de automação OLE, você tem total controle do processo de carregamento. Se você desejar um add-in a ser carregado, você poderá carregá-lo manualmente.

Esse comportamento também significa que não erros de macro, alertas de arquivo bloqueado ou alertas de arquivo somente-leitura impedir que o Excel carregue quando ele está sendo chamado pelo comando CreateObject . Outro benefício desse comportamento é que ele leva menos tempo para carregar Excel que quando arquivos ou add-ins são carregados.
Voltar para o início | Submeter comentários

Referências

Para obter mais informações sobre como obter ajuda com o Visual Basic for Applications, clique no número abaixo para ler o artigo na Base de dados de Conhecimento da Microsoft:
226118
(http://support.microsoft.com/kb/226118/ )
Lista de recursos que estão disponíveis para ajudar você a aprender Visual Basic para aplicativos de programação
Voltar para o início | Submeter comentários

Propriedades

ID do artigo: 213489 - Última revisão: quarta-feira, 17 de janeiro de 2007 - Revisão: 5.3
A informação contida neste artigo aplica-se a:
  • Microsoft Office Excel 2007
  • Microsoft Office Excel 2003
  • Microsoft Excel 2002 Standard Edition
  • Microsoft Excel 2000 Standard Edition
  • Microsoft Excel 97 Standard Edition
Palavras-chave: 
kbmt kbautomation kbvba kbexpertiseinter kbdtacode kbprb kbprogramming KB213489 KbMtpt
Tradução automática
IMPORTANTE: Este artigo foi traduzido por um sistema de tradução automática (também designado por Machine Translation ou MT), não tendo sido portanto traduzido ou revisto por pessoas. A Microsoft possui artigos traduzidos por aplicações (MT) e artigos traduzidos por tradutores profissionais, com o objetivo de oferecer em português a totalidade dos artigos existentes na base de dados de suporte. No entanto, a tradução automática não é sempre perfeita, podendo conter erros de vocabulário, sintaxe ou gramática. A Microsoft não é responsável por incoerências, erros ou prejuízos ocorridos em decorrência da utilização dos artigos MT por parte dos nossos clientes. A Microsoft realiza atualizações freqüentes ao software de tradução automática (MT). Obrigado.
Clique aqui para ver a versão em Inglês deste artigo: 213489
(http://support.microsoft.com/kb/213489/en-us/ )
Voltar para o início | Submeter comentários

Submeter comentários

 
Voltar para o inícioVoltar para o início