Como adicionar dados a um controlo de caixa de combinação ou de caixa de listagem no Excel ou no Word

O suporte para o Office 2003 terminou

A Microsoft terminou o suporte para o Office 2003 em 8 de Abril de 2014. Esta alteração afetou as suas atualizações de software e opções de segurança. Aprenda o que isto significa para si e como pode ficar protegido.

Para obter uma versão deste artigo referente ao Microsoft Excel para Mac, consulte 185388.
Sumário
Este artigo descreve os métodos para preencher um controlo de caixa de combinação (ComboBox) ou de caixa de listagem (ListBox).
Mais Informação
A Microsoft fornece exemplos de programação apenas a título informativo, sem garantia expressa ou implícita, incluindo, mas não se limitando, a garantias implícitas de comercialização e/ou adequação a um fim específico. Este artigo parte do princípio que o utilizador conhece a linguagem de programação apresentada e as ferramentas utilizadas para criar e depurar procedimentos. Os profissionais do suporte técnico da Microsoft podem ajudar a explicar a funcionalidade de um determinado procedimento, mas não modificarão estes exemplos para proporcionar funcionalidades adicionais nem criarão procedimentos para cumprir necessidades específicas do utilizador. Se tem pouca experiência em programação, pode optar por contactar um Microsoft Certified Partner ou a subsidiária local da Microsoft (21 440 92 00). Para obter mais informações sobre Microsoft Certified Partners, visite o seguinte Web site da Microsoft: Para obter mais informações sobre as opções de suporte disponíveis e como contactar a Microsoft, visite o seguinte Web site da Microsoft: Pode utilizar um controlo, como uma caixa de combinação ou uma caixa de listagem, num formulário de utilizador. No Microsoft Excel, pode utilizar estes controlos na folha de cálculo. Os métodos para o preenchimento dos controlos são semelhantes. Os exemplos deste artigo utilizam controlos num formulário de utilizador.

Método 1: Como ligar uma caixa de combinação ou caixa de listagem a células de uma folha de cálculo do Excel

  1. Crie um novo livro no Microsoft Excel. Na Folha1, escreva o seguinte:
          A1: Um      B1: Vermelho      A2: Dois    B2: Verde      A3: Três    B3: Amarelo      A4: Quatro  B4: Azul					
  2. Prima ALT+F11 para iniciar o editor do Visual Basic do Microsoft Excel.
  3. No menu Insert, clique em UserForm.
  4. Crie um controlo ComboBox e um controlo ListBox no formulário de utilizador.
  5. Se a janela Properties não estiver visível, clique em Properties Window no menu View.
  6. Clique em ComboBox e percorra a lista até RowSource na janela Properties.

    A janela está dividida em duas secções. A secção da esquerda contém o nome da propriedade para o controlo. A secção da direita contém o valor da propriedade. Clique na secção direita de RowSource e escreva "folha1!a1:a4" (sem as aspas).
  7. Clique em ListBox e percorra a lista até RowSource na janela Properties. Clique na secção direita de RowSource e escreva "folha1!b1:b4" (sem as aspas).

    NOTA: se omitir a referência à folha, os controlos ComboBox e ListBox serão preenchidos com os dados das células da folha de cálculo que está activa, quando executar o formulário de utilizador. Para se certificar de que são utilizados sempre os dados da mesma folha de cálculo para preencher o formulário de utilizador, inclua a referência à folha, como se mostra nos exemplos. Para preencher o formulário de utilizador com dados da folha activa, não inclua a referência à folha em RowSource. Ao fazer isto, a macro utiliza dados da folha activa para preencher o formulário de utilizador.
  8. Execute o formulário de utilizador clicando em Run e, em seguida, clicando em Run Sub/UserForm.
É apresentado "Um", "Dois", "Três" e "Quatro" no controlo de caixa de combinação, e "Vermelho", "Verde", "Amarelo" e "Azul" no controlo de caixa de listagem.

Método 2: Como utilizar uma macro do Visual Basic para preencher uma caixa de combinação ou uma caixa de listagem

  1. Abra uma aplicação do Microsoft Office, como o Microsoft Excel ou o Microsoft Word.
  2. Prima ALT+F11 para iniciar o editor do Visual Basic.
  3. No menu Insert, clique em UserForm.
  4. Crie um controlo ComboBox e um controlo ListBox no formulário de utilizador.
  5. Clique com o botão direito do rato no formulário e clique em View Code. A janela de código para o formulário de utilizador é apresentada. Clique em Initialize na lista Procedure (no lado direito).

    As primeira e última linhas da sub-rotina são introduzidas automaticamente e o ponto de inserção é colocado automaticamente entre essas duas linhas.
  6. Escreva o seguinte código:
          ListBox1.List = Array("One", "Two", "Three", "Four")      ComboBox1.List = Array("Red", "Green", "Yellow", "Blue")						
    Este código deve ser apresentado entre as linhas "Sub UserForm_Initialize ()" e "End Sub".
  7. No menu Run, clique em Run Sub/UserForm para executar o formulário de utilizador.
É apresentado "Um", "Dois", "Três" e "Quatro" no controlo de caixa de listagem, e "Vermelho", "Verde", "Amarelo" e "Azul" no controlo de caixa de combinação.
Referências
Para obter mais informações sobre formulários de utilizador, clique no separador Índice remissivo na Ajuda do Microsoft Visual Basic, e escreva o seguinte texto:
UserForm Object
e, em seguida, faça duplo clique no texto seleccionado para abrir o tópico "UserForm Object".
XL97 97 userform user form combo box list vba
Propriedades

ID do Artigo: 161598 - Última Revisão: 05/11/2011 17:35:00 - Revisão: 3.0

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

  • kbcontrol kbdtacode kbhowto kbprogramming KB161598
Comentários