VBA动态生成多选框checkbox

zpmloveyou · 发表于 2014-6-24 21:00

如何做到这种要求！?????????????

xytd · 发表于 2014-6-25 09:46

谢谢，学习了

20010415 · 发表于 2015-3-7 16:18

本帖最后由 20010415 于 2015-3-7 16:42 编辑

如果添加到第25个到28个选项的时候，就会只显示前20个噢..添加到第29个开始往后继续添加又正常了..

求搞手解决哦...

aman1516 · 发表于 2015-3-7 21:37

不错，学习一下

rmajly · 发表于 2015-3-7 22:40

这个真不错，太厉害了

wangds-2007 · 发表于 2015-3-8 06:03

不错，学习了，备用。

小霞_JISUXIA · 发表于 2015-11-24 16:46

学习了，先用了，慢慢学。。。

其中有一个问题：我在用的时候，发现如果SHEET3的A列行数/10如果大于0.5小于1的话，就会出错，所以我就改了

Private Sub UserForm_Initialize()
'先计算有多少个控件，每10个换列
If Sheet3.Range("A2").End(xlDown).Row / 10 > Round(Sheet3.Range("A2").End(xlDown).Row / 10, 0) Then
counts = Round(Sheet3.Range("A2").End(xlDown).Row / 10, 0) + 1
Else
counts = 1
End If

afdadas · 发表于 2016-3-17 00:55

谢谢分享！！！

imonior · 发表于 2016-3-17 02:53

学习了，谢谢分享！

audychu · 发表于 2016-3-26 09:56

多谢分享！！！目前只学习到用LISTBOX做双击选上。做不到这种加框选的。多谢啦。试一下。

		自动登录	找回密码
密码			免费注册

[原创] VBA动态生成多选框checkbox