몇 가지 계산을 수행한 다음 단일 셀에 나타나는 결과를 생성하는 매크로가 있습니다. 매크로를 다시 실행하면 동일한 셀에 다른 결과가 생성됩니다. 해당 셀의 데이터를 복사하여 테이블(예: 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