![](https://cdn-ak-scissors.b.st-hatena.com/image/square/2dc1481be654e2a9bb323ac069761225095eb7c0/height=288;version=1;width=512/https%3A%2F%2Fqiita-user-contents.imgix.net%2Fhttps%253A%252F%252Fcdn.qiita.com%252Fassets%252Fpublic%252Farticle-ogp-background-412672c5f0600ab9a64263b751f1bc81.png%3Fixlib%3Drb-4.0.0%26w%3D1200%26mark64%3DaHR0cHM6Ly9xaWl0YS11c2VyLWNvbnRlbnRzLmltZ2l4Lm5ldC9-dGV4dD9peGxpYj1yYi00LjAuMCZ3PTk3MiZoPTM3OCZ0eHQ9RXhjZWwlRTMlODElOEIlRTMlODIlODlPREJDJUUzJTgxJUFBJUUzJTgxJTk3JUUzJTgxJUE3U1FMaXRlJUUzJTgyJTkyJUU2JTkzJThEJUU0JUJEJTlDJUUzJTgxJTk5JUUzJTgyJThCJTI4JUU1JUFFJTlGJUU4JUI3JUI1JUU3JUI3JUE4JUVGJUJDJTkxJUVGJUJDJTg5JnR4dC1hbGlnbj1sZWZ0JTJDdG9wJnR4dC1jb2xvcj0lMjMyMTIxMjEmdHh0LWZvbnQ9SGlyYWdpbm8lMjBTYW5zJTIwVzYmdHh0LXNpemU9NTYmcz0yMjU2OGVkMjRiNWFhYTlmNTk4YzEwYmE2NjNmY2I5OQ%26mark-x%3D142%26mark-y%3D57%26blend64%3DaHR0cHM6Ly9xaWl0YS11c2VyLWNvbnRlbnRzLmltZ2l4Lm5ldC9-dGV4dD9peGxpYj1yYi00LjAuMCZoPTc2Jnc9NzcwJnR4dD0lNDBoaXNheXVraSZ0eHQtY29sb3I9JTIzMjEyMTIxJnR4dC1mb250PUhpcmFnaW5vJTIwU2FucyUyMFc2JnR4dC1zaXplPTM2JnR4dC1hbGlnbj1sZWZ0JTJDdG9wJnM9OTY4MDk3ZGExN2FmOGMwNzRkOTNhODE3MjU4YzNjZGE%26blend-x%3D142%26blend-y%3D486%26blend-mode%3Dnormal%26s%3D2d48885dd2af384ad0f62b827f54891f)
エントリーの編集
![loading...](https://b.st-hatena.com/bdefb8944296a0957e54cebcfefc25c4dcff9f5f/images/v4/public/common/loading@2x.gif)
エントリーの編集は全ユーザーに共通の機能です。
必ずガイドラインを一読の上ご利用ください。
記事へのコメント1件
- 注目コメント
- 新着コメント
注目コメント算出アルゴリズムの一部にLINEヤフー株式会社の「建設的コメント順位付けモデルAPI」を使用しています
![アプリのスクリーンショット](https://b.st-hatena.com/bdefb8944296a0957e54cebcfefc25c4dcff9f5f/images/v4/public/entry/app-screenshot.png)
- バナー広告なし
- ミュート機能あり
- ダークモード搭載
関連記事
ExcelからODBCなしでSQLiteを操作する(実践編1) - Qiita
前回の記事からの続きです。 なので、環境等は前回の記事を参照してください。 また、今回はサンプルExc... 前回の記事からの続きです。 なので、環境等は前回の記事を参照してください。 また、今回はサンプルExcelではないのでSqlite3_64.basを読み込んでます。 登場するモジュールはSqlite3_64.basにあるものです。 今回はDBの作成、テーブルの作成までやっていきます。 DLL読み込み まずはSQLite.dllの読み込みです。 標準モジュールに新しいモジュールを作り、Executeと名前を付けました。 SQLite3Initialize() Public Sub Execute() Dim InitReturn As Long 'SQLiteDLL #If Win64 Then Debug.Print "Excel is 64bit" 'SQLiteDLL読み込み InitReturn = SQLite3Initialize(ThisWorkbook.Path + "\x6
2023/04/13 リンク