[[20150123160627]]　『マクロ　コマンドボタンを使って』（おいちゃん）　ページの最後に飛ぶ

『マクロ　コマンドボタンを使って』（おいちゃん）

いつも大変勉強させて頂いております。
この度大変簡単なことではありますが、
Ｂ列に「終了」という文字があればその行を非表示にするマクロを
コマンド１ボタンに当て込みたいのです。

そしてボタン２をつくり、そのボタンを押すと非表示すべてが再表示されるように
もしたいと思っております。

ご教授いただきたく、お願い致します。

＜使用 Excel：Excel2010、使用 OS：Windows7 ＞

まずはマクロの自動記録機能を使い、手操作した結果をマクロ化。それを元にWeb等で調べつつ、自作してみるべきと思いますよ。

 Private Sub CommandButton1_Click()
    Dim i As Long

    For i = Cells(Rows.Count, "B").End(xlUp).Row To 1 Step -1
        If Cells(i, "B").Value = "終了" Then
            Rows(i).Hidden = True
        End If
    Next i
 End Sub

 Private Sub CommandButton2_Click()
    Rows("1:" & Cells(Rows.Count, "B").End(xlUp).Row).Hidden = False
 End Sub
（???） 2015/01/23(金) 16:18

＞この度大変簡単なことではありますが、

ちなみに、この一言は相手を不愉快にしますので、ご注意。
簡単と思うなら自分でやればいいじゃん！、と思われます。
（???） 2015/01/23(金) 16:21

どうもありがとうございました！
ご丁寧に接して頂き助かります。
（おいちゃん） 2015/01/23(金) 16:29

コメント返信：

[ 一覧(最新更新順) ]

[[20150123160627]] 『マクロ コマンドボタンを使って』（おいちゃん） ページの最後に飛ぶ

[[20150123160627]]　『マクロ　コマンドボタンを使って』（おいちゃん）　ページの最後に飛ぶ