VBA 传值到另一个 Excel 文件 - 详细步骤与代码示例

要向另一个 Excel 文件传值，需要执行以下步骤：

1. 打开目标 Excel 文件。

2. 在源 Excel 文件中打开 VBA 编辑器。

3. 在 VBA 编辑器中，使用以下代码将要传递的值设置为变量：

Dim myValue As Variant
myValue = Range('A1').Value

此代码将在源 Excel 文件中获取单元格 'A1' 中的值，并将其存储在名为 myValue 的变量中。

4. 在 VBA 编辑器中，使用以下代码打开目标 Excel 文件并将值传递给它：

Dim myWB As Workbook
Set myWB = Workbooks.Open('C:\目标文件.xlsx')
myWB.Worksheets('Sheet1').Range('A1').Value = myValue
myWB.Close SaveChanges:=True

此代码将打开名为 '目标文件.xlsx' 的 Excel 文件，并将 myValue 变量中的值传递到该文件的单元格 'A1' 中。最后，该文件将被保存并关闭。

请注意，您需要更改文件路径和工作表名称，以便它们与您的实际情况相匹配。此外，您还需要考虑错误处理和其他细节，以确保代码的正确性和可靠性。