プロが教える店舗&オフィスのセキュリティ対策術

オートフィルタで抽出した後、特定のセルを選んで見えている行だけ行の番号を取得したいのですが?

質問者からの補足コメント

  • 選択したセル かつ 見えているセル(画面上にないセルは対象外)ということでしょうか?→はい、見えているセルだけです。フィルタした一部だけ選択して行番号を使い処理したいです。
    また、離れたセルの複数選択はあり、ということでしょうか?→出来れば有りで!
    色々試しましたが、いい結果が得られませんでした。

      補足日時:2019/06/21 00:10

A 回答 (2件)

選択したセル かつ 見えているセル(画面上にないセルは対象外)ということでしょうか?


また、離れたセルの複数選択はあり、ということでしょうか?
    • good
    • 0

こんなので、参考になりますか。


Sub sample()
Dim r As Range
For Each r In Intersect(Selection.EntireRow, Columns("A"))
If Not r.EntireRow.Hidden Then MsgBox r.Row
Next r
End Sub
    • good
    • 0
この回答へのお礼

何とか、組合わせて目的の事は出来ました!ありがとうございます。

お礼日時:2019/06/21 23:15

お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!