Macro para abrir cuadro dialogo exportar

Buenas tardes

Buscando en internet conseguí crear una macro que permite exportar desde excel un archivo XML en una ruta especifica y con un nombre determinado ActiveWorkbook.XmlMaps("Final").Export URL:="Z:\2014\XML\" & j, mi duda ahora es como puedo hacer que en lugar de que lo genere automáticamente, la macro abra el cuadro de dialogo para exportar el archivo y el usuario seleccione la ruta y el nombre.

De antemano agradezco la atención y ayuda.