世知辛さの記録
投稿日：2013年6月13日 更新日：
BeforeUpdateプロシージャ内の処理で、Cancel = Trueとしたら更新がキャンセルされるところまではできたが、テキストボックスにNullを代入しようとしてエラーが出たりして、間違って入力されている値を削除する方法がなかなか気づかなかった。
Me.Undoを入れてやると値が消せた。
きっと1ヶ月もしたら忘れていそうなので、メモ。
[code]
If Me.txtお支払い方法 = "代引き" Or Me.txtお支払い方法 = "代引き2" Then
chk入金日 = False
Else
MsgBox "代引き以外では入金日の入力はできません"
Cancel = True
Me.Undo
chk入金日 = True
End If
[/code]
執筆者：admin
関連記事
Accessのフォーム/レポートのコントロール同士をくっつけて桝目状にしたい
レポートを、Excelのような桝目の罫線にしたい。 お客からこんなニーズが多い。 やったことがある人ならわかるけど、これが、なかなか苦労する。 レポートのデザインビューで、いざ個々にコントロールをきち …
フォームを直接Accessで印刷プレビューし、閉じるときのイベントで処理をしたい
困ったこと： 前提として、自分とこのシステムは、フォームを直接Accessで印刷プレビューして、そのまま印刷できるように作ってある。 しかし、リボンに印刷プレビューを閉じるボタンがある一方で、フォーム …
Accessでフォームフィルタの結果をExcelにエクスポートする
ちょっと、苦労した。 [code] Private Sub cmdDMデータ作成_Click() On Error GoTo Err_cmdDMデータ作成_Click Dim rstf As Stri …
Accessで1件ずつレコードを読んでスナップショットファイルを作ってメール送信する処理
作るのにWebに情報が無くてすごく苦労したので備忘録。 私にしかわからないかもしれないけど、見た人も何か参考になるかもしれないから、公開しよっと。 ■事前準備 1.処理を起動するフォームにボタン「調査 …
AccessでコンボボックスのリストをVBAで行番号で選択する
こんな方法があるのは知らなかった。 メモメモ。 [code] ‘コンボボックスの1行目を選択する ‘Forms!見積請求書F.cbo銀行振込先 = Forms!見積請求書F.c …
2026/06/10
Shopify サンキューページの必須アップグレードを実施しました
2026/06/02
2026/03/24
2025/11/20
手軽にSpotifyから曲を検索するツールをFirefox拡張機能で作る
2025/08/18