открытие файла с определенной папки

Здравствуйте !

PDim dlgOpenFile As Object ' FileDialog
Set dlgOpenFile = Application.FileDialog(1)
With dlgOpenFile
.Filters.Clear
.InitialFileName = CurrentProject.Path
.AllowMultiSelect = False
.Title = "Выбор файла"
If (.Show = -1) And (.SelectedItems.Count > 0) Then
Ц1Тес.Value = .SelectedItems(1)
End If
End With
Set dlgOpenFile = Nothing
Не подскажите как от суда словить полный путь к файлу , чтобы потом его сохранить в таблице, как гиперссылка?
Да забыл сказать что у нас есть поля папка,где лежит путь к папке, нужно чтобы он открывал с нее

Тема Закрыта проблему уже решил

Эдвард_noob,

выложи решение

terkin_vv
Эдвард_noob, выложи решение

Таких решений здесь вагон и состав к нему. Ищите по FileDialog.