Excel VBA質問箱 IV

当質問箱は、有志のボランティア精神のおかげで成り立っています。
問題が解決したら、必ずお礼をしましょうね。
本サイトの基本方針をまとめました。こちら をご一読ください。

投稿種別の選択が必要です。ご注意ください。
迷惑投稿防止のため、URLの入力を制限しています。ご了承ください。


10448 / 13644 ツリー ←次へ | 前へ→

【21758】行番号の取得方法? かっちん 05/1/28(金) 16:35 質問[未読]
【21759】Re:行番号の取得方法? ぴかる 05/1/28(金) 16:48 回答[未読]
【21760】Re:行番号の取得方法? IROC 05/1/28(金) 17:25 回答[未読]
【21761】Re:行番号の取得方法? Jaka 05/1/28(金) 17:25 回答[未読]
【21762】Re:行番号の取得方法? ぴかる 05/1/28(金) 17:37 発言[未読]
【21802】Re:行番号の取得方法? かっちん 05/1/31(月) 10:41 お礼[未読]

【21758】行番号の取得方法?
質問  かっちん  - 05/1/28(金) 16:35 -

引用なし
パスワード
   フィルタオプションで条件設定した場合、条件に合うデータのみ表示されますが、
1行目の表題の1行下(見た目は2行目)に表示されている行が何行目かを取得する方法を教えてください。
よろしくお願いいたします

【21759】Re:行番号の取得方法?
回答  ぴかる  - 05/1/28(金) 16:48 -

引用なし
パスワード
   かっちんさん、こんにちは。

一例ですが、表題部にセル選択して実行してみて下さい。
Sub TEST()
  
  SendKeys "{DOWN}"
  MsgBox ActiveCell.Row & "行目だよ!"
  
End Sub

【21760】Re:行番号の取得方法?
回答  IROC  - 05/1/28(金) 17:25 -

引用なし
パスワード
   A列の場合です。

  MsgBox Range(Range("A1"), Range("A1").End(xlDown)).Offset(1). _
  SpecialCells(xlCellTypeVisible).Cells(1, 1).Address

【21761】Re:行番号の取得方法?
回答  Jaka  - 05/1/28(金) 17:25 -

引用なし
パスワード
   こんにちは。  

http://www.vbalab.net/vbaqa/c-board.cgi?cmd=ntr;tree=11464;id=excel

【21762】Re:行番号の取得方法?
発言  ぴかる  - 05/1/28(金) 17:37 -

引用なし
パスワード
   Jakaさん、こんにちは。  

>http://www.vbalab.net/vbaqa/c-board.cgi?cmd=ntr;tree=11464;id=excel
おぅ〜、恥ずかしいっス! あたくし、以前におんなじ質問してたんですね。
全く記憶になかったです・・・。

【21802】Re:行番号の取得方法?
お礼  かっちん  - 05/1/31(月) 10:41 -

引用なし
パスワード
   ぴかる様・IROC様・JAKA様
返事が遅くなり申し訳ございません

大変参考になりました
ご回答ありがとうございました

10448 / 13644 ツリー ←次へ | 前へ→
ページ:  ┃  記事番号:
2610219
(SS)C-BOARD v3.8 is Free