excel批量创建指定文件夹中所有子文件夹超链接
2020-04-14 xenice 603 阅读'批量创建指定文件夹中所有子文件夹超链接。 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 607 阅读'核对列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 509 阅读'判断字符是否为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主题 8483 阅读 -
Bootstrap4显示和隐藏元素 3075 阅读
-
mysql批量去除重复记录 2429 阅读
-
-
OneNice Pro简洁且强大的WORDPRESS主题 1584 阅读
-
github无法加载或不显示图片问题 1115 阅读
-
BT宝塔中安装nodejs 1109 阅读
-
Javascipt自定义哈希表 1031 阅读
