Question

word中有多个checkbox1,2,3……n复选框，如何用VBA的循环对其赋值

• 你的回答被采纳后将获得：
• 系统奖励15（财富值+成长值）+难题奖励20（财富值+成长值）+提问者悬赏5（财富值+成长值）

Answer 1

循环通过改变checkbox的caption就可以了

追问

最主要是VBA不识别checkbox&i,如何实现循环

追答

我可以，你把word发来

追问

好像传不了附件了，你能说一下吗，或者加你好友

Answer 2

定义控件数组
dim a(n) as textbox
a(0) = textbox1
a(1) = textbox2
以此类推
赋值的时候，
for i = 0 to n
a(i).text = "....."
next
就可以了

追问

就是因为一个一个赋值太繁琐所以才想循环赋值，前面的控件数组又成了一个一个赋值了，主要是我的word里面有好几百个checkbox