使用filesystemobject打开文件判断不是当前工作簿时进行复制合并

sero61

如题，各位大神老师。使用filesystemobject打开文件，判断不是当前工作簿时进行复制合并。

现在的问题是，当前工作簿名称（合并.xlsm）与使用fso的getfolder获取当前工作簿目录下文件名(合并.xlsm)，不相同时为什么绕过了if判断。
在线请大神指点

sero61

自己顶一下

哈哈理解

测试了一下能进IF，最好判断下隐藏文件否则应该会报错

sero61

哈哈理解 发表于 2025-1-12 18:27
测试了一下能进IF，最好判断下隐藏文件否则应该会报错

目的是调取的文件与当前文件同名时，不进入IF判断
代码文件目录下没有隐藏文件

ynzsvt

~$ 带头的文件不用处理的，要跳过。。。是已经打开的文件的一个副本。

micch

加个if忽略~开头文件，

ykcbf1100

Set wb = Workbooks.Open(File.Path)，这句错了
应该是： Set wb = Workbooks.Open(File)

sero61

micch 发表于 2025-1-12 19:10
加个if忽略~开头文件，

感谢回复 测试一下

sero61

ykcbf1100 发表于 2025-1-12 19:11
Set wb = Workbooks.Open(File.Path)，这句错了
应该是： Set wb = Workbooks.Open(File)

感谢草爷回复
Set wb = Workbooks.Open(File.Path)，这句错了
应该是： Set wb = Workbooks.Open(File)
这２句没有影响到ｉｆ判断
问题是遍历到 代码文件时，ｉｆ判断应该是ｔｒｕｅ ，但代码仍然得到是ｆａｌｓｅ进入了ｉｆ语句

ykcbf1100

sero61 发表于 2025-1-12 20:48
感谢草爷回复
Set wb = Workbooks.Open(File.Path)，这句错了
应该是： Set wb = Workbooks.Open(File) ...

上附件吧。