Question

在Excel中，我使用一些列进行计算，这些列将使用来自其他列的信息，这些列的信息是从另一个文件复制的。但是，这个外部数据可以有不同数量的行，所以我试图找出一些vba代码，它们将下拉计算或将它们拉出来扩展或压缩行以匹配导入的数据。

因此，例如，A是从其他地方引入的列，B是计算列。

A   B
1   A2*2
2   A3*2
3   A4*2
4   A5*2

现在假设我复制了一个有八行的列。我想下拉B列，以便它也有8行。任何形式的指导都应该受到赞赏。

Answer 1

听起来您可以使用自动填充手动执行此操作，但是如果您希望使用类似这样的宏可以让您入门：

Sub Macro1()

    ' put your function here
    Range("B1").FormulaR1C1 = "=RC[-1]*2"

    Dim dest As Integer
    dest = Range("A1").End(xlDown).Row

    Range("B1").AutoFill Destination:=Range("B1:B" & dest), Type:= _
        xlFillDefault

End Sub

这将自动填充B列中的一个函数，以便在A列中包含尽可能多的数据。现在您声明需要“展开或压缩行以匹配导入的数据。”您可以通过清除宏开头的B列来完成此操作。

希望这有帮助，如果这令人困惑或无法解决您的问题让我知道。

匹配一个excel表中的行数与另一个excel表中的行数

1 个答案: