How to get the current directory of the workbook by VBA script?

I have opened two workbooks. One sheet have to be moved to another. For that I have used the below code

Please Login or Register  to view this content.

"Production-16.xls" is the target filename, which will be changed every time.
I have get the "directory" & "file name" separately, then concate the strings, and open the file (by script).

Please Login or Register  to view this content.

I want to simplify it more...
Is it possible to do the following (by VBA script):
A browse window to be opened to select the file (or) current directory of the opened file to be get by script.

PLEASE HELP!!!

Hi,
Please note the syntax for code tags is not like HTML - it's [code]Please [url=https://www.excelforum.com/login.php]Login or Register [/url] to view this content.[/code] (I've corrected it for you this time)

You should look at

Please Login or Register  to view this content.

in the Help.