Puoi ottenere il path così:
CommonDialog1.ShowSave
PathFile = CommonDialog1.FileName

Ovviamente se non selezioni niente PathFile=""!