excel - 特定の列の最後に使用された行までデータをコピーする

Question

このコードを使用して、最後に使用された行を取得しています-

rowNo=objExcel.Activeworkbook.Sheets(1).UsedRange.Rows.count

今、特定の列のデータを使用した最後の行までコピーしたいと考えています。

//rowNo を使用するには、以下のコードに何を記述しますか //

Set Source=objExcel.Activeworkbook.Sheets(1).Column("G")

Source.Copy

Answer 1

これは、最後の行を見つけるための間違った方法です。最後の行を見つける方法については、リンクを参照してください。

最後の行を見つけたら、このコードを使用してコピーします

ws.Range("G1:G" & rowNo).Copy

wsワークシート オブジェクトはどこにありますか。