[已解决]求教，默认设置的问题//////////////////////////////////

iphone9

附图

附件 默认名称设置.rar (12.43 KB, 下载次数: 5)

2015-12-12 11:13 上传

点击文件名下载附件

最佳答案

月排行榜 / 总排行榜

七彩屋

2015-12-12 14:03

默认名称设置.rar (12.53 KB, 下载次数: 4)

2015-12-12 14:03 上传

点击文件名下载附件

跳转到最佳答案楼层

七彩屋

ComboBox2.ListIndex = 0  '从0开始是第一个值，如果是C的话就是2

七彩屋

1. Private Sub UserForm_Initialize()
   
2. cA = Range("C65536").End(xlUp).Row + 1
   
3. For IA = 6 To cA
   
4. ComboBox1.AddItem Range("C" & IA)
   
5. Next IA
   
6. 
   
7. cB = Range("C65536").End(xlUp).Row + 1
   
8. For IB = 6 To cB
   
9. ComboBox2.AddItem Range("C" & IB)
   
10. Next IB
    
11. 
    
12. 
    
13. ComboBox2.Style = fmStyleDropDownList
    
14. ComboBox1.ListIndex = 0
    
15. ComboBox2.ListIndex = 2
    
16. End Sub

复制代码

iphone9

七彩屋 发表于 2015-12-12 11:28

老师！

我的意思：

例如：在ComboBox2选择好数据【D】，在下次打开窗体是ComboBox1自动=ComboBox2的内容【D】

七彩屋

默认名称设置.rar (12.53 KB, 下载次数: 4)

2015-12-12 14:03 上传

点击文件名下载附件