Excel VBA質問箱 IV

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

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


43460 / 76732 ←次へ | 前へ→

【38320】Re:追記です。。
回答  Statis  - 06/5/31(水) 12:39 -

引用なし
パスワード
   こんにちは
問題はZ列のデータ数が変動すると言う事ですよね。
なら下記で良いのでは?

Sub マクロ1()
 Dim MyR As Range
  On Error GoTo ELine
  Set MyR = Range("Z1", Range("Z65536").End(xlUp)).SpecialCells(3, 2).EntireRow
  On Error GoTo 0
  MyR.Hidden = IIf(MyR.Hidden, False, True)
  Set MyR = Nothing
ELine:
End Sub
5 hits

【38304】組番号等で選択範囲を取得するには。 くれよん 06/5/31(水) 9:38 質問
【38306】追記です。。 くれよん 06/5/31(水) 10:08 質問
【38307】Re:追記です。。 Statis 06/5/31(水) 10:12 発言
【38319】Re:追記です。。 くれよん 06/5/31(水) 12:26 質問
【38320】Re:追記です。。 Statis 06/5/31(水) 12:39 回答
【38325】Re:追記です。。 くれよん 06/5/31(水) 13:05 質問
【38329】Re:追記です。。 ハチ 06/5/31(水) 14:18 発言
【38332】Re:追記です。。 くれよん 06/5/31(水) 14:41 お礼
【38330】Re:追記です。。 Kein 06/5/31(水) 14:30 回答
【38333】ありがとうございました。 くれよん 06/5/31(水) 14:48 お礼

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