在Excel中的工作簿之间复制多个单元格的最佳方法是什么?

时间:2015-04-27 13:51:20

标签: excel excel-vba vba

我有一个"表格"在一个工作表和其中的9个单元格中,用于输入范围F1 - F9中的数据。

然后我想将那些单元格中的数据复制到第二页的一行。我有一个录制的宏来执行此操作,但处理大约需要45秒。它手动选择每个工作表,然后在新行中选择复制/粘贴操作。必须有一种更优化的方法来做到这一点。

以下是代码的一部分:

Sheets("INBOUND").Select
Range("b3").Select
Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
    :=False, Transpose:=False
Sheets("TAG").Select
Range("f7").Select
Application.CutCopyMode = False
Selection.Copy
Sheets("INBOUND").Select
Range("c3").Select
Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
    :=False, Transpose:=False
Sheets("TAG").Select
Range("f9").Select
Application.CutCopyMode = False

1 个答案:

答案 0 :(得分:1)

试试这个= form_for @organization, url: subscription_create_path, remote: true, method: :post do |f| - unless @annual_packages.blank? - @annual_packages.each do |plan| = f.radio_button('plan_id', plan.id) = plan.title

Subroutine

这是一种很好的通用方法,可以做你想要的。