为什么重新打开excel后列表框中的内容就消失了，需要重新运行代码才能显示内容

Question

是否需要初始化控件，代码如何写？

Answer 1

excel2010 开始/样式可能有问题，太多无效自定义。
（转）解决办法：
可以用VBA批量删除自定义单元格样式：
1.按Alt+F11打开VBA编辑器，在代码窗口中输入下列代码：
Sub DelCustomStyles()
Dim st As Style
For Each st In ActiveWorkbook.Styles
If Not st.BuiltIn Then st.Delete
Next
End Sub

2.关闭VBA编辑器，返回Excel界面。按Alt+F8，打开“宏”对话框，执行“DelCustomStyles”宏即可一次删除所有自定义单元格样式，而内置的单元格样式会保留。