全民一起VBA实战篇笔记
lei_686
这个作者很懒,什么都没留下…
展开
-
全民一起VBA实战篇 专题4 第七回 递归不怕检索难,万缕千层只等闲
相关知识点:Collection对象: 用于存放任意多个对象,不需要事先指定其长度,常用方法: Add方法:添加一个元素 Clear方法:清空所有元素 Count属性:返回元素的总数例1 递归遍历子文件夹,将找到的文件夹名字存放在数组里...原创 2019-10-13 12:15:35 · 880 阅读 · 0 评论 -
全民一起VBA实战篇 专题4 第六回 递归法检索初体验,DIR函数惹麻烦
相关知识点:“.”和”..”意思“.”代表所在文件夹本身”..”代表所在文件夹的上一级文件夹例1 接收一个参数(比如”d:\vbademo\”),然后将该参数代表的文件夹中,所有子文件夹显示在工作表中(不必显示子文件夹的子文件夹)第一层的文件夹名字Option ExplicitDim i as longSub demo() i=1...原创 2019-10-13 12:14:13 · 533 阅读 · 0 评论 -
全民一起VBA实战篇 专题4 第四回 位运算处理零一变换,属性值识别文件类型
相关知识点:GetAttr 函数,文件或文件夹的名字,返回一个数字,代表该文件的各种属性。位运算(逻辑尺):and(按位与,位乘),将判断的属性值与属性返回的数值and,计算结果为判断的属性值,则此文件夹具备此属性,否则不具备。例1得到子文件夹的名字(返回不仅是文件夹的名字还有文件的名字)Sub dirdemo() Dim fname as ...原创 2019-09-15 15:38:46 · 718 阅读 · 0 评论 -
全民一起VBA实战篇 专题4 第五回 递归算法流程独特 大事化小思路清奇
相关知识点:区别于循环在于,把大问题转换成小问题,总结递进的推导公式;知道最小问题的答案(递归的停止条件)。例1 阶乘(循环语句)Sub demo() Msgbox 阶乘(4)End SubFunction 阶乘(n as long) Dim s, i s=1 For i=1 To n...原创 2019-09-15 11:35:35 · 1738 阅读 · 0 评论 -
全民一起VBA实战篇 专题4 第三回 建目录做拷贝有求必应,VBA玩文件无所不能
相关知识点:文件操作函数有时无法成功情况,有可能是windows文件夹权限,不允许删除修改等。MkDir(“文件夹路径和名称”) 根据指定路径和名称新建一个文件夹,如果该文件夹已经存在,则会发生错误FileCopy(“源文件名”,”目标路径与文件名”) 如果不存在该源文件,则会出错。Name函数 重命名一个文件或文件夹RmDir函数 删除一个空文件夹(该文件夹不能有任何...原创 2019-08-01 12:28:02 · 506 阅读 · 0 评论 -
全民一起VBA实战篇 专题4 第一回 Get 方法弹出文件框,可选参数过滤目标名
相关知识点:Application.GetOpenFilename方法:显示“文件打开”对话框,并将用户选中的文件名,作为一个字符串返回。如果用户点击“取消”按钮,则返回一个逻辑值False。GetOpenFilename(FileFilter,FilterIndex,Title,ButtonText,MultiSelect) 打开对话框 FileFilter 文件过...原创 2019-07-26 16:34:59 · 665 阅读 · 0 评论 -
全明一起VBA实战篇 专题3 第四回 环视功能预判位置,边界问题轻松解决
相关知识点:环视(Look Around)或译为“零宽度断言”,代表的不是字符,代表文本中一个位置。比如(?=abc)代表字符串中一个位置,该位置右边必须是“abc”。 (?=北京|$)可匹配这样一个位置:其中右边或者是“北京”,或者是行尾,|代表或者,$代表在多行模式下代表一行末尾。环视的四种形式:例1 北京车站分别显示在一列中。 Sub lookroundd...原创 2019-07-21 14:20:45 · 468 阅读 · 0 评论 -
全民一起VBA实战篇 专题3 第三回 捕获组只按括号计数,正则式可以嵌套加强
相关知识点:正则表达式捕获组:使用圆括号,将匹配结果中的局部内容单独抽取出来。(\d+)(-(\d+))+:作为分组,圆括号外的+是有意义的代表一个或多个捕获组 作为捕获功能,圆括号外的+是被忽略的,捕获组只是数圆括号的数量非捕获组:功能:让某个圆括号只用于分组,不捕获其中的内容。方法:将(内容)改为(?:内容),例如:(\...原创 2019-07-21 12:34:55 · 650 阅读 · 0 评论 -
全民一起VBA实战篇 专题4 第二回 文件框对象一身多形,属性化操作更加直观
相关知识点:Application.FileDialog 窗体编程相似,此对象代表一个文件对话框,可以是打开、保存等多种形式 FileDialog(1) 代表文件打开对话框,即msoFileDialogOpen,直接调用Execute方法,直接执行打开 FileDialog(2) 代表文件保存对话框,即msoFileDialogSaveAs,直接调用Exe...原创 2019-07-30 13:23:11 · 300 阅读 · 0 评论 -
全民一起VBA实战篇 专题3 第二回 转换日期要注意起点,匹配字符应注意方向
相关知识点:Format(原文本,期望格式,firstDayOfweek,firstWeekOfYear)firstDayOfweek可取值,每周的开始,星期几开始计算;firstWeekOfYear可取值,全年的起始周(例如2019/1/1,起始周),其中VbfristFullWeek,VbfirstFourDays与一周起始的指定星期几(firstDayOfweek)有关联,例如周起...原创 2019-07-16 08:59:09 · 286 阅读 · 0 评论 -
全民一起VBA实战篇 专题3 第一回 格式化规定各人迥异,Format函数一招摆平
相关知识点:Format(原始内容,期望格式,每周起始日,每年起始周)将原始内容(数字、日期、文本等)转换成指定格式的字符串并返回。除了第一个参数(原始内容)外,其他参数均为可选。 #:代表一位数字,”.##”:小数点后保留两位“##.##”:前后都是保留两位数,523.12格式化以后变成523.12不会截断整数部分例1 将数字转换为货币格式...原创 2019-06-28 12:56:23 · 383 阅读 · 0 评论 -
全民一起VBA实战篇 专题2 第四回 排序规则能由自己决定 数组赋值可用Array化简
相关知识点:Range.Sort: VBA 内置的排序方法,15个参数。(缺点只有3个关键字排序)(Key1,Order1,Type,Key2,Order2,Key3,Order3,Header,OrderCustom,MatchCase,Orientation,SortMethod,DataOption1,DataOption2,DataOption3)OrderCustom ...原创 2019-06-24 15:46:59 · 639 阅读 · 0 评论 -
全民一起VBA实战篇 专题2 第五回 多键排序无非多次循环,独特功能还需独自开发
相关知识点:多关键字排序原理:现对次要的列排序,再排序优先的倒序(从最次要开始)进行依次排序,就能实现Worksheets.Sort 工作表排序,自学例1 足球赛积分表排序,四个排序列 本来的优先级是总积分、获胜次数、净胜球、进球数 实现排序就得倒序进球数、净胜球、获胜次数、总积分按照这个顺序排序,最关键的最后排Sub demo2()...原创 2019-06-26 13:02:13 · 367 阅读 · 0 评论 -
全民一起VBA实战篇 专题2 第一回 同列匹配循环有术,起点唯君马首是瞻
相关知识点:跨列匹配同列匹配双循环,先按照手工的方法去模拟解决问题,然后画流程图,技巧如下:打标签 里层循环与外层循环是关联的,身后查找例1 审计超过限额交易就显示红色(跨列数据放在一起匹配)Sub demo1() Dim j as long, k as long, name as string, amount as long...原创 2019-06-16 15:57:43 · 439 阅读 · 1 评论 -
全民一起VBA实战篇 专题1 第二回 可选参数灵活搭配 格式内容一应俱全
相关知识点:Application.FindFormat属性:用于指定后面Find等方法中需要查找的格式,与Range的方法一致 Application.FindFormat.Font.Bold=TrueRange.Find(What,After,LookIn,Lookat,SearchOrder,SeachDirection,MatchC...原创 2019-06-16 13:07:01 · 536 阅读 · 0 评论 -
全民一起VBA实战篇 专题1 第一回 FIND方法实现快速查找 通配符号提供灵活选择
相关知识点:Range.Find 方法,在该Range类对象代表的单元格区域中,搜索含有指定内容的单元格。Find只返回第一个找到的结果,例找374这个数字:Range(“B2,G14”).Find(374),返回Range(”C4”)Range.Find(What,After,LookIn,Lookat,SearchOrder,SeachDirection,MatchCase,Ma...原创 2019-06-16 10:13:17 · 2707 阅读 · 0 评论 -
全民一起VBA实战篇 专题2 第三回 VBA已有Sort方法,欲排序何必再写循环
相关知识点:要知道轮子是怎么造出来的,不要重复造轮子。Range.Sort: VBA 内置的排序方法,15个参数。(Key1,Order1,Type,Key2,Order2,Key3,Order3,Header,OrderCustom,MatchCase,Orientation,SortMethod,DataOption1,DataOption2,DataOption3)Ke...原创 2019-06-19 13:53:10 · 1347 阅读 · 0 评论 -
全民一起VBA实战篇 专题2 第二回 选择法轻松上手,双循环巧妙排序
相关知识点:选择排序法:在剩余数字中找出一个最大的数字,填入第一个空白方格里,如此反复,直到没有剩余数字。缺点是运行效率太低其他方法:堆排序,基数排序,快速排序,希尔排序,桶排序,归并排序,二叉树排序application.ScreenUpdating=False:关闭屏幕刷新提高运行效率,恢复刷新=TrueRange.Sort: 内置的排序方法例1按照GDP对国家进行排...原创 2019-06-19 13:51:54 · 768 阅读 · 0 评论