Excel (VBA)

Excel VBAに関するフォーラムです。
  • 解決済みのトピックにはコメントできません。
このトピックは解決済みです。
質問

 
(指定なし : 指定なし)
関数が入っているセルを最終行として取得する回避方法
投稿日時: 21/04/25 23:30:55
投稿者: 春麗

以下で最終行を取得します
 
    Dim LastRow As Long
    LastRow = Cells(Rows.Count, 2).End(xlUp).Row
 
 
しかし一つ困っています.
他のシートからデータを持ってきているのですが,セルには関数が書かれているため,
データ自体は無くても関数が入っているセルの最終行を取得します.
回避する方法はないでしょうか.
よろしくお願いいたします.

回答
投稿日時: 21/04/26 07:09:15
投稿者: simple

検索を使って、

lastRow = Columns("A").Find("*", , xlValues, xlPart, , xlPrevious).Row
としてみてください。

投稿日時: 21/04/26 13:57:17
投稿者: 春麗

simple さんの引用:
検索を使って、
lastRow = Columns("A").Find("*", , xlValues, xlPart, , xlPrevious).Row
としてみてください。

 
simple さん
 
教えていただいた書き方を調べました.
xlPart:検索テキストの一部を検索
xlPrevious:一致する前の値を検索
この様な使い方をするのですね.
どうもありがとうございました.