世知辛さの記録

AccessのBeforeUpdateでUndo

投稿日：2013年6月13日更新日：2014年5月28日

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

-MS Access

執筆者：admin

: Access2013のWeb機能について（FileMakerと比較して）メモ

ここ数日、MS-Access 2013のWeb機能を勉強していたので、そのメモ。 ■フォームの書式選択肢があまりに少ない。FMのようにデザインやテーマが用意されていない。リスト表示のサイズが変更で …

: Accessで複数レコードを1レコードにまとめる（運送会社送り状作成のため

Accessに入れてある楽天の注文データをもとに、運送屋さんの送り状伝票を作ろうと思い立った。しかし、楽天の注文データは、同一の受注番号で複数の商品に分かれている。例えば一人の人が3点買い物をした …

: Accessでメッセージ内容が無い（のっぺらぼう、OKボタンのみ）エラーメッセージがでる

自分作のモジュールの記述で、以下のように書いている箇所があって、 If rs.EOF = True Then GoTo Err_chkFukuyamaVcr ‘error Else 　　（中略）また …