Excel:如何从单个单元格收集数据并将其放置在表格中?

Excel:如何从单个单元格收集数据并将其放置在表格中?

我有一个宏,它可以进行一些计算,然后生成一个出现在单个单元格中的结果。当我再次运行该宏时,它会在同一个单元格中生成另一个结果,依此类推。我希望从该单元格复制数据并将其放在一个表中,比如说在单元格 B1 中。然后将下一个结果放在单元格 C1 中。依此类推,直到我得到一个数据表。

有没有简单的方法可以做到这一点?

我可以让宏运行(比如说) 100 次,并每次将数据复制到表中,如上所述吗?

谢谢!

答案1

这是一个非常简单的宏示例:

Sub MaintainHistory()
    Dim s As String, n As Long, v As Variant
    v = Rnd()
    Range("A1") = v
    If Range("B1") = "" Then
        Range("B1") = v
    Else
        n = Cells(Rows.Count, "B").End(xlUp).Row + 1
        Range("B" & n) = v
    End If
End Sub

相关内容