如何快速学习Excel VBA？ _经验知识

文章插图

文章插图
其他观点：
从我个人学习VBA的经验来看。学习VBA 。首先就要学会使用录制宏这个功能。这个可以解决工作中大部分问题。
其次。找一本VBA的书。从基本语法。数字类型。基本语句(循环。数组。字典。正则。事件)慢慢积累。
最重要的要有对象思维。VBA有EXCEL对象。Range对象。Sheet对象等等。
学会积累和修改代码。遇到比较好的代码可以收藏起来。
比如：
打开指文件夹下的文件：
Sub FindFile()
Dim path, name, fileName As String
name = \"CSV\" '要查找的文件夹
path = ThisWorkbook.path & \"\\" & name & \"\\" '拼接文件夹下的路径
fileName = Dir(path & \"*.csv\") '查找文件夹下是csv后缀的文件
Do While fileName <> \"\"'停止条件是文件夹下没有了文件
Workbooks.Open (path & fileName) '打开文件
fileName = Dir '找到下一下文件
Loop
【如何快速学习Excel VBA？】End Sub
查找单元格内容：
sum test()
Dim rs As Range
With Range(\"A1:C30\") '查找的区域
Set rs = .Find(2) '查找单元内容是2的。返回单元格对象
If Not rs Is Nothing Then '如果查找到单元格内容是2的就遍历
Do
rs.Value = https://www.wangchuang8.com/"修改了\"
'rs.Interior.ColorIndex = 3 '单元格背景色
rs.Interior.Color = RGB(255, 220, 210)
Set rs = .FindNext(rs) '找到下一个单元格
Loop While Not rs Is Nothing
End If
End With
End sub
高级筛选：根据条件区域来筛选并复制：
Sheets(\"DATA\").Columns(\"A:D\").AdvancedFilter Action:=xlFilterCopy, _
CriteriaRange:=Range(\"B1:C2\"), CopyToRange:=Range(\"A4\"), Unique:=False
隐藏偶数行：
ActiveSheet.UsedRange.Rows.Count //最后下到上第一个非空行
For i = ActiveSheet.UsedRange.Rows.Count To 2 Step -1
If i Mod 2 = 0 Then Rows(i).Hidden = True
Next i
这样。把常用的的VBA代码保存下来。把每条语句加上注释。多多使用。
好多代码都是可以套用的。不用背代码。只要多搜集整理。用的时候能找到就行。
其他观点：
但有问题就要及时解决啊。选择好一款实用的效率工具。真的很有必要。（文末有免费福利）
会使用excel 。就会使用云表平台
在这里。我可以给大家推荐一款国产实用的效率工具。
这款效率工具叫云表企业应用平台（以下简称云表）。它是一款无代码开发平台。同时也是一款国产新一极办公神器。其创始人为原金山WPS研发团队成员。

文章插图
只要你使用过excel 。那么使用起云表来。毫不陌生。
因为。它的操作界面和excel长得很像。使用方法也如出一辙。

文章插图
不过。云表使用起来更加简易。你只需要记住它的“三板斧”：数据接口+填表公式+业务公式。办公场景遇到的各种疑难杂症。便能迎刃而解。

文章插图
比如。权限控制。流程审批。工作流。多人协同。小程序。H5 。网站。外接数据源。微商城。消息推送。闹钟提醒。一物一码。与用友、金蝶、浪潮、企业微信、钉钉、PDA、电子秤、高拍仪、地磅等外部系统进行集成封装。进行复杂的数据运算。如数据透视、数据分析等。生成移动端app......
开发方式比“Excel +VBA”更简单。普通人就能学会
云表平台的开发方式。其实不算难。
使用者。只需要在设计UI界面。进行一番可视化的拖拉拽操作。输入中文文本配置信息即可。无多余重复的动作。