マクロ設定ブックに
シート名「受付」「青紙表」「1」と「審査」があります。
作業の流れで、シート名「1」を表示して、作業を行う必要がありますが
度々失念してしまう事があり、マクロ等を設定し、この失念を防止したいと考えております。
私の希望ですが、
シート名「1」を1回でも表示しないと、シート名「審査」のシートに移動できないように設定できるマクロを教えてください。
その時にメッセージボックスが表示され、(シート「1」の作業が完了しておりません。作業を完了してください。)と表示出来る方法もお願いいたします。
又、このVBAコードをどこのシートに設定又はThisWorkbook
を含めて親切にコード共教えください。
宜しくお願い致します。
No.2ベストアンサー
- 回答日時:
以下のようにしてください。
1.標準モジュールに、以下の行を登録。(共通変数の登録)
Public sheet1_flag As Boolean
2.Thisworkbook(ブックモジュール)に以下のマクロを登録。
Private Sub Workbook_Open()
sheet1_flag = False
If ActiveSheet.Name = "審査" Then
Worksheets("1").Activate
End If
End Sub
3.シート「審査」のシートモジュールに以下のマクロを登録。
Private Sub Worksheet_Activate()
If sheet1_flag = False Then
MsgBox ("シート「1」の作業が完了しておりません。作業を完了してください。")
Worksheets("1").Activate
End If
End Sub
4.シート「1」のシートモジュールに以下のマクロを登録。
Private Sub Worksheet_Activate()
sheet1_flag = True
End Sub
以上で完了です。
No.1
- 回答日時:
>シート名「1」を1回でも表示しないと、シート名「審査」のシートに移動できないように設定できるマクロを教えてください。
1.審査のシートタブをクリックしたとき、審査のシートに移動できないようにすることはできないので、(審査シートをクリックする前のシートに戻れないので)
①シート名「1」を1回でも表示していない場合、
エラーメッセージ(提示されたメッセージ)を表示して、
シート「1」に移動する。
②シート名「1」を1回でも表示していれば、シート「審査」移動する。
2.シート「審査」を表示した状態で、そのブックを閉じると、次回、そのブックをオープンしたとき、シート「審査」が、表示されます。
この場合は、シート「1」に移動するようにしますが、宜しいでしょうか。
上記の1,2のようになりますが良いでしょうか。それでよければ可能です。
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
似たような質問が見つかりました
- Visual Basic(VBA) Excelのマクロについて教えてください。 1 2024/06/18 09:20
- Excel(エクセル) エクセルのマクロについて教えてください。 2 2023/01/25 11:42
- Visual Basic(VBA) エクセルのマクロについて教えてください。 1 2024/07/02 08:51
- Visual Basic(VBA) エクセルのマクロについて教えてください。 2 2024/04/02 16:12
- Visual Basic(VBA) ExcelのVBAコードについて教えてください。 4 2024/03/05 09:03
- Visual Basic(VBA) ExcelのVBAコードについて教えてください。 1 2023/01/23 11:02
- Visual Basic(VBA) ExcelのVBAコードについて教えてください。 1 2024/03/13 09:23
- Visual Basic(VBA) エクセルのマクロについて教えてください。 1 2023/09/15 09:38
- Visual Basic(VBA) エクセルのマクロについて教えてください。 1 2023/08/03 11:27
- Visual Basic(VBA) エクセルのVBAコードについて教えてください。 6 2024/06/28 11:33
このQ&Aを見た人はこんなQ&Aも見ています
-


VBA Application.Matchについての質問です
Visual Basic(VBA)
-


【ExcelVBA】dictionaryの重複判断の基準(セル結合だと違う値として認識される)
Visual Basic(VBA)
-


VBAでセルの書式を変えずに文字列を置換する方法をご教示ください
Visual Basic(VBA)
-
-
4

エクセルのVBAコードについて教えてください。
Visual Basic(VBA)
-
5

