在Excel中引用其他宏
在excel的使用过程中,会用到一些自定义函数,可以使用宏轻松的实现这些功能,问题是必须使用“启用宏的excel”,这样用户每次打开时都要启用宏。
现用以按背景色计划为例,解决以上问题:
1.新建一个空白的excel,按alt+F11,打开VB界面,点击“插入”---“模块”---录入以下代码:
//这个方法是计算相同颜色的单元格个数
Function CountColor(col As Range, countrange As Range) As Integer
Dim icell As Range
Application.Volatile
For Each icell In countrange
If icell.Interior.ColorIndex = col.Interior.ColorIndex Then
CountColor = CountColor + 1
End If
Next icell
End Function
//这个方法是计算相同颜色的单元格中的数据之和
Function SumColor(col As Range, sumrange As Range) As Integer
Dim icell As Range
Application.Volatile
For Each icell In sumrange
If icell.Interior.ColorIndex = col.Interior.ColorIndex Then
SumColor = Application.Sum(icell) + SumColor
End If
Next icell
End Function
在VB中点击保存,保存excel时选择“另存为”--“Excel 加载宏(*.xlam)”,把这个excel存储为sum.xlam文件。
2.打开要计算的excel,在此中选择开发工具--加载宏--浏览--选择sum.xlam,选中,点确认。
3.完成。
4.这样操作以后,只要打开excel就可以使用sumColor这个函数,不用启用宏。
最新文章
- Android中关于cpu/cpuset/schedtune的应用
- LINQ系列:Linq to Object分组操作符
- ReactiveCocoa源码拆分解析(四)
- mac安装redis
- 浅谈JavaScript中的正则表达式
- mysql 方法row_number()方法
- [SAP ABAP开发技术总结]物料、生产、采购、销售长文本
- UVa 400
- 表单,css
- 【HDOJ】1050 Moving Tables
- BaiduMap_SDK_DEMO_3.0.0_for_Xamarin.Android_by_imknown
- 读取指定excel,修改并某个值并另存到指定路径
- leetcode70 爬楼梯 Python
- gulp使用入门
- [20180914]oracle 12c 表 full_hash_value如何计算.txt
- JSP 动作
- oracle中number数据类型简单明了解释
- 解决 Error: ENOSPC: System limit for number of file watchers reached
- 前端面试(原生js篇) - DOM
- GoldenGate的监控
热门文章
- css position 绝对定位和相对定位
- MYSQL中的SELECT查询时进行运算
- js简介、基本语法、类型转换、变量、运算符、分支语句、循环语句、函数、函数调用
- (转)接口自动化测试 – Java+TestNG 测试 Restful Web Service
- Spring多数据源的配置和使用
- oninput,onpropertychange,onchange的用法和区别【转载】
- Intent 隐式跳转,向下一个活动传递数据,向上一个活动返回数据。
- git tag之后如何修改
- VC++NMAKE
- 资源 之 4.2 内置Resource实现(拾)