excel - 在excel中将值从文件发送到另一个文件

Question

我需要将一个文件中的一个单元格引用到另一个文件中，并且我需要从第一个文件中执行它。

通常我会继续“目标”文件并插入类似'[filename.xlsx]sheet'!$C$40在想要的单元格中，但在这种情况下，我想直接从输入文件发送值/单元格，例如“这个值必须发送到'[filename.xlsx]sheet'!$C$40”。

更好的是，如果我可以通过使用我分配给第一行单元格和第一列单元格的名称来指示目标单元格的坐标来选择复制值/单元格的位置(例如“将此值发送到 [filename.xlsx]sheettextoffirstrawp textoffirstcolumn10 发送它到 filename.xlsx P10 单元格)

是否有任何宏(或其他东西)已经做了这样的事情？如果没有，你认为可以做到吗？

感谢您的帮助，如果我的要求不够清楚，请告诉我，我会尽力自己更好地解释!

Answer 1

在这里，我为您的需要留下了一个起点。

Public Sub CopyToDestination()
  Dim wb1 As Excel.Workbook
  Dim RangeValues As Range
  Set RangeValues = Selection
  wbDestination = InputBox("Insert file path/name.xlsx")
  sheetDestination = InputBox("Insert Sheet Name")
  RangeDestination = InputBox("Insert Cell Destination")
  Set wb1 = Workbooks.Open(wbDestination)
  wb1.Activate
  wb1.Sheets(sheetDestination).Range(RangeDestination).Value = RangeValues.Value
  wb1.Save
  wb1.Close
End Sub

如何使用:

在 Excel vba 模块中添加此代码。

在excel中，选择要复制的单元格

执行宏

写完整的位置，例如“c:/test/Destination.xlsx”

写下目标工作表名称

写下您要粘贴的位置，例如。 “A4”(如果选择范围，则必须写范围，例如“A1:C4”

魔法!

我再说一遍，它是一个起点，如果你每天都使用它，可能还要改进。

希望它有效，干杯!