![excel 宏用于重置/刷新具有下拉列表的表格列](https://linux22.com/image/1431420/excel%20%E5%AE%8F%E7%94%A8%E4%BA%8E%E9%87%8D%E7%BD%AE%2F%E5%88%B7%E6%96%B0%E5%85%B7%E6%9C%89%E4%B8%8B%E6%8B%89%E5%88%97%E8%A1%A8%E7%9A%84%E8%A1%A8%E6%A0%BC%E5%88%97.png)
我是 Excel 宏的新手,如果我的问题看起来很愚蠢,请多多包涵。我在工作表中创建了一个有四列的表格 (listobjects)。第四列通过数据验证与下拉列表合并,其值为“a、b、c、none”。现在,我第一次打开工作表,从下拉列表中选择值,它工作正常,但第二次打开工作表时,列中的下拉值与之前输入的值相同。有谁能帮我提供一个宏代码,我可以将其分配给一个按钮,单击该按钮会将下拉值重置为“无”(作为默认值),并允许我从下拉列表中提到的选项中再次选择。
任何线索都将不胜感激。 Pavan Patro
答案1
我不确定你为什么要这么做。但以下宏应该可以工作(因为我刚刚测试过)
假设您的表名是 Table1,这将清除所有内容并使其清空:
Sub ClearChoice()
ActiveSheet.ListObjects("Table1").ListColumns(4).DataBodyRange.ClearContents
End Sub
或者,如果您愿意,您可以将其设置为“无”:
Sub ClearChoice()
ActiveSheet.ListObjects("Table1").ListColumns(4).DataBodyRange.Value = "none"
End Sub