msoFileDialogOpen 问题请教

ME.李 · 发表于 2024-10-20 22:51

请教下大神，小弟仿照论坛里的一个帖子写了个程序但是COPY 数据后不成功还请各位大神指点方框内这句话没成功调试了很久还是没哟成功

饮冰e士 · 发表于 2024-10-20 23:20

Sheets.Count
少一个s。
前面部分好像也有点问题吧

ME.李 · 发表于 2024-10-21 07:59

饮冰e士发表于 2024-10-20 23:20
Sheets.Count
少一个s。
前面部分好像也有点问题吧

前面对的啊

excel玉米 · 发表于 2024-10-21 10:50

选择文件夹要用msoFileDialogFolderPicker，选择文件打开用msoFileDialogOpen，还有一点小问题，已修改如下图：

ME.李 · 发表于 2024-10-21 11:18

excel玉米发表于 2024-10-21 10:50
选择文件夹要用msoFileDialogFolderPicker，选择文件打开用msoFileDialogOpen，还有一点小问题，已修改如下 ...

那如果要用 open 该怎么使用，我就是选择那个文件后打开再执行复制能不能实现了

excel玉米 · 发表于 2024-10-21 11:42

ME.李发表于 2024-10-21 11:18
那如果要用 open 该怎么使用，我就是选择那个文件后打开再执行复制能不能实现了

你是说用open打开工作薄后，复制到这个工作薄内？然后再将这个工作薄另存到桌面？
可以实现的哦，无非是将这个工作薄打开，然后用set 指定这个工作薄，复制到这个工作薄中，保存一下

ME.李 · 发表于 2024-10-21 11:48

excel玉米发表于 2024-10-21 11:42
你是说用open打开工作薄后，复制到这个工作薄内？然后再将这个工作薄另存到桌面？
可以实现的哦，无非是 ...

msoFileDialogOpen 不是可以打开工作簿打开工作薄后，复制到这个工作薄的最后一个表内然后再将这个工作薄另存到桌面

excel玉米 · 发表于 2024-10-21 13:18

ME.李发表于 2024-10-21 11:48
msoFileDialogOpen 不是可以打开工作簿打开工作薄后，复制到这个工作薄的最后一个表内然后再将这个工 ...

并不建议用msoFileDialogOpen打开工作薄，因为选择工作薄后，跟着用.Execute来执行打开工作薄的操作，不能用set+变量名来指定该对象，后面无法对这个对象进行精细的操作。

excel玉米 · 发表于 2024-10-21 13:34

ME.李 · 发表于 2024-10-21 17:15

excel玉米发表于 2024-10-21 13:18
并不建议用msoFileDialogOpen打开工作薄，因为选择工作薄后，跟着用.Execute来执行打开工作薄的操作，不 ...

原来如此谢谢群友

		自动登录	找回密码
密码			免费注册