ADO Recordsetオブジェクトの主なメソッド

メソッド	説明
Open	レコードセットを開く
Close	レコードセットを閉じる
Move	カレントレコードを移動する
MoveFirst	先頭レコードに移動する
MoveLast	最終レコードに移動する
MoveNext	次のレコードに移動する
MovePrevious	前のレコードに移動する
Move番号	引数「番号」に指定した数だけ移動する
Find	レコードを検索する
Clone	レコードセットのコピーを作る
AddNew	レコードを追加する
Update	レコードを更新する
Delete	レコードを削除する

ExcelVBA シートの保護と編集可能セル範囲の設定（セルごとの保護）

Sub 編集可能領域の設定()
    Worksheets("Sheet1").Protection.AllowEditRanges.Add _
    Title:="許可範囲1", _
    Range:=Range("A4:G4"), Password:="editOK"
End Sub

Sub ワークシートに保護を設定()
    Worksheets("Sheet1").Protect _
    Password:="AllowEdit"
End Sub

Sub 対象セル範囲ごとに保護を設定()
    With Worksheets("Sheet1").Protection.AllowEditRanges
    .Add _
    Title:="許可範囲1", _
    Range:=Range("A4"), Password:="editOKA"
    .Add _
    Title:="許可範囲2", _
    Range:=Range("A5"), Password:="editOKB"
    .Add _
    Title:="許可範囲3", _
    Range:=Range("A6"), Password:="editOKC"
    
    'シートの保護
    Worksheets("Sheet1").Protect _
    Password:="AllowEdit"
    End With
End Sub