ID do artigo: 213489 - Exibir os produtos aos quais esse artigo se aplica.
Expandir tudo | Recolher tudo

Neste artigo

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.

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.

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
				

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.

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:
226118Lista de recursos que estão disponíveis para ajudar você a aprender Visual Basic para aplicativos de programação

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

Submeter comentários

 

Contact us for more help

Contact us for more help
Connect with Answer Desk for expert help.
Get more support from smallbusiness.support.microsoft.com