パラメータクエリやパラメータを持つストアドプロシージャを実行する - 覚え書き ExcelVBAでデータベース操作

パラメータクエリやパラメータを持つストアドプロシージャを実行する Sub パラメータクエリを実行() Dim myCon As New ADODB.Connection, myCmd As New ADODB.Command Dim myPmt As ADODB.Parameter, mySrc As String '対象となるデータベース mySrc = ThisWorkbook.Path & "\mdb\4-sampleDB.mdb" '接続 With myCon .Provider = "Microsoft.Jet.OLEDB.4.0;" .Open mySrc End With With myCmd .ActiveConnection = myCon .CommandText = "PQ_手当更新" '新規パラメーターオブジェクトを作成 Set myPmt = .CreatePar