VBA打开文件已停止工作

ollie · 发表于 2022-7-6 17:06:38

嘿伙计们

我为excel编写了一个文件比较脚本（我知道这不是excel论坛），它以只读方式打开两个文件。当我向将使用它的员工演示时，它起了作用，但当我向经理演示时，它很方便地停止了工作。有人能解释为什么会发生这种情况吗。

组合框1和2使用

copy


Dim fso As New FileSystemObject       
Dim fld As Folder                    
Dim fil As File   
Set fld = fso.GetFolder("C:\vba excel compare" 
For Each fil In fld.Files           
   ComboBox1.AddItem fil.Name         
   ComboBox2.AddItem fil.Name
next fil

我现在得到运行时错误1004

条例2。找不到xls。请检查文件名的拼写，并确保位置正确

任何帮助都将不胜感激

干杯
奥利。

rocheey · 发表于 2022-7-6 18:43:35

>>设置fld=fso。GetFolder（“C:\vba excel比较”

我首先在上面一行添加一个尾随括号。

然后检查文件名是否在您的组合框中

[编程交流] VBA打开文件已停止工作

发表回复

精选推荐