For Each ctl In forma1.Controls
If ctl.ControlType = acComboBox Then
s = ctl.Name
.Bookmarks.Item(s).Range.Text = forma1(s).ItemData(forma1.ListIndex)
Err.Clear
End If
Next ctl
Комбобоксы(с запросами)
Выполняется код
этот отрывок выводит в Word выбранные значения из acComboBox, но в случае когда источником строк
является SQL запрос, то выводится не текущее значение, а его порядковый номер из списка.
Помогите, пожалуйста, сделать так, чтобы выводилось значение, а не его номер.
Заранее благодарю!
Код:
этот отрывок выводит в Word выбранные значения из acComboBox, но в случае когда источником строк
является SQL запрос, то выводится не текущее значение, а его порядковый номер из списка.
Помогите, пожалуйста, сделать так, чтобы выводилось значение, а не его номер.
Заранее благодарю!