「○列から○列を非表示にする」
「○行から○行を非表示にする」
「全ての列を表示する」
「全ての行を表示する」
この4つの動作を同じ行列で何度も繰り返す時、1~2回ならいいかもしれませんが、毎日数回、数十回と繰り返すと・・・時間が無駄になります。
こんな時は、EXCELのVBA(マクロ)で少しでも効率化させましょう!
![](https://eguweb.jp/wp-content/uploads/201804271915-00-1.jpg)
全ての列を表示する
Sub 全ての列を表示する()
Columns.Hidden = False
End Sub
全ての行を表示する
Sub 全ての行を表示する()
Rows.Hidden = False
End Sub
まずは、表示・非表示でオブジェクトが動かないように「書式設定」で固定します。
![](https://eguweb.jp/wp-content/uploads/201804271917-01.jpg)
![](https://eguweb.jp/wp-content/uploads/201804271917-02.jpg)
?列から?列を非表示にする
Sub CからG列を非表示にする()
Columns("C:G").Select
Selection.EntireColumn.Hidden = True
End Sub
![](https://eguweb.jp/wp-content/uploads/201804271917-00.jpg)
![](https://eguweb.jp/wp-content/uploads/201804271918-00.jpg)
ボタンにマクロを登録。
![](https://eguweb.jp/wp-content/uploads/201804271918-01.jpg)
ボタンを押すと、C列からG列までが非表示になります。
![](https://eguweb.jp/wp-content/uploads/201804271918-02.jpg)
全ての列を表示するマクロを追加してみます。
![](https://eguweb.jp/wp-content/uploads/201804271919-00.jpg)
ボタンにマクロを登録します。
![](https://eguweb.jp/wp-content/uploads/201804271919-01.jpg)
列の表示・非表示がボタンひとつで出来るようになりました。
![](https://eguweb.jp/wp-content/uploads/201804271919-02.jpg)
![](https://eguweb.jp/wp-content/uploads/201804271919-03.jpg)
?行から? 行を非表示にする
次に行の表示・非表示を作ります。
コンパイル エラー:
修正候補: 識別子
??
![](https://eguweb.jp/wp-content/uploads/201804271921-00.jpg)
おそらくですが、「プロシージャ名の最初が数字」だとダメのようです。
![](https://eguweb.jp/wp-content/uploads/20180427223202.jpg)
「全角数字」でもダメなようでした。
修正。
![](https://eguweb.jp/wp-content/uploads/20180427223214.jpg)
エラーが解消されました。
![](https://eguweb.jp/wp-content/uploads/201804271921-01.jpg)
行を非表示ボタンにマクロを登録します。
![](https://eguweb.jp/wp-content/uploads/201804271922-00.jpg)
![](https://eguweb.jp/wp-content/uploads/201804271923-00.jpg)
![](https://eguweb.jp/wp-content/uploads/201804271923-01.jpg)
10~13行を非表示にします。
![](https://eguweb.jp/wp-content/uploads/20180427223428.jpg)
C~G列がワンクリックで非表示になります。
![](https://eguweb.jp/wp-content/uploads/20180427223431.jpg)
「すべての行を表示する」ボタンを押すと、すべての行が表示されます。
「すべての列を表示する」ボタンを押すと、すべての列が表示されます。
![](https://eguweb.jp/wp-content/uploads/20180427223433.jpg)
![](https://eguweb.jp/wp-content/uploads/20180427223435.jpg)
ボタンを押すだけで列と行の表示・非表示が、簡単に出来るようになりました!
頻繁に使う動作であれば地味に便利が気がしますので、ぜひご活用下さい
^o^)/
![](https://eguweb.jp/wp-content/uploads/banner2-1024x341.jpg)