| アクセストップページ VBA､ADOでAccessテーブルのレコードにアクセスする |
|
VBA､ADOでAccessテーブルのレコードにアクセスする
|
menu |
1
行ずつテーブルのレコードをチェックして､何かの処理を行いたい場合に使用します｡
ADOでAccessテーブルのレコードにアクセスする手順は以下の通りです｡
1
ADOでAccessテーブルに接続する｡
2 レコードを最初から1つずつループでアクセスする｡
3
Accessテーブルへの接続を終了する｡
Dim cn As New ADODB.Connection
Dim rs As New
ADODB.Recordset
ADOのオブジェクトを生成します｡
'接続
Set cn =
CurrentProject.Connection
rs.Open "ここに接続したいテーブル名", cn, adOpenKeyset,
adLockOptimistic
テーブルに接続します｡
Do Until
rs.EOF
レコードの最初の行からループでアクセスしてゆきます｡
処理を行う場合はここに処理を書きます｡
rs.MoveNext
次のレコードへ移動します｡
Loop
'終了処理
rs.Close:
Set rs = Nothing
cn.Close: Set cn =
Nothing
テーブルとの接続を終了します｡
rs.MoveNextでレコードを次へ一つ進めます｡
次へ進めないとループが終了しなくなります｡
アクセスを動画で楽に覚える方法はこちら>>
|
|
|
| アクセス入門 |
|
|
| VBA |
・アクセスVBAでパスワード画面
・VBAで時間操作(DateDiff関数,DatePart)
・VBAで時間操作(DateAdd関数,DateValue,TimeValue)
・VBAでエクセルの表をソート(Sortメソッド)
・VBAで時間操作(Time関数,・Hour,Minute,Second,Format)
・VBAで日付操作(Date関数,Year,Month,Day,
・Weekdayname,Format)
・VBAでエラー処理(On Error GoTo)
・VBAでコピー操作(copyメソッド)
・VBAで文字列操作(String関数,InStrRev)
・VBAで文字列操作(Len関数,Mid,Left,Right)
・VBAで文字列操作(UCase関数,LCase,StrConv)
・VBAで文字列操作(LTrim関数,RTrim,Trim,Replace)
・VBAで文字列操作(InStr関数)
・VBAで文字列操作(StrComp関数)
・VBAでFind メソッドを使って検索する方法
・VBA のcellsでエクセルのセルの位置を数字で指定する
・VBAでエクセルのsheetsの操作
・VBAで配列を扱う
・VBAでfileを操作する
・VBA､ADOとSQLでテーブルのデータを削除する
・VBA､ADOでAccessテーブルのレコードにアクセスする
・VBAでエクセルの書式を設定する
・VBAでテーブルやクエリのレコードをエクセルに入力
・VBAでエクセルのワークシートを追加
・アクセスVBAでインポートとエクスポート
|
|
| データベース・SQL |
|
|
| Copyright (C) 2011 All Rights Reserved. |
|
