VBA 调用跨工作簿表的时候不打开

目标工作簿的方法是什么？

使用外部数据源链接（ODBC）或数据连接方法可以直接访问另一个工作簿的数据，而无需打开该工作簿。你可以使用VBA中的OpenDatabase方法或CreateObject函数创建ADO对象来连接到另一个工作簿的表。然后，使用ADO对象的Execute方法执行SELECT语句以查询数据。另外，使用Workbook对象的Worksheet对象来引用在不同工作簿中的工作表。这些方法可以让你轻松地在VBA代码中访问不同工作簿的数据。

相关问题

excelvba另存工作簿之后删除按钮及宏代码

在Excel VBA中，我们可以使用宏代码来实现另存工作簿和删除按钮的功能。以下是实现该功能的步骤：

1. 首先，在工作簿中插入一个按钮。选择“开发工具”选项卡，点击“插入”按钮下的“按钮”控件，然后在工作表上绘制一个按钮。

2. 右键单击按钮，选择“编辑代码”，进入VBA编辑器。

3. 在VBA编辑器中，找到按钮所在的工作表文件夹，双击打开该文件夹，在其中插入一个新的模块。

4. 在新的模块中编写宏代码实现另存工作簿的功能。可以使用"SaveAs"方法来保存工作簿，指定另存的路径和文件名。

5. 在按钮所在的工作表文件夹中找到该按钮对象，使用它的“Click”事件，在其中调用刚刚写好的宏代码。

6. 在按钮所在的工作表文件夹中找到该按钮对象，对应的外观设置为“删除”。

这样，当我们点击该按钮时，工作簿将被另存到指定路径，然后按钮本身也会被删除。

请注意，以上描述是一种常见的实现方式，但实际操作可能会因具体情况而有所不同。因此，在编写和调试代码时，请参考VBA官方文档和相关教程，以确保正确实现所需的功能。

vba通过文件名设置活动工作簿

可以使用以下代码通过文件名来设置活动工作簿：

Workbooks("filename.xlsx").Activate

其中，`filename.xlsx`是要设置为活动工作簿的文件名，需要注意的是文件名需要包含文件扩展名。这个语句会将指定的工作簿设置为活动工作簿。

如果指定的工作簿不存在或者未被打开，则会产生一个运行时错误。为了避免这种情况，可以在调用这个语句前先判断文件是否存在并且已经被打开：

If IsFileOpen("C:\filename.xlsx") Then
    Workbooks("filename.xlsx").Activate
Else
    MsgBox "文件未被打开或不存在！"
End If

其中，`IsFileOpen`是一个判断文件是否已经被打开的函数，可以参考我之前回答的问题来实现。