alt+F11 打开开发环境 注意须要启动宏,否则不能执行自定义的程序,保存后文件的后缀应该是:.xlsm 选择一个 sheet 或一个模块,右键查看代码,便可编辑代码html
函数能够用返回值,而子程序不能用返回值编程
Function myFun(a,b) myFun=a*b+2 '返回值不使用return,而是直接赋值给函数名 End Function Sub mySub(a,b) MsgBox "result is"&(a+b) '链接字符串用& End Sub
查看代码时选择 Worksheet ,而后在右侧选择要绑定的事件,绑定后能够经过事件来触发对应的子程序api
Sub CopyRow() Worksheets("储值卡").Range("H1:I2000").Copy Worksheets("test").Select Worksheets("test").Range("C1:D2000").Select Worksheets("test").Paste End Sub
Call copyAll 'Call 子程序名 r=myFun(1,3) '调用有返回值的函数,像其它编程语言同样
Sub countRow() n = Range("A65536").End(xlUp).Row '获取非空的总行数 MsgBox n End Sub
相关文档:yii