如何将数据添加到组合框控件或在 Excel 或 Word 中的列表框控件

文章翻译 文章翻译
文章编号: 161598 - 查看本文应用于的产品
对于在 Microsoft Excel 的 Mac 版本的这篇文章,请参阅185388
展开全部 | 关闭全部

本文内容

概要

本文介绍的方法的填充组合框或列表框控件。

更多信息

Microsoft 提供编程示例只用于说明,没有任何明示或暗示的担保。 这包括,但不限于对适销性或特定用途适用性的暗示的担保。 本文假定您熟悉与正在演示了的编程语言以及用于创建和调试过程的工具。 Microsoft 支持工程师可以帮助解释某个特定的过程的功能,但他们不会修改这些示例以提供附加的功能或构建过程以满足 特定要求。

有关可用的支持选项以及如何与 Microsoft 联系的详细信息,请访问下面的 Microsoft 网站:
http://support.microsoft.com/default.aspx?scid=fh;EN-US;CNTACTMS
您可以使用如组合框或一列表框的控件在用户窗体上的 。 在 Microsoft Excel 中,您可以使用这些控件在工作表中。 在填充该控件的方法很相似。 在本文中的示例使用用户窗体上的控件。

方法 1: 如何链接到一个 Excel 工作表上的单元格的组合框或列表框

  1. 创建一个新的工作簿在 Excel 中。 在 Sheet1 中,键入以下内容:
          A1: One     B1: Red
          A2: Two     B2: Green
          A3: Three   B3: Yellow
          A4: Four    B4: Blue
    					
  2. 请按 ALT + F11 启动 Microsoft Excel Visual 基本编辑器。
  3. 上该插入单击菜单,用户窗体
  4. 创建一个组合框控件和列表框控件上的用户窗体。
  5. 如果看不到属性窗口中单击属性窗口上该视图菜单
  6. 单击该组合框并滚动到行来源中将属性窗口

    窗口分为两部分。 左部分中包含该控件的属性的名称。 右部分中包含属性的值。 单击行来源和类型的右部"sheet1! a1:a4"(不带引号)
  7. 单击该列表框并滚动到行来源属性窗口中。 单击行来源和类型的右部"sheet1! b1:b4"(不带引号)

    : 如果省略了表引用从工作表处于活动状态时运行用户窗体中的单元格数据填充组合框和列表框控件。 若要确保始终使用同一工作表中的数据进行填充用户窗体,包括表引用的示例所示。 若要填充用户窗体是活动工作表中的数据,不包括在行来源中的表引用。 当执行此操作时该宏使用活动工作表中的数据填充用户窗体。
  8. 运行通过单击用户窗体运行然后单击运行子过程/用户窗体
一、 二、 三和四出现在组合框控件中 ; 和红、 绿、 黄色,和蓝色显示在列表框控件。

Methdod 2: 如何使用 Visual Basic 宏来填充组合框或列表框

  1. 打开一个 Microsoft Office 应用程序,例如 Microsoft Excel 或 Word。
  2. 按 ALT + F11 启动 Visual Basic 编辑器。
  3. 上该插入单击菜单,用户窗体
  4. 在用户窗体上的 创建组合框和列表框控件。
  5. 用鼠标右键单击用户窗体,然后单击查看代码。 此时将显示用户窗体的代码窗口。 单击初始化中将过程(右侧) 的列表

    自动输入该子例程的第一个和最后一个行,并自动将插入点放在之间这些两行。
  6. 键入下面的代码:
          ListBox1.List = Array("One", "Two", "Three", "Four")
          ComboBox1.List = Array("Red", "Green", "Yellow", "Blue")
    						
    此代码应显示"Sub UserForm_Initialize()"和"End Sub"行间距
  7. 上该运行单击菜单,运行子过程/用户窗体若要运行用户窗体。
一、 二、 三和四个显示在列表框控件中 ; 和红、 绿、 黄色,和蓝色显示在组合框控件。

参考

用户窗体有关的详细信息,请单击该索引Microsoft Visual Basic 帮助中选项卡中,键入以下文本:
用户窗体对象
然后双击所选的文本以转到"用户窗体对象"主题。

属性

文章编号: 161598 - 最后修改: 2010年8月19日 - 修订: 1.0
这篇文章中的信息适用于:
  • Microsoft Excel 2002 标准版
  • Microsoft Word 2002 标准版
  • Microsoft Excel 2000 标准版
  • Microsoft Word 2000 标准版
  • Microsoft Excel 97 标准版
  • Microsoft Word 97 标准版
  • 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 kbmt KB161598 KbMtzh
机器翻译
注意:这篇文章是由无人工介入的微软自动的机器翻译软件翻译完成。微软很高兴能同时提供给您由人工翻译的和由机器翻译的文章, 以使您能使用您的语言访问所有的知识库文章。然而由机器翻译的文章并不总是完美的。它可能存在词汇,语法或文法的问题,就像是一个外国人在说中文时总是可能犯这样的错误。虽然我们经常升级机器翻译软件以提高翻译质量,但是我们不保证机器翻译的正确度,也不对由于内容的误译或者客户对它的错误使用所引起的任何直接的, 或间接的可能的问题负责。
点击这里察看该文章的英文版: 161598
Microsoft和/或其各供应商对于为任何目的而在本服务器上发布的文件及有关图形所含信息的适用性,不作任何声明。 所有该等文件及有关图形均"依样"提供,而不带任何性质的保证。Microsoft和/或其各供应商特此声明,对所有与该等信息有关的保证和条件不负任何责任,该等保证和条件包括关于适销性、符合特定用途、所有权和非侵权的所有默示保证和条件。在任何情况下,在由于使用或运行本服务器上的信息所引起的或与该等使用或运行有关的诉讼中,Microsoft和/或其各供应商就因丧失使用、数据或利润所导致的任何特别的、间接的、衍生性的损害或任何因使用而丧失所导致的之损害、数据或利润不负任何责任。

提供反馈

 

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