InputBox ユーザ使用者の判断を仰ぐ　 次の文書

　msg = "職員TBLから勤務割表の初期設定を行います。"
　値 = InputBox(msg, "勤務割表", "Y")
　If 値 = "Y" Then
　　勤務割表初期設定
　End If
　If 値 = "" Then
　　Msgbox("キャンセルされました")
　　exit sub
　End If
　




← 左の文字をここへ入力後 登録ボタンをクリックしてください

(サイト管理者承認後掲載されます)