エクセルからOnedrive上のAccessに接続したい

Question

前提・実現したいこと

エクセルから、Onedrive上にあるAccessに接続し、データを抽出したいです。
以前はローカルに落として使っていたので以下のコードを使用しました。
課内共有で使用することとなったため、Onedriveを使って運用したいです。

Dim strFileName As String
strFileName = "データ.accdb"

Dim adoCn As Object
Set adoCn = CreateObject("ADODB.Connection")
adoCn.Open "Provider=Microsoft.ACE.OLEDB.12.0;Data Source=" & ThisWorkbook.Path & "" & strFileName & ";"

Data Source　のあとの接続文字を変えないといけないのかと思いますが、onedriveのファイルのリンクを貼ってもうまくいきませんでした。

ご教授いただけますと助かります。
よろしくお願いいたします。

Answer 1

自己解決いたしました。