excel vba textbox 如何用变量表示(如要表示100个textbox编号1到100的)
是否可以用fori=1to100textboxi或者什么textbox&i之类的(以上2个都是行不通的)...
是否可以用
for i= 1 to 100
textboxi
或者什么textbox & i 之类的(以上2个都是行不通的) 展开
for i= 1 to 100
textboxi
或者什么textbox & i 之类的(以上2个都是行不通的) 展开
2个回答
展开全部
如果该控件位于UserForm窗体中,那么我们可以用Controls集合来表示指定的控件,
例如,UserForm1中有三个控件,Label1,Label2,TextBox1
那么,我们可以这样表示:
a = 1 : b = 2
UserForm1.Controls("Label" & a).Caption 表示Label1.Caption
UserForm1.Controls("Label" & b).Caption 表示Label2.Caption
UserForm1.Controls("TextBox" & a).Text 表示TextBox1.Text
如果你的控件位于工作表中,那么我们可以使用OleObjects集合来表示指定的控件,
例如,Sheet1工作表中有三个控件,Label1,Label2,CommandButton1
a = 1 : b = 2
那么我们可以这样表示,注意Object不可省略:
Sheet1.OleObjects("Label" & a).Object.Caption 表示Label1.Caption
Sheet1.OleObjects("Label" & b).Object.Caption 表示Label1.Caption
Sheet1.OleObjects("CommandButton" & a).Object.Caption 表示CommandButton1.Caption
例如,UserForm1中有三个控件,Label1,Label2,TextBox1
那么,我们可以这样表示:
a = 1 : b = 2
UserForm1.Controls("Label" & a).Caption 表示Label1.Caption
UserForm1.Controls("Label" & b).Caption 表示Label2.Caption
UserForm1.Controls("TextBox" & a).Text 表示TextBox1.Text
如果你的控件位于工作表中,那么我们可以使用OleObjects集合来表示指定的控件,
例如,Sheet1工作表中有三个控件,Label1,Label2,CommandButton1
a = 1 : b = 2
那么我们可以这样表示,注意Object不可省略:
Sheet1.OleObjects("Label" & a).Object.Caption 表示Label1.Caption
Sheet1.OleObjects("Label" & b).Object.Caption 表示Label1.Caption
Sheet1.OleObjects("CommandButton" & a).Object.Caption 表示CommandButton1.Caption
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询
广告 您可能关注的内容 |