ник: АлексейAlex
Хочу сказать спасибо за код
Dim FName As String
Dim result As Integer
With Application.FileDialog(1)
.Title = "Поиск Файла"
.ButtonName = "Добавить"
.AllowMultiSelect = False
.Filters.Clear
.Filters.Add "*", "*.*", 1
result = .Show
' Закоментированный фрагмент не дает возможности выйти пока не загрузится файл
'******************************************************************************
'If result = 0 Then
'Do Until (result <> 0)
'MsgBox ("Необходимо внести файл в базу")
'result = .Show
'Loop
'End If
'*********************************************************************************
FName = Trim(.SelectedItems.Item(1))
End With
теперь клиент может выбирать нужную фото, НО как путь из переменной FName привязать к текущей записи?
с полями ввода все просто, указал в свойствах = данные нужную таблицу, и проблем нет, а как сделать это из VBA. Готового решения я не жду, но может, кто-то уже сталкивался с этим, например, при учете кадров.