Отправляющая (Экспортирующая строна)
- Код: Выделить всё
Sub Export()
Dim objXL As New Excel.Application
Dim objWorkBook As Workbook
Set objXL = CreateObject ("Excel.Application")
Set objWorkBook = objXL.Open ("Путь к форме")
'Вызываем из формы ф-цию ExportData и передаем в качастве параметра одномерный массив
'парных значений: 1 - номер ячейки (виден на форме) и 2 - соответствующее значение которое туда нужно записать
objXL.Run "ExportData", Array("103", "Наименование")
End Sub
Соответственно после выполнения приведенного кода в ячейке с номером 103, должена появиться надпись Наименование.
Теперь собственно сам вопрос:
С моей колокольни такой механизм кажеться простым и удобным для конечного пользователя (программиста который должен будет экспортировать данные), но пользователь может думать и иначе. Вас как посторонних наблюдателей прошу оценить (удобно или нет), достигнута ли цель, сделать критические замечания, ну и поделиться своими идеями.