- 博客(11)
- 收藏
- 关注
RSS订阅原创 VBA--实例1.3--数据分类汇总
实例数据分类汇总目标 以班级为筛选条件将数据条分类，并保存到新工作簿中 demo分解 创建目标sheet 根据筛选条件逐一汇总到目标sheet move sheet 到新的工作簿 文件 不知怎们上传demo文件知道的留言一下 技术思辨 数据copy时候因为...
2019-07-09 13:35:44
6176
原创 VBA-- 实例1.2多工作簿多工作表的数据汇总
实例多工作簿多工作表的数据汇总目标 excel中多表单据中特定cell中的内容汇总成数据条。 demo分解 在实例1.1的基础上需要对工作簿进行操作。 依次打开工作簿用到了Dir()函数 因为不在统一工作簿内，需要对targetbook和activeworkbook辨别 文件 不知怎们上传demo...
2019-07-08 17:30:41
5309
原创 VBA--实例1.1--多表单据汇总
实例多表单据汇总目标 excel中多表单据中特定cell中的内容汇总成数据条。 demo分解 usedrange的首个非空的单元格定位 实时更新的数据清除 文件 不知怎们上传demo文件知道的留言一下 技术思辨 循环定位range方式： 方式1：可以是cell()的变量变化。...
2019-07-08 14:24:08
1144
原创 VBA---实战技巧(持续更新中)
实战技巧注意要点 注意add sheet后的activesheet是什么 Worksheets.Add after:=Worksheets((Worksheets.Count)) 新建表后将被activeate 添加的新列表总排至最末 Worksheets.Add after:=Workshe...
2019-07-07 10:42:05
450
原创 VBA---其他
其他错误 on error goto 默认 on error resume next error.number error.source error.description
2019-07-07 10:38:42
98
原创 VBA---界面交互
界面交互控件box Dim str As String str = InputBox(prompt:=" "[,Title:=" ",Default:=" ",xpos:=20,ypos:=25]) As String屏幕默认1/2和1/3] str = Application.InputBox(prompt:=" "[,Title:=" ",De...
2019-07-07 10:37:16
1742
原创 VBA ---对象
对象Application Application.ScreenUpdating=True Application.DisplayAlerts=True Application.EnableEvents=True 显示警告 事件仅监测一次 Application.WorksheetFunction.Coun...
2019-07-07 10:35:30
524
原创 VBA---逻辑语句
逻辑语句 If True Then ….. If True Then ….. ElseIf True Then …… Else …… EndIf Select C...
2019-07-07 10:25:55
573
原创 VBA---Dimension声明
Dimension先声明后赋值Option Explict Static 本过程 代码运行期间都保留 Private 本模块 Public 模块间 可替换Public Const pi As Currency = 3.14 ...
2019-07-07 10:24:24
336
原创 VBA基础---字符类型及算数运算符号
Base类型 Byte Boolean single! currency@ Double# date ## integer% long & decimal String [*10] $ Object null is noting Variant 算数运算符 (...
2019-07-07 10:20:12
952
空空如也
空空如也
TA创建的收藏夹 TA关注的收藏夹
TA关注的人