既存の Excel ファイルで最後の空でない行を見つけるコードがあります。5 つのテキスト ボックスから列の次の 5 つのセルにデータを挿入したい。私はそれをコーディングする方法を知りません。私を助けてください、ここに私のコードがあります:
With xlWorkSheet
If EXL.WorksheetFunction.CountA(.Cells) <> 0 Then
lRow = .Cells.Find(What:="*", _
After:=.Range("A2"), _
LookAt:=Excel.XlLookAt.xlPart, _
LookIn:=Excel.XlFindLookIn.xlFormulas, _
SearchOrder:=Excel.XlSearchOrder.xlByRows, _
SearchDirection:=Excel.XlSearchDirection.xlPrevious, _
MatchCase:=False).Row
Else
lRow = 1
End If
End With