问题标签 [xlsm]

我在 VBScript 中使用了一些代码来打开一个 .xlsm 文件并保存该文件。现在我想做与 .xltm 文件相同的事情。我试图用脚本打开 xltm 文件，它工作正常。保存该文件时，它引用默认位置和默认扩展名。我需要将新打开的文件保存在指定位置，扩展名为“.xlsm”。我不知道该怎么做。请帮我解决这个问题。

在这里，我将文件名（带路径）作为参数传递。我需要在最后一条语句中打开新保存的“.xlsm”文件。参数：“c:\test\book1.xltm”，我新创建的文件希望保存在位置“C:\test\”，扩展名为“xlsm”。

我正在处理日历，并试图创建一个子程序，该子程序会自动填写相应月表中一年中的每一周。周格式和内容由

从隐藏的 excel 表中，然后将日期和标题与

问题是每次我使用这个函数时，我的 Excel 表格的大小都会增加大约 4KB。这不是太成问题，因为 Sub 每年只会使用一次，但在文件大小急剧增加之前，我也遇到过类似的问题，通常是在使用 VBA 删除行或列时。

有什么我需要改变的，还是我必须忍受的 Excel 的一些问题？低于完整的子（英语和德语混合）

我有一个 VBA 代码，它强制另存为对话框在尝试保存 xltm 时将默认另存为类型显示为 xlsm。请查看随附的代码，如果代码不正确，请纠正我

上面的代码在尝试使用 (ctrl+s) 保存时工作正常。如果我试图通过 excel 关闭窗口选项关闭。Excel 显示默认的另存为弹出窗口。如果我从该另存为弹出窗口中单击“保存”选项，则不会调用 workbook_beforesave 事件（显示另存为对话框，默认数据类型从 xlsm 更改为 xls）。我不知道我犯了什么错误？请帮我摆脱这个..

提前致谢！！！

我正在使用下面的代码。

我在线收到运行时错误POIFSFileSystem poi_fs = new POIFSFileSystem(pt_inp_strm_obj);

我不明白我在做什么错...

我正在构建一个放置在专用网络上的共享文件夹中的表单。由单个用户使用的“母表单”是一个模板，当它使用电子表格中的信息保存时会生成“子表单”。

为了命名我的“子表单”，我使用 Workbook_BeforeSave 事件。我收集命名文件所需的信息。然后，我保存为我的文件名。所有文件都在同一个文件夹中。

我的代码在我的计算机（Excel 2016）上运行良好，但由于某种原因，它不适用于所有计算机（我注意到 Excel 2013 上的问题，但在 2010 上没有）。

我检查了每个用户是否有权正确访问包含文件的文件夹，并且他们有。他们无法手动另存为。

这是我用来保存的代码：

结束子

快速提问，我正在尝试保存一个在单元格 A1 中定义目标的文件（因为该文件可以位于不同的服务器上，具体取决于用户），以及保存日期。你能帮帮我吗？我目前拥有的 VBA 如下：

我想知道是否可以将 xlsm 文件作为后端而将 html 作为前端？如果是，我该如何实现？

提前致谢。

我真的很喜欢这里的解决方案，它提供了强制保存为 xlsm 文件的 VBA。请记住，我对 VBA 几乎一无所知，如何修改此代码以执行以下操作：

• 继续强制另存为xlsm
• 文件名等于名为“REPORT”的工作表中单元格 C1 的值 + 文本“BSC” + YYYY.MM.DD 格式的日期

任何帮助将不胜感激。

我有一堆启用宏的 Excel 文件。我想用 SQL Query 遍历它们中的每一个 - select * from [Sheet1$A10:AZ100]。当我选择一个文件时，我的 Excel 连接管理器工作，但是当我添加一个 For Each 循环任务并将我的变量分配给它时，出现了一个大问题。我的步骤是：

• 创建新连接：Excel 连接管理器 我选择文件夹中的第一个 XLSM 文件，然后点击确定。

• 拖放每个循环容器并双击。在集合中：我选择 For Each File Enumerator 并在文件夹中指定文件夹路径。在文件中：*.xlsm 最后一个选项是：完全限定
  在变量映射中：我创建了一个名为“FileFound”的新变量

• 在 For Each Container 中拖放数据流任务并双击。

• 拖源助手：选择上面创建的 Excel 连接管理器

• 双击 Excel 源和数据访问模式：我选择 SQL 命令。我的查询是select * from [Sheet1$A10:AZ100]。此查询对于所有 XLSM 文件都是相同的。

• 单击列，我的数据显示一切正常

现在这是问题开始的地方 -

右键单击 Excel 连接管理器，然后单击属性。

• 我先复制我的连接字符串。我的连接字符串是：Provider=Microsoft.ACE.OLEDB.12.0;Data Source=F:\Excel data\ABCDE.xlsm;Extended Properties="Excel 12.0 MACRO;HDR=YES";

• 我单击表达式并在属性中选择连接字符串。接下来我将我的表达式编辑为： "Provider=Microsoft.ACE.OLEDB.12.0;Data Source=" + @[User::FileFound] + " ;Extended Properties=\"Excel 12.0 MACRO;HDR=YES\";" 这计算正确。

• 然后我将 Excel 连接管理器的延迟验证设置为 TRUE

• 我将每个容器的延迟验证设置为 TRUE

我得到的错误是：

如何解决此错误？我已经尝试了很多并阅读了所有内容，但无法超越这一点。

我是一名新程序员，我正在尝试找到一种方法来从多个工作簿中提取一系列数据并将它们复制到主文件中。我已经在下面编写了执行此操作的代码，但我遇到的问题是我的代码物理打开 xlsm 文件 > 复制数据 > 然后返回到主文件进行粘贴。由于这是一次对数千个文件执行此操作，因此需要数小时才能完成。我的老板告诉我，如果文件被读取为 xml 或 .txt 文件，有一种方法可以从 xlsm 文件中复制数据，而无需代码实际打开文件。我在网上搜索过这个，但找不到任何关于如何做到这一点的信息。任何帮助将不胜感激。

我拥有的实际打开工作簿的代码：