How can one import the contents of a file that is stored in SharePoint into an MS Word file using VBA?

I have the following use case.

I have a document that has a "Terms and Conditions" H1 section. There is no content in that section.

The content of this section is in different files (depending on the region for which the T&Cs need to be incorporated) on SharePoint. For example, the T&C for America is in a different file, and the T&C for Canada is in a different file--all on SharePoint.

I want to have a functionality where the user can select the region (using a checkbox field in user form) for which they want to plug in the T&C. And then the content of the file, which is on SharePoint is pasted in the Terms and Conditions section.

How can i please accomplish this using VBA. Can you please break it down for me.

If you create a bookmark (eg "TandC") in your document then you can do this:

Dim url as String 

'Assign a url based on the user's selection...
url = "https://blah.sharepoint.com/sites/yoursite/TestLibrary/TandC_USA.docx" 'for example

ActiveDocument.Bookmarks("TandC").Range.InsertFile url

Instead of having one document each with a separate T&C, you could combine all of the T&C in the same document, and give each one a distinct bookmark, then provide that bookmark name when calling InsertFile:

ActiveDocument.Bookmarks("TandC").Range.InsertFile url, "TandC_USA"

See:
https://learn.microsoft.com/en-us/office/vba/api/word.range.insertfile

> I want to have a functionality where the user can select the region for which they want to plug in the T&C. And then the content of the file, which is on SharePoint is pasted in the Terms and Conditions section.

And how do you want to implement the facility? Content Controls, Active X Controls, User Form, etc.?

Then you must have full permission to read and download the complete file.

The body of the functionality of yours may be like this :

Rem creedit with YouChat:
Sub ImportSharePointFile()

    ' Defined variables
    Dim SPFileUrl As String  ' SharePoint file's URL '
    Dim SPFileName As String ' File name of the SharePoint file
    
    Dim HttpReq As Object       ' Http request object
    Dim Stream As Object        ' ADODB Stream object
    Dim TempFilePath As String  ' Temporary file path
    
    Dim Doc As Document         ' Word Document object
    
    Dim rngToInsert As Range
        
    ' set the SharePoint file's URL and it's name
    SPFileUrl = "https://...."
    SPFileName = ".... yourfile.docx"
    
   ' Send Http request to download SharePoint files to local
    Set HttpReq = CreateObject("MSXML2.XMLHTTP")
    HttpReq.Open "GET", SPFileUrl, False
    HttpReq.send
    
    If HttpReq.Status = 200 Then ' Http request success
    
        ' Create a temporary file
        TempFilePath = VBA.Environ$("temp") & "\" & SPFileName
        Set Stream = CreateObject("ADODB.Stream")
        Stream.Type = 1 ' Binary Types
        Stream.Open
        Stream.Write HttpReq.responseBody ' Write the contents of the Http request to Stream
        Stream.SaveToFile TempFilePath, 2 ' Write the contents of the Stream to a file
        Stream.Close
        Set Stream = Nothing
        
        ' Insert the contents of the temporary file into a Word document
        Set Doc = ActiveDocument ' Assuming that the current document is a Word document that needs to be imported
         'insert into the specific position
        Set rngToInsert = Doc.Sections("Terms and Conditions").Range
        rngToInsert.InsertFile TempFilePath
        
        ' Delete the temporary file
        Kill TempFilePath
    
    End If
    
    ' Released Objects
    Set HttpReq = Nothing
    
End Sub