问题标签 [fso]

我想遍历我的所有子文件夹并将它们重命名为“example”。我不知道所有子文件夹的文件夹名称。我的代码根本不起作用。

文件夹结构示例：

这是代码：

我正在使用 Excel 加载项 ExceltoWord 从 Excel 工作表中自动填充 Word 文档。我已按照此处原始开发人员的说明进行操作。

我正在使用“我在 Word 中创建了通用书签指示符”和“我将书签指示符直接放在单元格中 - 左侧”选项，最后带有“删除 Word 文档”。保存设置时出现 MS Visual Basic 错误

运行时错误“429：”ActiveX 组件无法创建对象。

我尝试过切换不同格式的 Excel 表格和 Word Doc 和 Word 模板，以及在保存配置时关闭和打开 Word Doc。

VBA 在Set FSO = CreateObject("Scripting.FileSystemObject") 'late binding.

我正在自动提取网页并将内容写入文本（HTML）文件。

为此，我设置了一个像这样的文件系统对象

当我尝试将提取的内容写入文件时，有时会收到错误 5（无效参数）。这是代码：

当 innerHTML 的长度在 25800 和 28000 之间时它会中断（我还没有计算出确切的限制）。

有谁知道是否可以增加 WriteLine 限制或建议以不同的方式执行此操作？

我正在编写一个 VBA 代码来提取源文件夹中的文件并移动到我的文件夹进行分析，以免损坏原始文件。但是，如果检测到名称相同，我将面临编写替换旧文件的代码的困难。

我在一些论坛上看到过这段代码（或类似的），但有些没有用于映射的行：“objNet.MapNetworkDrive “A：”，SharepointAddress”

计算机/网络省略此代码是否安全？

我是 VBS 的新手，我正在尝试创建一个对文件夹中的一些文件进行排序的脚本，如果满足条件，应该输出一个 MsgBox 以及打印文件。MsgBox 部分有效，但打印功能无效。感谢您的任何指导。

我知道如何将文件从文件夹获取到可访问的表中，但是由于所有 pdf 文档都有一个名称，关系号是其中的一部分，我想知道 vba 是否可以选择所有文件，例如名称中包含数字 12197 ，也许带有 like* * 声明。该数字在文件名中的顺序可能不同。

谢谢

我非常感谢您花时间阅读我的消息，并且我了解堆栈溢出的目的更多是针对失败的代码，但是我是新手，想获得一些提示 VBA 问题：在使用文件搜索对象（相对于使用目录功能）时，我看到过类似的问题询问有关长时间运行的问题。就我而言，我的运行时间超过 3 小时，因为我试图遍历每个子文件夹中的 1000 个子文件夹和 100 个文件。我不确定如何将在线阅读的答案应用于我正在使用的特定代码，因为我必须遍历文件夹的不同子文件夹。问题已编辑：我想降低宏的运行时间。我认为这里的问题是 FSO 正在遍历许多不符合条件（文件名和日期）的子文件夹和文件。如何减少运行时间以避免宏遍历所有这些文件夹和文件？代码用途：从 2019 年 1 月 1 日至 1 月 1 日期间的所有子文件夹中的所有“结果”文件中复制/粘贴两列，2020 到活动工作簿。非常感谢你的帮助，

请看下面我的代码：

我在 Excel 中编写了一个 VBA 宏，它应该具有以下内容：

1. 给定以下路径循环遍历该路径中的子文件夹（所有子文件夹都以序列号开头）
2. 进入定义为输入的数字窗口中的子文件夹（例如 Start_i=76，Finish_i=106）并搜索与该子文件夹同名的 excel 文件（.xlsx 或 .xlsm）
3. 打开它，更改一些特定的单元格，保存并关闭文件
4. 转到窗口中的下一个子文件夹 [76, 106]

到目前为止，一切都很好。

问题，我有一个包含 2 个文件（.pdf 和 .xlxs）的文件夹，程序返回了我的 3 个文件（.pdf 和 2x .xlxs）

第一个和第二个文件的代码功能，但是当它进入第三个文件时它崩溃了......

有人可以帮我吗？非常感谢

expire.txt文件包含197.015行。

在这个大的 txt 文件中，我需要从以下位置替换所有日期值：

1. 2020-03-01 13:33至2020-03-01
2. 2020-02-01 08:45至2020-02-01
3. 2020-01-01 11:30至2020-01-01
4. ...
5. ...
6. 2018-01-01 12:40到2018-01-01（这是最后一行197.015）

我已经尝试了下面的代码。

没有错误，但 txt 文件中的替换输入不起作用。

新的expire.txt文件保持不变。

如何解决这个问题？