Artigo: 213489 - Ver produtos para os quais este artigo se aplica.
Expandir tudo | Reduzir tudo

Nesta página

Sintomas

Quando acede a Microsoft Excel como um objecto de automatização OLE utilizando o comando CreateObject , suplementos, ficheiros que estão localizados no directório pasta XLStart e o livro novo predefinido não são carregados.

Causa

Quando tenta carregar suplementos e ficheiros, o Excel envia uma mensagem para a aplicação chamada, como o Visual Basic, que não está pronto para responder ao pedido e tente novamente mais tarde. Aplicação de chamada poderá não conseguir processar este pedido e continue com os restantes comandos.

Como contornar

A Microsoft fornece exemplos de programação apenas, para fins sem garantia expressa ou implícita. Isto inclui, mas não está limitado a, as garantias implícitas de comercialização ou adequação a um fim específico. Este artigo pressupõe que está familiarizado com a linguagem de programação apresentada e as ferramentas que são utilizadas para criar e depurar procedimentos. Os técnicos de suporte da Microsoft podem ajudar a explicar a funcionalidade de um determinado procedimento. No entanto, não modificarão estes exemplos para proporcionarem funcionalidades adicionais nem criarão procedimentos adaptados às necessidades específicas do utilizador.

Para carregar um ficheiro de suplemento quando executar o Excel como um objecto de automatização OLE, carregue o suplemento manualmente. Exemplos deste método são as 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ção

Porque o Excel não for carregada suplementos ou ficheiros no directório XLInicio quando chamada como um objecto de automatização OLE, tem controlo total do processo de carregamento. Se pretender que um suplemento seja carregado, pode carregá-lo manualmente.

Este comportamento também significa que não erros de macro, alertas de ficheiro bloqueado ou impedir que o Excel carregar quando está a ser chamado pelo comando CreateObject de alertas de ficheiro só de leitura. Outra vantagem deste comportamento consiste que demora menos tempo a carregar o Excel do que acontece quando são carregados suplementos ou ficheiros.

Referências

Para obter mais informações sobre como obter ajuda com o Visual Basic for Applications, clique no número de artigo que se segue para visualizar o artigo na Microsoft Knowledge Base:
226118Lista de recursos disponíveis para o ajudar a aprender do Visual Basic for Applications programação

Propriedades

Artigo: 213489 - Última revisão: 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 revisto ou traduzido por humanos. A Microsoft tem artigos traduzidos por aplicações (MT) e artigos traduzidos por tradutores profissionais. O objectivo é simples: oferecer em Português a totalidade dos artigos existentes na base de dados do suporte. Sabemos no entanto que a tradução automática não é sempre perfeita. Esta pode conter erros de vocabulário, sintaxe ou gramática? erros semelhantes aos que um estrangeiro realiza ao falar em Português. A Microsoft não é responsável por incoerências, erros ou estragos realizados na sequência da utilização dos artigos MT por parte dos nossos clientes. A Microsoft realiza actualizações frequentes 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