启动Excel并打开一个2003集的下拉菜单的工作簿数据的有效性（如工资Xls），然后单击菜单工具；具有；具有Visual Basic宏命令，；编辑；Visual Basic编辑器；V；Visual Basic；然后编辑；在窗口中，双击项目；VBAProject面板Sheet1（*）（*；对于快速输入重复数据表当前需要的选项），在弹出的窗口中输入下列代码：
明确选择
私有子worksheet_selectionchange（ByVal目标范围）
如果目标。柱= 3然后application.sendkeys % {下}；
如果目标。柱= 4然后application.sendkeys % {下}；
端子
在上述代码完成后，关闭；Visual Basic编辑器窗口，此时，我们输入的代码将自动保存。
提示：代码的意思是，当我们选择第三列和第四列（C列和D列）的任何单元格时，我们将自动扩展下拉菜单的数据有效性。在实际操作过程中，您可以灵活地修改两个自然数，以满足他们的需要。
的操作，完成后关闭工资。Xls并保存更改，然后重新打开它，然后选择任何C柱或D细胞柱（图11细胞），那么你可以在这一栏的下拉菜单看到数据有效性自动展开细胞。如图A所示，通过这种方式，我们可以比原来更快地输入这些重复的数据。
