Я настраиваю файл Excel, который автоматически заполняется через скрипт VBA на основе значений, введенных в различные поля в документе MS Word.Некоторые из этих полей (те, которые вызывают ошибки) являются выпадающими меню.Я вручную обновляю эти выпадающие меню, чтобы включить в них новые, отличные от того, когда изначально был написан VBA-скрипт.Когда файл Excel заполнен, запросы в отредактированных раскрывающихся полях возвращают FORMDROPDOWN [], а не фактическое выбранное значение.
Я уже пробовал различные синтаксические фразы в запросе, чтобы попытаться вызвать распознавание,Возможно, ошибка связана с обновлением версии MS Word, поскольку исходный документ очень старый.
Dim bmark As Bookmark
Dim wrdDoc As Word.Document
Dim rname As Name
Dim wdField As Word.FormField
With wrdDoc
For Each bmark In .Bookmarks
For Each rname In ActiveWorkbook.Names
If rname.Name = bmark.Name Then
theValue = ""
Set wdField = bmark.Range.FormFields(1)
If wdField.Type = wdFieldFormDropDown Then
'This appears to be the problem row
theValue = wrdDoc.FormFields(bmark).Result
End If
Next rname
Next bmark
End With
Я ожидаю, что на выходе будет что-то вроде "> 80%", но на выходе будет "FORMDROPDOWN "