Skip to content

Commit

Permalink
Create Open File.md
Browse files Browse the repository at this point in the history
  • Loading branch information
Believe82 authored Apr 10, 2024
1 parent 5fca7de commit a5b3fef
Showing 1 changed file with 15 additions and 0 deletions.
15 changes: 15 additions & 0 deletions Open File.md
Original file line number Diff line number Diff line change
@@ -0,0 +1,15 @@
'Code to open the external file:

Sub open_wb_onedrive()
'Opens an instance of our data workbook

Dim wbFullName

Set objLogExcel = CreateObject("Excel.Application")
objLogExcel.Visible = True

'Put here the path to the workbook you want to be opened
wbFullName = "C:\Users\data.xlsx"
Set openwb = objLogExcel.Workbooks.Open(wbFullName)

End Sub

0 comments on commit a5b3fef

Please sign in to comment.