Skip to content

Instantly share code, notes, and snippets.

@pandanote-info

pandanote-info/sqlite3init.bas

Created March 30, 2019 09:14
Show Gist options
  • Star 0 You must be signed in to star a gist
  • Fork 0 You must be signed in to fork a gist
  • Save pandanote-info/8a31e92217de9c6bda20ce448186dbf0 to your computer and use it in GitHub Desktop.
Save pandanote-info/8a31e92217de9c6bda20ce448186dbf0 to your computer and use it in GitHub Desktop.
Download ZIP
32bit版及び64bit版のExcelで使用できるSQLite3のDLL(sqlite3.dll)をオープンするためのExcel VBAの関数。
Raw
sqlite3init.bas
Function SQLite3Init(Optional ByVal libDir As String) As Long
#If Win64 Then
SQLite3Init = SQLite3Initialize(ThisWorkbook.Path + "\x64")
#Else
SQLite3Init = SQLite3Initialize(libDir)
#End If
End Function
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment