Access VBA質問箱 IV

当質問箱は、有志のボランティア精神のおかげで成り立っています。
問題が解決したら、必ずお礼をしましょうね。
本サイトの基本方針をまとめました。こちら をご一読ください。

投稿種別の選択が必要です。ご注意ください。
迷惑投稿防止のため、URLの入力を制限しています。ご了承ください。


1082 / 2272 ツリー ←次へ | 前へ→

【8838】コマンドボタンのイベントについて ぷー 06/11/27(月) 19:07 質問[未読]
【8839】Re:コマンドボタンのイベントについて Gin_II 06/11/28(火) 10:12 回答[未読]
【8853】Re:コマンドボタンのイベントについて ぷー 06/11/29(水) 14:46 お礼[未読]
【8855】Re:コマンドボタンのイベントについて Gin_II 06/11/29(水) 15:02 回答[未読]
【8856】Re:コマンドボタンのイベントについて ぷー 06/11/29(水) 15:35 お礼[未読]

【8838】コマンドボタンのイベントについて
質問  ぷー  - 06/11/27(月) 19:07 -

引用なし
パスワード
   こんばんは、いつもありがとうございます。

コマンドボタンを使って次のような事をしたいのですがうまくできません。
サブフォームつきのフォームA(検索画面)の明細の中に 訂正と言う
コマンドボタンを作り、訂正ボタンがクリックされた時は該当明細の
伝票入力画面を表示し、訂正後検索画面に戻ると言う処理です。
単純に訂正画面との行き来はできるのですが、検索画面に戻るときに訂正
した内容をRequeryしたいのですが、どこで行っていいかわかりません。

Private Sub 訂正コマンド_Click()
  DoCmd.RunMacro "MD0150直送仕入取込.売上仕入入力"
  
  DoCmd.RunMacro ("メッセージの設定マクロ.オフ")  <== 訂正処理が終わる
  DoCmd.RunMacro "MD0150直送仕入取込.WK削除"       前に実行される 
  DoCmd.RunMacro "MD0150直送仕入取込.WK明細作成"    (あたり前ですが・・)
  DoCmd.RunMacro ("メッセージの設定マクロ.オン")     かわりにどこに入れ
  Me.Parent.Repaint                   たらいいかが???
  
End Sub

ご教授ください、お願いいたします。

【8839】Re:コマンドボタンのイベントについて
回答  Gin_II  - 06/11/28(火) 10:12 -

引用なし
パスワード
   > 検索画面に戻るときに訂正した内容をRequeryしたいのですが、
> どこで行っていいかわかりません。

Forms("フォーム名").Requery
を、最後に入れたらどうなりますか?


ちなみに、関係はありませんが、

> DoCmd.RunMacro ("メッセージの設定マクロ.オフ")

DoCmd.SetWarnings False
とかでいいのでは?

【8853】Re:コマンドボタンのイベントについて
お礼  ぷー  - 06/11/29(水) 14:46 -

引用なし
パスワード
   ▼Gin_II さん:
>Forms("フォーム名").Requery
>を、最後に入れたらどうなりますか?

Forms("フォーム名").Requeryを何度かためしてみた覚えがあったのですが
なぜかGin_IIさんにお答えいただいてから再度やってみたら上手くできました。
きっと違うことをやっていたのですね、ありがとうございました。

>ちなみに、関係はありませんが、
>
>> DoCmd.RunMacro ("メッセージの設定マクロ.オフ")
>
>DoCmd.SetWarnings False
>とかでいいのでは?

マクロを作らずに出来るんですね。
まだまだ、勉強不足ですね。大変勉強になりました。
本当にありがとうございました。

【8855】Re:コマンドボタンのイベントについて
回答  Gin_II  - 06/11/29(水) 15:02 -

引用なし
パスワード
   >マクロを作らずに出来るんですね。
>まだまだ、勉強不足ですね。大変勉強になりました。

ちなみに、

>   DoCmd.RunMacro "MD0150直送仕入取込.WK削除"
>   DoCmd.RunMacro "MD0150直送仕入取込.WK明細作成"

ここらへんも、単にアクションクエリ(削除クエリ・追加クエリ)を
実行しているだけであれば、

DoCmd.OpenQuery "クエリ名"
のようにすることができます。

【8856】Re:コマンドボタンのイベントについて
お礼  ぷー  - 06/11/29(水) 15:35 -

引用なし
パスワード
   ▼Gin_II さん:
>ここらへんも、単にアクションクエリ(削除クエリ・追加クエリ)を
>実行しているだけであれば、
>
>DoCmd.OpenQuery "クエリ名"
>のようにすることができます。

自己流なので、教えていだだき本当に助かります。
いままで無駄な事をしていたのですね。
ありがとうございました。
これからもよろしく御願いいたします。

1082 / 2272 ツリー ←次へ | 前へ→
ページ:  ┃  記事番号:
1078205
(SS)C-BOARD v3.8 is Free