Excel VBA 可以将命令按钮的编号读入一个变量吗

Question

CommandButton1
k=?=1
只是举例

Answer 1

直接将按钮的 Caption 改为你所要的编号（1、2、3...）
调用时：k = Command1.Caption

Answer 2

k=Replace(CommandButton1.Name, "CommandButton", "")
即用替换的方法提取出来本回答被网友采纳

Answer 3

K=right(commandbutton1.name,len(commandbutton1.name)-13)追问

稍微解释下可以不

追答

right(text,n)截取字符串text的右边n个字符串
len(text)读取字符串text的长度
commandubtton1.name 控件commandubtton1的名称(字符串型)
13是commandubtton的长度
len()-13就是右边要截取的数字长度.
right(,len()-13)就是数字编号了.

追问

如果要通用命令呢
因为要相当多个命令按钮的编号

追答

多的话将上述语句嵌入循环.改用数组变量获取.

追问

举例一下吧，谢谢

本回答被提问者采纳