【ExcelVBA】5万行以上のデータ比較の効率的な処理方法について
Visual Basic(VBA)
-
6

エクセルvbaの対象セルに色をつける 例えば a日付 b種類 c値段 dその他 にんじん 50 ぴー
Visual Basic(VBA)
-
7

Excelのマクロについて教えてください。
Visual Basic(VBA)
-
8

VBA 2次元配列の出力
Visual Basic(VBA)
-
9

Visualbasicの現状について教えてください
Visual Basic(VBA)
-
10

Excel マクロについて詳しい方、ご教示ください。 『行数が毎回変わる元データの、A列に「1」と入
Visual Basic(VBA)
-
11

Vba 型が一致しません(エラー13)のセルを特定する方法を教えてください
Visual Basic(VBA)
-
12

VBAで特定の文字が入った行をコピーして貼り付けたい
Visual Basic(VBA)
-
13

ExcelのVBAコードについて教えてください。
Visual Basic(VBA)
-
14

VBA 同じフォルダ内のすべてのファイルに同じセルをペーストしたい
Visual Basic(VBA)
-
15

エクセルのマクロについて教えてください。
Visual Basic(VBA)
-
16

以下のプログラムの実行結果はどうなると思いますか? その理由も教えてください。
Visual Basic(VBA)
-
17

Web画面の文字をVB6で取得したい
Visual Basic(VBA)
-
18

エクセル タブの下のメニューを選択 実行するコード
Visual Basic(VBA)
-
19

[Excel VBA]特定の条件で文字を削除&残す処理をするファイルを作成したいです
Visual Basic(VBA)
-
20

【VBA】値を変更しながら連続でPDFを作成し,それらに印刷設定をした状態で結合するコード
Visual Basic(VBA)
関連するカテゴリからQ&Aを探す
おすすめ情報
このQ&Aを見た人がよく見るQ&A
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
VBAでCOPYを繰り返すと、処理が...
-
【マクロ】並び替えの範囲が、...
-
【マクロ】オートフィルター を...
-
Vba Array関数について教えてく...
-
Vba 型が一致しません(エラー1...
-
【ExcelVBA】値を変更しながら...
-
vbsでのwebフォームへの入力制限?
-
エクセルのマクロについて教え...
-
【ExcelVBA】5万行以上のデー...
-
VBAでセルの書式を変えずに文字...
-
【マクロ】開いているブックの...
-
Vba セルの4辺について罫線が有...
-
vb.net(vs2022)のtextboxのデザ...
-
Excel VBA 選択範囲の罫線色の...
-
【マクロ】売上一覧YYYYMMDDHHS...
-
エクセルの改行について
-
VBAで特定の文字が入った行をコ...
-
WindowsのOutlook を VBA から...
-
Excel 範囲指定スクショについ...
-
【マクロ】シートの変数へ入れ...
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
Vba セルの4辺について罫線が有...
-
vbsでのwebフォームへの入力制限?
-
【ExcelVBA】5万行以上のデー...
-
【マクロ】売上一覧YYYYMMDDHHS...
-
【マクロ】開いているブックの...
-
【マクロ】並び替えの範囲が、...
-
エクセルの改行について
-
エクセルのマクロについて教え...
-
vb.net(vs2022)のtextboxのデザ...
-
VBAでCOPYを繰り返すと、処理が...
-
VBA ユーザーフォーム ボタンク...
-
エクセルのVBAコードと数式につ...
-
エクセルのVBAコードについて教...
-
[VB.net] ボタン(Flat)のEnable...
-
【マクロ】変数を使った、文字...
-
改行文字「vbCrLf」とは
-
質問58753 このコードでうまく...
-
【マクロ】シートの変数へ入れ...
-
ワードの図形にマクロを登録で...
-
算術演算子「¥」の意味について
おすすめ情報










回答ありがとうございます。
貴者の提案でお願いいたします。
宜しくお願い致します。