世知辛さの記録
投稿日：2013年6月13日 更新日：
BeforeUpdateプロシージャ内の処理で、Cancel = Trueとしたら更新がキャンセルされるところまではできたが、テキストボックスにNullを代入しようとしてエラーが出たりして、間違って入力されている値を削除する方法がなかなか気づかなかった。
Me.Undoを入れてやると値が消せた。
きっと1ヶ月もしたら忘れていそうなので、メモ。
If Me.txtお支払い方法 = "代引き" Or Me.txtお支払い方法 = "代引き2" Then chk入金日 = False Else MsgBox "代引き以外では入金日の入力はできません" Cancel = True Me.Undo chk入金日 = True End If
執筆者：admin
関連記事
AccessやExcelで作ったハイパーリンクではChromeブラウザ上のGmailの受信トレイを検索できんかった・・・がShellならできた
Accessのフォームにつくったボタンをクリックしたら、ハイパーリンクに変数がセットされ、その変数でGmailの受信トレイを検索する・・・・といった仕組みを作りたかった。 Private Sub cm …
「抽出条件 フォーム access not in クエリ」とか「forms access in 抽出条件 複数」とかでググっても出てこなかったので、メモ
Accessでフォームからクエリに抽出条件をパラメータで渡すやり方が分からなくて、数時間苦労。 このタイトルがGoogleの肥やしになって、このサイトに来てくれる人が増えれば。。。 要するに私がやりた …
AccessからExcelフォーマットでファイルに出力するサンプルコード
Excelから外部データの接続の際に,ユーザー定義関数を含んだクエリを指定するとエラーになったので、こんなやり方で対処。 Private Sub btnB2_Click() DoCmd.OutputT …
Accessのフォームを開く際、acHiddenとVisibleの組み合わせで高速化
Accessのフォームを開く際、acHiddenとVisibleの組み合わせで高速化 Accessのとあるシステムで、 フォームを開いてフィルタをセットして実行してさらに並べ替える・・・という処理をし …
AccessのレポートでNoDataでイベントキャンセル後もReport_Closeが実行されて困った
Accessのレポートで表示するデータがない場合は、以下のように書けばスマートにキャンセルできる。 Private Sub Report_NoData(Cancel As Integer) MsgBo …
2025/11/20
手軽にSpotifyから曲を検索するツールをFirefox拡張機能で作る
2025/08/18
2025/07/07
【重要・ご対応のお願い】Chatwork APIリクエストの仕様変更についてのお知らせ
