Json常用来存储数据，使用ScriptControl对象方法将Json数据提取到Excel中。 代码如下： SubJsonToRng() D...

VB使用正则表达式实现去除HTML标签函数，适用于网抓。 Function nohtml(str As String) As String ...

最近在做一个批量替换程序，之前使用VBA在Excel内部调用任何方法速度都很快（例如方法1），但是外部调用Excel对象次数多了，程序就运行很慢...

Sub Mycell()Application.CommandBars("Mycell").DeleteWith Application.Com...

Clipboard.Clear '清空粘贴板Clipboard.SetText XXX '将文本复制到粘贴板

Excel有时出错，造成有很多的无用样式，甚至造成全部样式的丢失，这时，需要先清除这些错误的样式再进行修改。删除样式的代码如下： Sub Del...

使用Shell对象的的方式获取选择的文件夹路径

在读取JSON文件时，有时返回的是多个JSON文件数列，出现这样的情况时，如果是符合JSON文件格式则可以直接读取，如果不是，则需要进行补全。例...