Dim i As Integer
i = 1
ActiveWorkbook.Worksheets(1).Label & i.Caption = "Checked"
我收到上述代码的语法错误,有人可以帮助我将属性名称指定为变量,这样我就可以通过for循环运行此操作以将其应用于多个标签。
谢谢。
最佳答案
如果是Form控件,则:
ActiveWorkbook.Worksheets(1).Shapes("Label " & i).TextFrame.Characters.Text = "Checked"
如果是ActiveX控件:ActiveWorkbook.Worksheets(1).OLEObjects("Label" & i).Object.Caption = "Checked"
关于excel - 选择具有变量名称的属性,我们在Stack Overflow上找到一个类似的问题: https://stackoverflow.com/questions/23448571/