出于提高效率的原因,希望excel能够不需要人为干预的完成一些操作,学习excel宏的编写与调试: 第一列输入公式,第二类输出计算结果:(如果自动获取文件的行数,待补充) Sub Calc() a = [a1].Value [b1].Value = Evaluate(a) a = [a2].Value [b2].Value = Evaluate(a) a = [a3].Value [b3].Value = Evaluate(a) End Sub 改进:自动识别行数 Sub Calc() Dim
在excel的使用过程中,会用到一些自定义函数,可以使用宏轻松的实现这些功能,问题是必须使用“启用宏的excel”,这样用户每次打开时都要启用宏. 现用以按背景色计划为例,解决以上问题: 1.新建一个空白的excel,按alt+F11,打开VB界面,点击“插入”---“模块”---录入以下代码: //这个方法是计算相同颜色的单元格个数 Function CountColor(col As Range, countrange As Range) As Integer Dim icell As Ra