E
Ella
What if the file this time is from a web address
https://something.something.something.edu/~something/something/filename.more
verbage.something.123456.xlsl
How do i go about asking the macro to run the input box. Or do i just
have to save it as an excel file first and just run the following
statemnt.?
If the file and its location were something like
"C:\MyFolder\Myfilenamestart123456.xls" then you could use:
Sub OpenFile()
Dim title as String, ans as String
Title = "Q:\Daily\Weekly and HBI reports"
ans = InputBox("Enter the 6 digit number")
if len(ans) <> 6 or not isnumeric(ans) then
msgbox "Incorrect, try again"
exit sub
End if
Workbooks.Open Title & ans & ".xls"
End Sub
https://something.something.something.edu/~something/something/filename.more
verbage.something.123456.xlsl
How do i go about asking the macro to run the input box. Or do i just
have to save it as an excel file first and just run the following
statemnt.?
If the file and its location were something like
"C:\MyFolder\Myfilenamestart123456.xls" then you could use:
Sub OpenFile()
Dim title as String, ans as String
Title = "Q:\Daily\Weekly and HBI reports"
ans = InputBox("Enter the 6 digit number")
if len(ans) <> 6 or not isnumeric(ans) then
msgbox "Incorrect, try again"
exit sub
End if
Workbooks.Open Title & ans & ".xls"
End Sub