ID do artigo: 213424 - Última revisão: quinta-feira, 23 de novembro de 2006 - Revisão: 3.5

XL2000: Como controlar a aparência do ponteiro do mouse enquanto executa uma macro

Dica do SistemaEste artigo aplica-se a um sistema operativo diferente do que está a utilizar. Foi desactivado o conteúdo do artigo, que pode não ser relevante para si.

Nesta página

Expandir tudo | Recolher tudo

Sumário

No Microsoft Excel 2000, você pode usar o Microsoft Visual Basic for Applications cursor propriedade para controlar a aparência do ponteiro do mouse enquanto uma macro estiver sendo executado. Em versões anteriores ao 7.0 do Excel, você não tem a capacidade de alterar a maneira como o ponteiro do mouse é exibido.

Mais Informações

Você pode usar a propriedade cursor para exibir o ponteiro do mouse como uma seta, uma ampulheta, uma forma de I (exibida quando a edição de texto) e o ponteiro padrão. Constantes internas a seguir correspondem a cada uma das formas de cursor disponível:
   xlNorthwestArrow    The northwest-arrow pointer
   xlWait              The hourglass pointer
   xlIBeam             The I-beam pointer
   xlNormal            The default pointer
				
Observe que quando você digita a constante para o ponteiro em forma de I, a letra que segue o prefixo "xl" é um "I" (para forma de I).

Microsoft fornece exemplos de programação apenas para ilustração, sem garantia expressa ou implícita, incluindo, mas não se limitando às garantias implícitas de comercialização e/ou adequação a uma finalidade específica. Este artigo presume que você esteja familiarizado com a linguagem de programação demonstrada e as ferramentas usadas para criar e depurar procedimentos. Profissionais de suporte da Microsoft podem ajudar a explicar a funcionalidade de um determinado procedimento, mas eles não modificarão esses exemplos para fornecer funcionalidades adicionais ou construir procedimentos para atender às suas necessidades específicas.
Se você não tenha muita experiência de programação, talvez queira em contato com um Microsoft Certified Partner ou Microsoft Advisory Services. Para obter mais informações, visite da Microsoft:

Microsoft Certified Partners - https://partner.microsoft.com/global/30000104 (https://partner.microsoft.com/global/30000104)

Comunicado de Microsoft Services - http://support.microsoft.com/gp/advisoryservice (http://support.microsoft.com/gp/advisoryservice)

Para obter mais informações sobre as opções de suporte estão disponíveis e sobre como entrar em contato com a Microsoft, visite o seguinte site: http://support.microsoft.com/default.aspx?scid=fh;EN-US;CNTACTMS (http://support.microsoft.com/default.aspx?scid=fh;en-us;cntactms)

Exemplo da propriedade cursor

Digite ou cole o código a seguir em uma folha de módulo do Visual Basic para ilustrar as diversas formas de ponteiro de mouse:
Sub ChangePointer()

    ' Display dialog box indicating mouse pointer will change.
    MsgBox "Click OK to display mouse pointer as hourglass."

    ' Display mouse pointer as hourglass.
    Application.Cursor = xlwait

    ' Wait so mouse pointer change will be noticeable.
    Application.Wait Now + TimeValue("0:0:03")
    MsgBox "Click OK to display mouse pointer as arrow."

    ' Display mouse pointer as arrow
    Application.Cursor = xlNorthwestArrow

    ' Wait so mouse pointer change will be noticeable.
    Application.Wait Now + TimeValue("0:0:03")

    MsgBox "Click OK to display mouse pointer as I-beam."

    ' Display mouse pointer as I-beam.
    Application.Cursor = xlIBeam

    ' Wait so mouse pointer change will be noticeable.
    Application.Wait Now + TimeValue("0:0:03")

    MsgBox "Click OK to return mouse pointer to normal."

    ' Return mouse pointer to normal display.
    Application.Cursor = xlNormal

End Sub
				
Observe que, como a propriedade cursor é não redefinir automaticamente quando a macro parar a execução, você precisará redefinir o ponteiro do mouse definindo a propriedade cursor para o valor xlNormal antes das paradas de macro.

Referências

Para obter mais informações sobre a propriedade cursor, no Editor do Visual Basic, clique em Ajuda do Microsoft Visual Basic no menu Ajuda , digite propriedade cursor no Assistente do Office ou no Assistente de resposta e, em seguida, clique em Pesquisar para exibir o tópico.

A informação contida neste artigo aplica-se a:
  • Microsoft Excel 2000 Standard Edition
Palavras-chave: 
kbmt kbhowto KB213424 KbMtpt
Tradução automáticaTraduçã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: 213424  (http://support.microsoft.com/kb/213424/en-us/ )