VBAからSQLiteファイルを作りたいお年頃

そもそもVBAとSQLiteってどうすればいいのって方はこちらから。

2014.04.23

過去にC#からSQLiteをゴリゴリしたことがあるんですが、今回はVBAからやっちまいます。 C#の時は色々と困りもしましたが、VBAは比較的簡単です。ちなみにExcel32bit版のみの話です。最近はついに64bit版にも対応したSQLiteForExcelってライブラリっていうかsqlite3のAPI叩き方のサンプル集？があるっぽい。SQLCipherを使わないと暗号化できない（んだよね？）ので、自分でライブラリ作らないといけない。だったらC#でSystem.Data.SQLite使うよ！準備OLEコントロール登録こちらからvbRichClientをダウンロードします。今はversion5.0....

これさえあれば、ファイルの有無チェックとかテーブルチェックかはできると思うので、あとは…

SQLiteファイルそのものを作る

Dim objConn As New vbRichClient5.cConnection    ' コネクション
' なければ新たにファイルを作る
If Not objConn.CreateNewDB("出力ファイルパス", "パスワードをつけたいならパスワードを指定") Then
    ' 何番でもいいけど「内部エラーです。」あたりにでもしておきましょか
    Call Err.Raise(51)
End If

SQLiteファイルにテーブルを作る

Dim objConn As New vbRichClient5.cConnection    ' コネクション
If Not objConn.OpenDB("作成先ファイルパス", "パスワードがあれば指定") Then
    ' 何番でもいいけど「内部エラーです。」あたりにでもしておきましょか
    Call Err.Raise(51)
End If

' トランザクション開始
objConn.Synchronous = False
objConn.BeginTrans

' テーブル作成
If objConn.Execute("CREATEコマンド文") Then
    Call objConn.CommitTrans
Else
    Call objConn.RollbackTrans
    ' 必要に応じてエラー処理
End If

他にもニッチなIT関連要素をまとめていますので、よければ一覧記事もご覧ください。

みにましあ

https://minimashia.net/it-tips

2019.12.04