vb.net - Excelで最後の行を見つけてexcel.rangeを使用する

Question

ワークシートの書式設定を行うために、vba の代わりに interop.excel への参照を使用しようとしています。私のコードは次のようになります:

    Dim lastrow As Range = excel.Rows.End(XlDirection.xlDown)
    Dim findme As Range = excel.Range("A1:A" & lastrow)

Excel.range では、ここで「&」記号を使用できません。データの最後の行を特定するにはどうすればよいですか?

score 2 · Accepted Answer

Range Class Referenceを見ると、 Range のRowプロパティを置き忘れたようですlastrow。

Dim findme As Range = excel.Range("A1:A" & lastrow.row)

score 2 · Accepted Answer

これが古いスレッドであることは知っていますが、「悪い解決策」を含む多くのGoogleリファレンスがあります。これはlasCellを取得するためのエレガントな解決策だと思います

set lastCell=yourSheet.Range("A1").SpecialCells(xlCellTypeLastCell)

あなたのコードは次のようになります：

Dim lastrow As Range = excel.Range("A1").SpecialCells(xlCellTypeLastCell).Row
Dim findme As Range = excel.Range("A1:A" & lastrow)

score 0 · Accepted Answer

lastrow は Range として定義されており、文字列と Range の間で文字列を連結しようとしています。

5 に答える 5