Question

word2003组合框控件如何添加数据

Answer 1

您可以使用如组合框或一列表框的控件在用户窗体上的 。 在 Microsoft Excel 中，您可以使用这些控件在工作表中。 在填充该控件的方法很相似。 在本文中的示例使用用户窗体上的控件。
方法 1： 如何链接到一个 Excel 工作表上的单元格的组合框或列表框
创建一个新的工作簿在 Excel 中。 在 Sheet1 中，键入以下内容：
A1: One B1: RedA2: Two B2: GreenA3: Three B3: YellowA4: Four B4: Blue
请按 ALT + F11 启动 Microsoft Excel Visual 基本编辑器。
上该插入单击菜单，用户窗体
创建一个组合框控件和列表框控件上的用户窗体。
如果看不到属性窗口中单击属性窗口上该视图菜单
单击该组合框并滚动到行来源中将属性窗口
窗口分为两部分。 左部分中包含该控件的属性的名称。 右部分中包含属性的值。 单击行来源和类型的右部"sheet1! a1:a4"（不带引号）
单击该列表框并滚动到行来源属性窗口中。 单击行来源和类型的右部"sheet1! b1:b4"（不带引号）
注： 如果省略了表引用从工作表处于活动状态时运行用户窗体中的单元格数据填充组合框和列表框控件。 若要确保始终使用同一工作表中的数据进行填充用户窗体，包括表引用的示例所示。 若要填充用户窗体是活动工作表中的数据，不包括在行来源中的表引用。 当执行此操作时该宏使用活动工作表中的数据填充用户窗体。
运行通过单击用户窗体运行然后单击运行子过程/用户窗体
一、 二、 三和四出现在组合框控件中 ； 和红、 绿、 黄色，和蓝色显示在列表框控件。
Methdod 2： 如何使用 Visual Basic 宏来填充组合框或列表框
打开一个 Microsoft Office 应用程序，例如 Microsoft Excel 或 Word。
按 ALT + F11 启动 Visual Basic 编辑器。
上该插入单击菜单，用户窗体
在用户窗体上的 创建组合框和列表框控件。
用鼠标右键单击用户窗体，然后单击查看代码。 此时将显示用户窗体的代码窗口。 单击初始化中将过程（右侧） 的列表
自动输入该子例程的第一个和最后一个行，并自动将插入点放在之间这些两行。
键入下面的代码：
ListBox1.List = Array("One", "Two", "Three", "Four")ComboBox1.List = Array("Red", "Green", "Yellow", "Blue")
此代码应显示"Sub UserForm_Initialize()"和"End Sub"行间距
上该运行单击菜单，运行子过程/用户窗体若要运行用户窗体。
一、 二、 三和四个显示在列表框控件中 ； 和红、 绿、 黄色，和蓝色显示在组合框控件。