Pfad über Dialog eingeben

ich möchte in meine Textbox den Pfad, den ich per Dialog ausgewählt habe einlesen. Wie schaff ich das? Mit application.dialogs(xldialogopen).show "c:\" kann ich nur eine Datei öffnen. Ich will aber zum Bsp. nach c:\excel mit dem Dialog navigieren und einfach nur c:\excel in meiner textbox stehen haben damit das nachfolgende makro mit diesem Pfad arbeiten kann.
Vielen Dank