加载中…
个人资料
  • 博客等级:
  • 博客积分:
  • 博客访问:
  • 关注人气:
  • 获赠金笔:0支
  • 赠出金笔:0支
  • 荣誉徽章:
正文 字体大小:

Excel里给Shape对象指派带参数的宏

(2022-05-12 10:28:56)
分类: 编程
刘瑞祥
在Office中,我们往往需要给一些图形对象指派宏过程,比如我们弄若干个矩形框作为按钮,单击则在某个的单元格内显示相应的字符。怎么办呢?
我要说明一点,这个功能无法在PowerPoint中实现,只能在Excel里实现。下面我们就来看看怎么操作。
一、基本作法——以一个整数型参数为例
第一步:在Excel里写一个过程:
Public Sub Test ( a1 As Integer)
    Range("A1").Value = a1
End Sub
第二步:在Excel的第一个表里插入一个矩形
第三步:右点击这个矩形框,在快捷菜单里选择“指定宏...”,然后在对话框输入'Test 100',注意要用单引号扩起来。
Excel里给Shape对象指派带参数的宏
Excel里给Shape对象指派带参数的宏
大家可以看到,对话框中本来显示所有宏名的列表框(就是那个最大的矩形框)里是没有我们写的这个带参数宏的。这也是带参数宏的一个特点——不会显示在这里。所以我们要在宏名里手动输入这个宏。大家一定要注意宏名不能输错,参数的数目和类型要符合要求,而且参数和宏名之间要有一个半角空格,参数没有括号。
二、进阶作法——多个参数以及字符串参数
1.多个参数的问题
遇到多个参数的,参数之间要用半角逗号分开。比如要指定下面的宏:
Public Sub Test ( a1 As Integer , a2 As Integer)
    Range("A1").Value = a1 + a2
End Sub
这时应该在前面所示意的对话框里写成这样:
'Test 3,4'
2.字符串
如果要指派下面的宏:
Public Sub Test ( a1 As String)
    Range("A1").Value = a1
End Sub
需要在对话框里用双引号把参数引起来,写成这样:
'Test "abc"'

0

阅读 收藏 喜欢 打印举报/Report
  

新浪BLOG意见反馈留言板 欢迎批评指正

新浪简介 | About Sina | 广告服务 | 联系我们 | 招聘信息 | 网站律师 | SINA English | 产品答疑

新浪公司 版权所有