更新クエリで"Yes/No型"のフィールドを初期化する
 テーブルのフィールドのデータ型には、"Yes/No型"があります。
 ここでは、データを更新したかどうかを表すために"Yes/No型"のフィールド
を利用しているテーブルを用意して、更新クエリを使って初期化します。

● 準備 ●
以下のようなテーブルを作成します。
<テーブル名:テーブル1>

 フィールド名       データ型
------------------------------------
商品名           テキスト型
仕入先           テキスト型
更新フラグ         Yes/No型

 更新フラグには、Yes/No、True/False、またはOn/Offの、2つの値のうちの
1つが格納されます。
 サンプルでは、全てのデータの更新フラグを初期化する更新クエリを作成
して実行します。


● サンプル ●

Sub Sample()
    Dim myDB As Database
    Dim qdf  As QueryDef
    Dim sql  As String
    
    Set myDB = CurrentDb
    
    sql = "UPDATE テーブル1 SET テーブル1.更新フラグ = No;"
    Set qdf = myDB.CreateQueryDef("Q_更新フラグ初期化", sql)

    DoCmd.OpenQuery "Q_更新フラグ初期化"
    
End Sub

 既に、"Q_更新フラグ初期化"と同じ名前のクエリがある場合は、削除するか
名前を変えてください。

● 補足説明 ●

 SQL文で、「テーブル1.更新フラグ = No」としていますが、"=False""=Off"
でも同じ結果が得られます。

Access2000



戻る


Excel Word Access VBA! モーグ