Os suplementos não são carregados quando utilizar o comando CreateObject no Excel

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
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
livro de macro pessoal Personal.xls XL2000 XL2002 XL2003 XL2007

Aviso: Este artigo foi traduzido automaticamente

Propriedades

ID do Artigo: 213489 - Última Revisão: 01/17/2007 08:13:09 - Revisão: 5.3

Microsoft Office Excel 2007, Microsoft Office Excel 2003, Microsoft Excel 2002 Standard Edition, Microsoft Excel 2000 Standard Edition, Microsoft Excel 97 Standard Edition

  • kbmt kbautomation kbvba kbexpertiseinter kbdtacode kbprb kbprogramming KB213489 KbMtpt
Comentários
ERROR: at System.Diagnostics.Process.Kill() at Microsoft.Support.SEOInfrastructureService.PhantomJS.PhantomJSRunner.WaitForExit(Process process, Int32 waitTime, StringBuilder dataBuilder, Boolean isTotalProcessTimeout)