在工作簿之间复制和粘贴

这是一个问题,可能或不可能实现,但任何build议,非常感谢。

是否可以打开一个工作簿(wrkbookA),其中包含所有数据和vba代码。 点击button打开/导航到一个目录并select另一个工作簿(wrkbookB)。 wrkbookB打开,select一列,该列被复制并粘贴到列A中的wrkbookA,并closureswrkbookB。

我知道这可以使用wrkbookB中的常量列来实现,但是wrkbookB中的每个工作簿中的数据都是不同的列。

我也看了专栏的标题,并以这种方式进行复制,但这不是一个选项,因为有不同的标题/单词列。

感谢大家。

由于您无法知道哪些列需要从工作簿B中select,因此您需要用户交互。 既然如此,为什么不写一个会做以下事情的小组:

  1. 让用户select工作簿B打开
  2. 在工作簿A中的代码中附加的工作簿B中放置一个button

然后,用户在工作簿B中select要复制的列,然后按下将该列复制到工作簿A的button,并closures工作簿B而不保存更改。

示例代码的想法:

Workbooks.Open ... ActiveSheet.Buttons.Add(427.5, 12.75, 104.25, 36).OnAction = "WorkBookA!MoveColumn"