一个下午。。。我都在等，怎么做啊。(1分)

我就是想把下面的代码在delphi中实现出来。
Sub labtest()
Dim iR, datetime, vatcode
datetime = Range("d2:e2&quot.Value
vatcode = Range("J2:N2&quot.Value
Windows("manage.xls&quot.Activate
iR = Sheets("sheet1&quot.[a65535].End(xlUp).Row + 1
Range(Cells(iR, 1), Cells(iR, 1)).Value = datetime
Range(Cells(iR, 2), Cells(iR, 2)).Value = vatcode
Windows("work.xls&quot.Activate
End Sub

你不懂规则么

你随便在网上搜下delphi excel 很多代码的,不用vba很多年了

接受答案了.