EXCEL高手请进

2025-02-28 23:56:06

推荐回答（1个）

回答1：

得保证Listbox中有选择项，不为空。
窗体代码这样写就可以了。
Private Sub UserForm_Activate()
Dim i As Integer
For i = 2 To 13
ListBox1.AddItem Sheets(i).Name
Next i
ListBox1.ListIndex = 0
End Sub

最新问答

铁路局签合同都是一签签几年啊？

小米商城卖的手机是真的吗会不会是骗人的有谁在哪里买过吗？

福鼎市区怎么去嵛山岛旅游？怎么坐车？门票和路费要多少？

这两天从包头到北京的高速堵不堵？？？

希望中学初三了，有点跟不上，孩子想学，给我推荐个班吧？