Report Access vba ADOに関する質問で

Report Access vba ADOに関する質問で。エラーチェックは更新処理を始める前に済ませましょう。Access vba (ADO)に関する質問です

研修でバグ管理表を作っています

チケット登録
チケット内容更新

の大きく二つに分かれていまして、添付画像はチケット登録です それぞれボタンが押されるたびに即座に反映できるようにチケットテーブルの更新をかけたいので、マクロの埋め込み方を教えてください

ぱっと思いついたのがマクロを埋め込むことだったのですが、ほかに何かいい方法があればそれも教えてほしいです Report。指定したオブジェクトのレコードソースを表す オブジェクト
または オブジェクトをたとえば。クエリに基づくフォームで
プロパティを使って参照を行うことと。同じクエリを使って
オブジェクトの複製を作成することは同じです。たとえば。
プロパティと の メソッドまたは の メソッドを
カスタム またはこの説明書に関するご質問やフィードバックが
ありますか?

エラーチェックは更新処理を始める前に済ませましょう。Private Sub btn登録_ClickDim cn As ADODB.CoeenctionDim rs As ADODB.RecordsetIf IsNulltxt概要.Value Or IsNullcmb報告者.Column1 Or IsNullcmb優先度 ThenMsgBox 概要、報告者、優先度は必ず記述してくださいExit SubEnd IfSet cn = CurrentProject.ConnectionSet rs = New ADODB.Recordsetrs.Open チケットリスト, cn, adOpenKeyset, adLockOptimisticDo Until rs.EOFIf rs!概要 = txt概要.Value Thenrs.CloseSet rs = NothingSet cn = NothingMsgBox 概要が同じチケットが存在するため登録できませんExit SubEnd Ifrs.MoveNextLooprs.AddNewrs!概要 = txt概要.Valuers!報告者 = cmb報告者.Column1rs!詳細 = Nztxt詳細.Value, -rs!優先度 = cmb優先度.Valuers!発生日 = Nzdate発生日.Value, Daters!期限日 = Nzdate期限日.Value, rs!親チケット = Nzcmb親チケット.Column1, -rs!ステータス = -rs!更新者 = -rs!備考欄 = -rs!更新日時 = Daters.Updaters.CloseSet rs = NothingSet cn = NothingMsgBox 新規チケットの登録が完了しましたEnd Sub画像からテキストを起こすのはしんどい.で、>チケットテーブルの更新をかけたいので、マクロの埋め込み方を教えてください。って、フォームのリクエリをしたいってことかな?


Leave a Reply

メールアドレスが公開されることはありません。 * が付いている欄は必須項目です

*