excel 宏用于重置/刷新具有下拉列表的表格列

excel 宏用于重置/刷新具有下拉列表的表格列

我是 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

相关内容