No.8ベストアンサー
- 回答日時:
こんな感じに、IF文で条件分岐すればいいような気がします。
Private Sub コマンド3_Click()
On Error GoTo Err_コマンド3_Click
'データが変更されていない場合
If Me.Dirty = False Then
MsgBox "データを入力してから押してね"
Me.TXT.SetFocus '「TXT」って名前のテキストボックスにフォーカスをセットしてます
'変更されている場合
Else
DoCmd.DoMenuItem acFormBar, acRecordsMenu, acSaveRecord, , acMenuVer70
End If
Exit_コマンド3_Click:
Exit Sub
Err_コマンド3_Click:
Resume Exit_コマンド3_Click
End Sub
ボタンの名前とかは適当に読み替えてください。
ありがとうございます。毎回毎回お世話になっております。さすがに私もここまでの知識すらないので知識を知っている人たちには本当に脱帽です。ありがとうございます。
No.7
- 回答日時:
コントロールウィザードのボタンが凹んでいる状態で、フォームにボタンを貼り付けます。
んで、レコードの操作→レコードの保存
を選んでください。
ウィザードの残りの部分は適当でいいんですが、出来あがった後でボタンの「クリック時」のイベントプロシージャを編集し、
MsgBox Err.Description
となっている一行を削除してください。
これにより、レコード保存の動作に連動して、先のコードが実行されるようになります。
こんな感じで宜しいでしょうか?
不明点とかあれば補足してくださいませ。
この回答への補足
出来ました。ありがとうございます。あと補足としてお願いなのですが、レコードに何も入れていない状態でこのボタンを押すと保存できない旨のメッセージを出してカーソルを所定の場所に戻せたらいいのですが・・・
それと今統計を取っているのですがその質問を新しく載せたのでもしそちらの方もお分かりでしたらお教え願えませんか?お願いします。
No.6
- 回答日時:
>質問なんですがこれはキャンセルを押すとフォームが閉じるということはないでしょうか?
違いますよ。
「キャンセル」は、単純に更新処理をキャンセルするだけ、です。(入力内容はそのままです。)
「はい」は普通に更新処理を行って、「いいえ」は更新をキャンセルし、かつ、そのレコードの変更をリセットします。
まぁ、実際に動かしてみたら、動きとか判ると思うんですが…
もし実装方法とかが不明でしたら、補足してください。
この回答への補足
しばらく回答できない状態が続きまして申し訳ございません。えとフォームにボタンを作って更新のボタンを作って更新するかしないかの判定は出来ないのでしょうか?
補足日時:2003/12/08 22:16No.5
- 回答日時:
んじゃぁ、こんな感じですね。
キャンセルを押下したとき、保存はしないもののデータの回復も行いません。
Private Sub Form_BeforeUpdate(Cancel As Integer)
Dim Msg As String
Msg = "このデータ、更新する?"
Select Case MsgBox(Msg, vbYesNoCancel + vbDefaultButton3, "更新の確認")
Case vbYes
'「はい」の時は更新続行
Case vbNo
'「いいえ」
Me.Undo '更新前の状態に戻す。
Cancel = True '更新をキャンセルする
vbCancel
'「キャンセル」
Cancel = True '更新をキャンセルするだけ
End Select
End Sub
No.4
- 回答日時:
>「保存するかどうかは不明だけど画面はそのままで現状データのまま」というやつをつけたいんですが・・・。
変数を宣言してそこへコピーをおいておいてはどうですか?
で、キャンセルした時に、その値をフォームのtextboxに戻すと。。
No.2
- 回答日時:
ちょい前に同様の質問に回答いたしましたので、そちらの方もご参照くださいまし~
(ちなみに混乱されるといけないので書き添えておきますと、連結フォームであることが前提での回答です。)
質問などあれば、どうぞ~
参考URL:http://www.okweb.ne.jp/kotaeru.php3?q=660718
この回答への補足
質問が遅れてしまって申し訳ございません。確かに連結フォームでやるのですが、前のときははいといいえで分けていたので、「はい」保存終了。「いいえ」保存破棄終了。なんですがそれに「キャンセル」を追加したいんです。それは自分なりに考えると「保存するかどうかは不明だけど画面はそのままで現状データのまま」というやつをつけたいんですが・・・。
補足日時:2003/11/08 18:12お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
似たような質問が見つかりました
- Access(アクセス) Access 登録ボタンからサブフォームの更新 1 2022/07/22 10:23
- Access(アクセス) accessについて(超初心者です) 1 2023/02/11 11:18
- Windows 10 ノートPCの「アップデートナビ」画面について 1 2023/07/04 21:27
- Access(アクセス) ExcelのVBAコードについて教えてください。 4 2023/01/20 09:44
- Visual Basic(VBA) Excelのマクロについて教えてください。 作業フォルダ内に2つのファイルがあります。 このファイル 2 2023/07/09 13:40
- その他(Microsoft Office) エクセルのマクロについて教えてください。 5 2023/01/21 09:39
- その他(データベース) 更新クエリをリンクデータベーステーブルに実行し実行時エラー3362固有インデックスに重複する値が含ま 1 2022/09/21 11:44
- Visual Basic(VBA) ExcelのVBAコードについて教えてください。 1 2023/08/08 15:45
- Excel(エクセル) エクセルのマクロについて教えてください。 1 2023/02/03 13:18
- Excel(エクセル) エクセルのマクロについて教えてください。 1 2023/02/21 09:28
このQ&Aを見た人はこんなQ&Aも見ています
-
プロが教える店舗&オフィスのセキュリティ対策術
中・小規模の店舗やオフィスのセキュリティセキュリティ対策について、プロにどう対策すべきか 何を注意すべきかを教えていただきました!
-
レコードを保存するコード アクセスvba
その他(Microsoft Office)
-
アクセスVBAで既に開いているエクセルを閉じたい
Yahoo!ショッピング
-
AccessからExcelにエクスポートする時に常に上書きしたい
Excel(エクセル)
-
-
4
アクセスでテキストボックスの値が空白だったら
Access(アクセス)
-
5
ACCESSフォーム入力後の確定
Access(アクセス)
-
6
アクセスのfilter、複数条件の記述方法を教えてください。
Access(アクセス)
-
7
Accessで文字列の長さによって、フィールドの幅を自動で合わせる方法
Excel(エクセル)
-
8
テーブルの上書き保存は
Access(アクセス)
-
9
アクセスのファイルが勝手に保存されるのはなぜ?
Access(アクセス)
-
10
Access を×ボタンで閉じる時、レコード保存したくない。
Visual Basic(VBA)
-
11
フォームウィンドウを最前面に表示したい(ACCESS)
Microsoft ASP
-
12
Accessの追加クエリで既存のテーブルに上書き追加をしたい
その他(データベース)
-
13
Accessで別テーブルの値をフォームに表示したい
その他(データベース)
-
14
アクセスvbaでエクセルブックを保存
その他(Microsoft Office)
-
15
Access終了時にマクロまたはVBAの実行したい
その他(Microsoft Office)
-
16
ACCESSでデータ読み取り専用を解除する方法
その他(データベース)
-
17
ACCESSでVBAから選択クエリの抽出条件を指定したい
Access(アクセス)
-
18
Access 最後のレコードに到達するまでループ処理を行う方法
Access(アクセス)
-
19
accessのテーブルを閉じたときにクエリを自動で実行したい。
Access(アクセス)
-
20
Accessの画面更新を一時的に停止する方法。
その他(データベース)
関連するカテゴリからQ&Aを探す
おすすめ情報
このQ&Aを見た人がよく見るQ&A
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
先日、銭湯にて、入浴券を購入...
-
お葬式で旅行がキャンセルに
-
「参考になった」キャンセル方法
-
友人と2人で行くはずの旅行を...
-
2回連続ママ友にドタキャンされ...
-
当日キャンセルした飲み会のキ...
-
通販でキャンセルした商品が届...
-
美容室でのネット予約を2日くら...
-
幹事での失敗。どうしたら・・・。
-
タイミーで応募キャンセルされ...
-
ドタキャンの知人に飲み会のキ...
-
飲食店で注文後にキャンセルは
-
裏DVD
-
友人(4人)との旅行当日体調不...
-
当日キャンセルしてしまった美...
-
前からの約束、当日に連絡がき...
-
結婚指輪キャンセルにについて
-
飲み会を当日キャンセルしたん...
-
返品とキャンセルの違いについ...
-
至急!詐欺の可能性がある裏DVD...
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
友人と2人で行くはずの旅行を...
-
友人(4人)との旅行当日体調不...
-
通販でキャンセルした商品が届...
-
お葬式で旅行がキャンセルに
-
「参考になった」キャンセル方法
-
2回連続ママ友にドタキャンされ...
-
当日キャンセル料の請求について
-
急に旅行に行けないかもしれな...
-
当日キャンセルした飲み会のキ...
-
飲み会を当日キャンセルしたん...
-
タイミーで応募キャンセルされ...
-
裏DVD
-
旅行のキャンセル料について相...
-
旅行のキャンセル料
-
ドタキャンの知人に飲み会のキ...
-
卒業旅行のキャンセル料全額支...
-
至急!詐欺の可能性がある裏DVD...
-
当日キャンセルしてしまった美...
-
confirm の OK、キャンセル ...
-
占いできる方お願いします!
おすすめ情報