load files whit excel vba

Question

Hi.
I would like to receive an example on how to upload a file (ie *.xlsm) to dropbox from excel using vba.
Thanks a lot.

Jay · Answer

Hi smarta1, thanks for posting on the Community!

&nbsp;

Are you trying to upload files to Dropbox directly using the Excel app, or via Office Online?

&nbsp;

Keep me posted!

smarta1 · Answer

Hi Jay.Thanks for your answer.I am using MS Excel (Microsoft Office) on a Desktop with Windows 8.1 (No Office Online).I would like to have a VBA routine to insert in my excel file (*.xlsm).Best regards.

Jay · Answer

I'm not sure if it's possible to create a VBA script to upload to Dropbox directly, however, you can look into the Dropbox API documentation for more information to see&nbsp;if there is any possibility of doing so using the info there.

smarta1 · Answer

Hi Jay.I asked because I found the following but I do not know if is complete:Public Sub DB_PutFile(FileName As String)Dim req As MSXML2.ServerXMLHTTP60Dim strFile As StringDim Pos1 As IntegerDim Pos2 As IntegerDim arg As String&nbsp;&nbsp;&nbsp; Set req = New MSXML2.ServerXMLHTTP60&nbsp;&nbsp;&nbsp; strFile= ReadBinary(FileName)&nbsp;&nbsp;&nbsp; arg = "{""path"":""/" &amp; FileName &amp; """,""mode"":{"".tag"":""overwrite""},""autorename"":false,""mute"":true}"&nbsp;&nbsp;&nbsp; req.Open "POST", "https://content.dropboxapi.com/2/files/upload", False&nbsp;&nbsp;&nbsp; req.setRequestHeader "Authorization", "Bearer xxxxxxxxxxxxxxxx"&nbsp;&nbsp;&nbsp; req.setRequestHeader "Content-Type", "application/octet-stream"&nbsp;&nbsp;&nbsp; req.setRequestHeader "Content-length", Len(Result)&nbsp;&nbsp;&nbsp; req.setRequestHeader "Dropbox-API-Arg", arg&nbsp;&nbsp;&nbsp; req.setRequestHeader "User-Agent", "api-explorer-client"&nbsp;&nbsp;&nbsp; req.send strFile&nbsp;&nbsp; &nbsp;If req.Status = 200 Then&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; Debug.Print req.responseText&nbsp;&nbsp;&nbsp; Else'MsgBox req.Status &amp; ": " &amp; req.statusText&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; Debug.Print req.responseText&nbsp;&nbsp;&nbsp; End IfEnd SubCan you help me?Best regards.

Jay · Answer

It does look like some API calls are made there. I can move this thread to the API forum, however, bear in mind that we might not be able to assist with the VBA script as it isn't related to Dropbox itself.

Forum Discussion

load files whit excel vba

About Dropbox API Support & Feedback

Related Content

Re: I have a Plus plan, but my desktop app shows a Basic 2GB.

perte de liaisons entre 2 fichiers excel

Excelアップロード時のエラーメッセージ

Conflicting copies of excel file

Re: Dropbox won't load in my Windows 10 device.

Recent Discussions

get_shared_link_metadata API problem with the new '/scl' folder links.

Trying to download a file, but no file is being downloaded.

Dropbox internal error occured - Resolution

How to add the entire team to team folder by api

API Upload .HEIC and convert to JPG