240 发简信
IP属地:香港
  • 004不同工作簿复制指定名称工作表

    将需要汇总的工作簿放在同一个目录,并新建一个名为" 汇总.xls"的工作簿 ,一个名为" 代码.xls"的工作簿。将下面的代码放入代码.xls,...

  • 003 不同工作簿复制第一张表

    在同一个目录下,复制所有工作簿第一张表。适合只有一张表的汇总。 Sub 按钮1_Click() Dim path, file, count,...

  • 002 去除工作表的公式

    Sub de() '去公式' Dim A As Worksheet For Each A In Sheets A.UsedRange =...

  • 001 一键生成带超链接的工作表目录

    在需要生成目录的工作表里插入下面的代码,运行即可。 Sub ml() Dim sht As Worksheet, i&, shtname$ ...

个人介绍
人生有欢乐有悲伤,事后想想,其实都不过如此,只需会心一笑。