小编Tho*_*y S的帖子

这段代码有什么问题吗？我需要查看一列,如果该值小于参考值(它是一个计时器),则需要复制相邻单元格并输入"A8".

谢谢.

Sub GetData()

Dim i As Integer

For i = 4 To 31

If Cells(i, 38) < Cells(32, 5) Then
Cells(1, 8) = Cells(i, 39)
End If

Next i

End Sub

我知道..

Application.Run ("Realcount2")

会调用一个宏。你能用类似的东西结束一个宏吗

Application.Stop("Realcount2")