Excel VBA質問箱 IV

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

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


23982 / 76732 ←次へ | 前へ→

【58105】Re:配列に入れた行を一括取得するにはどうすればいいでしょうか
発言  kanabun  - 08/10/2(木) 16:09 -

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

>飛び飛び行の指定方法、ググッてはみたのですが
>うまく見つけることは出来ませんでした

参考まで
Hideするセルそのものを覚えておいて(具体的には、Rangeオブジェクト型の
変数に Unionメソッドで貯め込んでおいて)、最後に一括 処理する
方法です。
この方法は決してスピードは速くなりません。
が、作業列を使って SpecialCellsメソッドで条件範囲を抽出するときのような
制限はありません。

Sub Try2()
 Dim TG As Range
 Dim rHide As Range
 
 For Each TG In Selection
   If TG.Interior.ColorIndex = 15 Then
     If rHide Is Nothing Then
       Set rHide = TG
     Else
       Set rHide = Union(rHide, TG)
     End If
   End If
 Next
 
 If Not rHide Is Nothing Then
   rHide.EntireRow.Hidden = True
 End If
End Sub
1 hits

【58093】配列に入れた行を一括取得するにはどうすればいいでしょうか ON 08/10/2(木) 11:07 質問
【58095】Re:配列に入れた行を一括取得するにはどう... Abebobo 08/10/2(木) 12:40 発言
【58096】Re:配列に入れた行を一括取得するにはどう... ON 08/10/2(木) 13:37 質問
【58100】Re:配列に入れた行を一括取得するにはどう... ON 08/10/2(木) 14:37 質問
【58102】Re:配列に入れた行を一括取得するにはどう... ハチ 08/10/2(木) 15:11 発言
【58104】Re:配列に入れた行を一括取得するにはどう... ON 08/10/2(木) 15:22 質問
【58105】Re:配列に入れた行を一括取得するにはどう... kanabun 08/10/2(木) 16:09 発言
【58125】Re:配列に入れた行を一括取得するにはどう... ON 08/10/4(土) 18:27 お礼
【58101】Re:配列に入れた行を一括取得するにはどう... neptune 08/10/2(木) 14:50 発言
【58103】Re:配列に入れた行を一括取得するにはどう... ON 08/10/2(木) 15:13 質問

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