File Open Dialog

Hello, I would like to do a macro which will open another excel file through Open Dialog, so I use

filetoopen = Application.GetOpenFilename("Excel Files (*.xls), *.xls")

.
It's ok, but I want to open this "Open Dialog" in a location where my ActiveWorkbook is saved. How can I do this?

I tried something like this ...

filetoopen = Application.GetOpenFilename(ThisWorkbook.Path & "Excel Files (*.xls), *.xls")

but this gives current workbook path into filetype box.

Can anyone help, please???

Thanks

Tomas