锐客网

  1. 首页 > 睿知 > >

vba编程必背50个程序，vba 程序

经验分享睿知

1，vba 程序直接引用工作表函数K＝worksheetfunction.MMULT(worksheetfunction.MINVERS(range("A2:C4"),range("A6:C8")) worksheetfunction是工作表函数对象，可以调用工作表函数，工作表函数中，参数中的区域，可以用RANGE来指定，其他参数一样用 。如果你不适应这样写法 ， 可以用以下方法直接写K＝evalute("=mmult(A2:C4,A6,C8)")，就是直接把公式放在这个函数中即可还有用大括号直接写的，但据说速度较慢，你可查看下其他资料矩阵乘法运算的原理，就一句 ， 新矩阵第i行第j列位置上的数＝第一个矩阵第I行上数与第二个矩阵第J列上的数对应相乘的乘积和 。所以要求二个矩阵的第一个行元素个数＝第二个列元素个数 。而这种计算的函数，想必你也很熟悉（SUMPRODUCT）！
2，编写VBA程序Sub aaaaaaa()Dim a As RangeDim b As IntegerFor Each a In Range("a1:e4")b = Int((999.9 - 100 + 1) * Rnd + 100)a = bIf InStr(b, "7") Thena.Interior.ColorIndex = 3Elsea.Interior.ColorIndex = 0End IfNextEnd Sub你把原始资料模版发上来应该可以截图的很少会有人花时间去建模版，然后编VBA的下面是我当初在excel中学习的方法：1. 点菜单的工具，宏，录制宏，做一些简单的动作 ， 如在a1输入1，在b1输入 =a1*2 ， 将b1的字体颜色设为红色，停止录制 。同时按alt和f11进入vb界面 ， 在左上窗口找到模块一，双击，右边窗口出来了你录制的宏的代码 。懂英语最好了，一句一句就象白话文:)2. 裘伯君说：编程只需掌握判断语句 。vba中典型的判断语句如下：if 某条件 then一些语句else又一些语句end if简单的if语句可以是if 某条件 then一些语句end if更简单的判断语句为if 某条件 then 一语句举例，在你录制的代码处粘贴以下宏：sub test()if 5 > 2 then msgbox "i love u!"end sub按f5运行此宏，你会看到一消息框，“i love u!"所有的操作无非是一大堆逻辑判断，即if语句中再套if语句 。3. 除了判断语句，还应掌握循环语句 ， 应为电脑擅长的就是重复工作:)粘贴以下代码在有你录制宏的地方：sub test2()for i = 1 to 10cells(i,1)=icells(i,1).font.colorindex = inext iend sub把宏的窗口变小些 ， 让你能看到excle表格的a列，在宏的窗口中重复按f8 ， 看excel里的变化 。for ... to ...一些语句next是经典的循环语句，刚才那个代码的意思是从1重复到10，其中cells(i,1)是工作表中的第i行第1列，font.colorindex你录制的第一个宏里有的，就是设字体颜色 。多来qq问问中搜搜，比如直接搜vba，或者点我的名字看有哪些vba的问题:)【vba编程必背50个程序，vba 程序】

    推荐阅读


    上一篇：软件开发网课培训班，软件开发培训机构有哪些

    下一篇：买淘宝店铺多少钱一个，买个淘宝的天猫店大概多少钱