VBA to Open an excel file using Inputs

[bellg]

I'm trying to get this code to open a file for me:

Sub openfile()


Dim A As sting
Dim B As String


A = Application.InputBox("type value of A here:")
B = Application.InputBox("type value of B here:")


Workbooks.Open Filename:= _
"D:\Users\" & A & "\Documents\" & B & ".xlsx"

End Sub


It's not working and I'm not sure why. Can anyone help me?

Thanks,
Greg

 

[tonyyy]

Just a quick glance...

Dim A As sting

Try String instead of sting...

Cheers,

tonyyy

 

[tonyyy]

Another approach to opening a file...

Sub openfile()
Dim FilePath As String
FilePath = Application.GetOpenFilename
Workbooks.Open Filename:=FilePath
End Sub

 

[bellg]

Sorry for the typo. That isn't my problem, however.

Thanks for the second option.

I'm still really looking for why my first code doesn't work. More specifically, this part:

Workbooks.Open Filename:= _
"D:\Users\" & A & "\Documents\" & B & ".xlsx"

I can type in the file name manually without the concatenation, but that's not what I want. I want the user to be prompted to type in something specific and use that in the filepath.

Thanks, Greg

 

[tonyyy]

Greg,

Your code works in my Excel 2010 / Windows 7 environment, albeit I used "C:\Users\" rather than "D:\Users\".

Are you getting an error message?