VBAにアクセス - Sharepointに保存されたExcelファイルからデータを取得する

Question

"Model_data.xlsm"ファイルがハードドライブに保存されている場合、以下のコードが私のために働いています。 AccessがSharepointに保存されている "model_data.xlsm"からデータを取得できるかどうか

Private Sub Update_manu_data_Click() 

Dim strXls As String 

strXls = CurrentProject.Path & Chr(92) & "Model_data.xlsm" 
DoCmd.TransferSpreadsheet acImport, acSpreadsheetTypeExcel12, "Manufacturing_data", _ 
strXls, True, "Combined!" 

End Sub 

Answer 1

最後に、この問題の回避策を見つけました。

I SPからExcelファイルをダウンロードするためにプライベート機能を作成し、Transferspreadシート機能を使用してアクセステーブルにデータを取得しました。

以下

は、私はVBAの

アクセスを使用してSPにExcelファイルをダウンロードする

Private Sub Command2_Click() 
    Dim Ex As Object 
    Dim Acc As Object 
    Dim strXls As String 


    Set Ex = CreateObject("Excel.Application") 
    Set Acc = Ex.Workbooks.Open("https://Sharepoint File link") 

    Ex.Visible = False 

    Acc.SaveAs "C:\Users\.......\test.xlsx" 

    Acc.Close 
    Ex.Quit 

    strXls = CurrentProject.Path & Chr(92) & "C:\Users\.......\test.xlsx" 
    DoCmd.TransferSpreadsheet acImport, acSpreadsheetTypeExcel12, "Tablename", _ 
    strXls, True, "Sheet(1)!" 
End Sub