如何为工作表制作一个下拉列表
我一共有五张工作簿。 我的任务是在第一张表中创build一个组合列表button,可以指向其他四个。 如果用户select一个表格名称,那么该button将自动激活选定的表格。 纸张不太可能被删除,尽pipe可能会添加纸张。
我甚至不知道如何让名单显示在组合列表中。
为了使combobox更改活动工作表,我相信你将需要使用VBA(因为我不知道如何使用validation列表)。
要做到这一点,你必须:
第一个 – 将combobox添加到您的第一个工作表,并正确命名(我称之为cmbSheet)。 我build议使用ActiveX Combobox(在Excel 2007中的“开发人员”选项卡下)。
第二 – 打开VBA并将下面的代码添加到您的工作簿代码。 每次打开工作簿时,此代码将使用工作表名称填充combobox。
Private Sub Workbook_Open() Dim oSheet As Excel.Worksheet Dim oCmbBox As MSForms.ComboBox Set oCmbBox = ActiveWorkbook.Sheets(1).cmbSheet oCmbBox.Clear For Each oSheet In ActiveWorkbook.Sheets oCmbBox.AddItem oSheet.Name Next oSheet End Sub
3rd – 现在,转到第一个工作表(已添加combobox的位置)的代码,并添加将激活combobox中所选工作表的代码。 代码是
Private Sub cmbSheet_Change() ActiveWorkbook.Sheets(cmbSheet.Value).Activate End Sub
现在,当combobox值改变时,相应的纸张被激活。
让我们知道,如果不清楚,我们会帮助你。