iPhone5/iPad4/iPad mini | 無線プリンタ | ネットワーク | データセンター用語 | Netscreen/Juniper |
[ ミニミニ管理者の独り言 > エクセル(EXCEL)-VBA・関数 > エクセルVBA−ワークシートを非表示にする ]
スポンサードリンク
エクセルVBA−ワークシートを非表示にする
この処理もエクセルの雛形を作っているときに良くやる処理です。
ワークシートの表示/非表示の切替です。
例えば、簡易的なシステムをエクセルVBAで作るとき、「マスタ」や「ワークテーブル」的な用途でワークシートを使う事があります。この場合、画面上にそのワークシートが表示されているとユーザーが誤って処理してしまうとか、そのワークシート自体を(原価が表示されているから)見せたくないなどの理由で「ワークシートを非表示」にする要望があるかと思います。
この時に使用するのが、「Worksheets("シート名").Visible =xlVeryHidden」です。
◆参考◆
'ここではエクセルの雛型を開いた時の処理で「商品マスタ」ワークシートを非表示にしています。
Private Sub Workbook_Open()
Worksheets("Sheet1").Activate
Worksheets("Sheet1").Range("A1").Select
Application.ScreenUpdating = False
'商品マスタのワークシートを非表示にする
Worksheets("商品マスタ").Visible = xlVeryHidden
Application.ScreenUpdating = True
End Sub
'次にコマンドボタンを押下した時の処理でワークシートの表示/非表示を切替します。
'これは非表示にしているワークシートのセルなどを選択する事ができない為、一度表示しておいてから選択して再度非表示にします。
Private Sub cmdOK_Click()
'ワークシートの表示
Worksheets("商品マスタ").Visible = True
Sheets("商品マスタ").Select
Range("E1").Select
Selection.Copy
Sheets("見積明細").Select
Range("B10").Select
Selection.Paste
'ワークシートの非表示
Worksheets("商品マスタ").Visible = xlVeryHidden
end Sub
◆検証環境
OS:Windows2000Pro
Excel:Excel2000
◆参考文献
Excel VBA マクロ 500連発 ←結構、お世話になってます。サンプルコードのCD-ROMも付属していて、VBA初心者向きです。
↓↓↓↓↓ この辺の参考書も良いと思います。 ↓↓↓↓↓
《エクセルの便利な使い方集(関数・機能・マクロ・VBA)》
1)関数
・エクセル関数−VLOOKUPのエラー対処
・エクセル関数−TEXT
・エクセル関数−SUBTOTAL
ワークシートの表示/非表示の切替です。
例えば、簡易的なシステムをエクセルVBAで作るとき、「マスタ」や「ワークテーブル」的な用途でワークシートを使う事があります。この場合、画面上にそのワークシートが表示されているとユーザーが誤って処理してしまうとか、そのワークシート自体を(原価が表示されているから)見せたくないなどの理由で「ワークシートを非表示」にする要望があるかと思います。
この時に使用するのが、「Worksheets("シート名").Visible =xlVeryHidden」です。
◆参考◆
'ここではエクセルの雛型を開いた時の処理で「商品マスタ」ワークシートを非表示にしています。
Private Sub Workbook_Open()
Worksheets("Sheet1").Activate
Worksheets("Sheet1").Range("A1").Select
Application.ScreenUpdating = False
'商品マスタのワークシートを非表示にする
Worksheets("商品マスタ").Visible = xlVeryHidden
Application.ScreenUpdating = True
End Sub
'次にコマンドボタンを押下した時の処理でワークシートの表示/非表示を切替します。
'これは非表示にしているワークシートのセルなどを選択する事ができない為、一度表示しておいてから選択して再度非表示にします。
Private Sub cmdOK_Click()
'ワークシートの表示
Worksheets("商品マスタ").Visible = True
Sheets("商品マスタ").Select
Range("E1").Select
Selection.Copy
Sheets("見積明細").Select
Range("B10").Select
Selection.Paste
'ワークシートの非表示
Worksheets("商品マスタ").Visible = xlVeryHidden
end Sub
◆検証環境
OS:Windows2000Pro
Excel:Excel2000
◆参考文献
Excel VBA マクロ 500連発 ←結構、お世話になってます。サンプルコードのCD-ROMも付属していて、VBA初心者向きです。
↓↓↓↓↓ この辺の参考書も良いと思います。 ↓↓↓↓↓
《エクセルの便利な使い方集(関数・機能・マクロ・VBA)》
1)関数
・エクセル関数−VLOOKUPのエラー対処
・エクセル関数−TEXT
・エクセル関数−SUBTOTAL
2)使い方・機能
・エクセル機能-セルにコンボボックスを割り当てる
・エクセル機能-条件に合わせて書式を変更する
・エクセル機能-xlsファイルにパスワードを設定する方法
・エクセルでシートをコピーできない。−このコマンドは、共有ファイルで実行することができません。排他モードで開いてください−
3)マクロ
・エクセルマクロ−マクロにショートカットキーを割当する
4)VBA
・エクセルVBA−スクリーンの表示の更新を抑止する
・エクセルVBA−ワークシートを非表示にする
・エクセルVBA−マウスポインタの変更
・エクセルVBA−エンターキーを押下した時のアクティブセルの移動
・エクセルVBA−セルの数式を非表示にする
・エクセルVBA−ワークブックを開いた時に処理をしたい
・エクセルVBA−オートフィルタでのコピー
・エクセルVBA−特定ファイルで常にマクロを有効にする
5)実践編
・エクセルとワードで作る簡易株主総会支援システム−想定問答
最新記事へ トップページ
スポンサードリンク
■Blog Ranking■
1. ←←サーバー構築・運用ブログあり お奨め:★★★★★
2. (ブログランキング ドット ネット)
3.にほんブログ村
4.BS blog Ranking
ブログランキングに挑戦中です。あなたもブログランキングに挑戦してみよう!
※サーバー構築・運用ブログなんかもありますのでシステム管理者の方にもお奨めのサイトがあり!
コメント
トラックバック
トラックバックURL:
※ クリックで選択できます。
トラックバック一覧: