1、动图演示
2、选择diy工具箱
3、选择收纳箱命令按钮
4、选择本地新建命令
5、弹出对话框在代码区域输入Sub 返回选择区域的行数和列数()x = Selectio艘绒庳焰n.Rows.County = Selection.Columns.Countmsgbox "选中了" & x & "行," & y & "列"End Sub
6、然后设置函数说明和所属类别
7、确定后找到刚刚添加的操作命令
8、单击执行按钮即可看到选中了几行几列
1、动图演示
2、选择diy工具箱
3、选择收纳箱命令按钮
4、选择本地新建命令
5、弹出对话框在代码区域输入Sub 返回选择区域的行数和列数()x = Selectio艘绒庳焰n.Rows.County = Selection.Columns.Countmsgbox "选中了" & x & "行," & y & "列"End Sub
6、然后设置函数说明和所属类别
7、确定后找到刚刚添加的操作命令
8、单击执行按钮即可看到选中了几行几列