excel批量创建指定文件夹中所有子文件夹超链接
2020-04-14 xenice 1249 阅读'批量创建指定文件夹中所有子文件夹超链接。 Sub linkAll() Dim fs, f, f1, fc, i Set fs = CreateObject("Scripting.FileSystemObject") Set f = fs.GetFolder(ThisWorkboo...
excel核对第2列中的内容在第1列中是否存在
2020-04-14 xenice 1295 阅读'核对列2中的内容在列1中是否存在，结果放在列3中 Sub text() Dim bool '是否存在 For j = 1 To 86 '要核对的内容，放在第2列 bool = False For i = 1 To 327 '被查找的内容，...
excel提取字符串中的英语和数字
2020-04-14 xenice 1084 阅读'判断字符是否为a-z,A-Z,0-9中的一个 Function ChrCompare(chr As String) As Boolean If chr Like "" Or _ chr Like "" Or _ chr Like "" Then ChrCompare ...
热门文章
-
OneNice简洁大方且开源免费的WordPress主题 17106 阅读 -
Bootstrap4显示和隐藏元素 5072 阅读
-
mysql批量去除重复记录 4163 阅读
-
OneNice Pro简洁且强大的WORDPRESS主题 4124 阅读
-
-
loadjs - javascript动态载入css和js文件 2088 阅读
-
BT宝塔中安装nodejs 2023 阅读
-
github无法加载或不显示图片问题 1907 阅读
