Excel VBA使用偏移量移动到下一行

Question

如果可能的话，我想使用offset属性将结果放在连续的行中。

第9行是我无法获得正确语法的地方。

Set startcell2 = Worksheets("Duplicates").Cells(1, 1)

rs.Open "Select dmdrawno From webprddt1.drawmstrp Where dmdrawno = '" & dwgno & "'", oConn, adOpenKeyset, adLockOptimistic

If Not rs.EOF Then
    'addnewrecord = False
Else
    startcell2.Value = dwgno
    startcell2.Offset(1, 0)
    addnewrecord = False

End If

rs.Close
Set rs = Nothing

Answer 1

第9行应该是

Set startcell2 = startcell2.Offset(1, 0)

然后最好是在你读取记录的循环中