Гость
Войти | Профиль | Очистить
Целевая тема:
Создать новую тему:
Автор:
Действия ...
Форумы / Microsoft Office [игнор отключен] [закрыт для гостей] / Прочитать значение комбобокса в ворде / 22 сообщений из 22, страница 1 из 1
22.10.2009, 21:31
    #36267929
mds_world
mds_world
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Прочитать значение комбобокса в ворде
Пытаюсь так
Код: plaintext
1.
2.
3.
4.
5.
6.
7.
    Dim i
    On Error Resume Next
    For i =  0  To Application.ActiveDocument.InlineShapes.Count -  1 
        With Application.ActiveDocument.InlineShapes.Item(i).OLEFormat.Object
            Debug.Print .Name
            Debug.Print .Value
        End With
    Next
Не получается. Текстовые поля считываются. А комбо, списки, переключатели, флажки - нет.

Подскажите, кто знает.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
23.10.2009, 10:04
    #36268154
Рремешок
Рремешок
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Прочитать значение комбобокса в ворде
ошибку выдаёт или пустые значения выводит?

возможно, необходимо определить промежуточные объекты при помощи Set.
была похожая ситуация со считыванием значений tabledef-ов,
примерно так когда строка currentdb.tabledefs('trampampam').properties('trampampam').value не определялась, а set tdf= currentdb.tabledefs('trampampam'): tdf.properties... работало на ура
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
23.10.2009, 10:18
    #36268194
mds_world
mds_world
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Прочитать значение комбобокса в ворде
Выдает ошибку: Объект не поддерживает свойство или метод

Насчет Set. Да, конечно, я пытался и так
Код: plaintext
1.
Set f = Application.ActiveDocument.InlineShapes.Item(i).OLEFormat.Object
Debug.Print f.Value
Ошибка

Тип контрола
Код: plaintext
1.
2.
3.
?typename(Application.ActiveDocument.InlineShapes.Item(i).OLEFormat.Object)
HTMLSelect
?Application.ActiveDocument.InlineShapes.Item(i).OLEFormat.classtype
Forms.HTML:Select. 1
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
23.10.2009, 10:26
    #36268223
Рремешок
Рремешок
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Прочитать значение комбобокса в ворде
mds_world,

ворда под рукой нет сейчас, попробуйте сетами выделить основные объекты.

set doc=Application.ActiveDocument
set shape1=doc.InlineShapes.Item(i)

и на тестовом примере докопаться до определённого шэйпового комбобокса . через фиксированный номер шэйпы.

был же ведь в VBA какой-то риалтайм пропертис вьювер. сделайте останов на следующей строке после set shape1.. и посмотрите какие свойства видны.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
23.10.2009, 10:30
    #36268235
Рремешок
Рремешок
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Прочитать значение комбобокса в ворде
ps и фиксированный номер айтема :)
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
23.10.2009, 10:48
    #36268295
mds_world
mds_world
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Прочитать значение комбобокса в ворде
Рремешок,
пытался и так. Пока не получилось
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
23.10.2009, 10:51
    #36268323
Рремешок
Рремешок
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Прочитать значение комбобокса в ворде
mds_worldРремешок,
пытался и так. Пока не получилосьугу.

а проперти вьювер свойства комбобокса видит в риалтайме?
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
23.10.2009, 10:54
    #36268336
mds_world
mds_world
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Прочитать значение комбобокса в ворде
Рремешока проперти вьювер свойства комбобокса видит в риалтайме?
Не видит. Пусто в окне Properties
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
23.10.2009, 11:02
    #36268371
Рремешок
Рремешок
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Прочитать значение комбобокса в ворде
mds_worldРремешока проперти вьювер свойства комбобокса видит в риалтайме?
Не видит. Пусто в окне Propertiesmds_world,

я про риалтаймовый который в коде по останову работает. там ещё можно взять аппликэйшн привязать к переменной и просмотреть все свойства и объекты до упора какие есть :)

не помню как называется. вот в нём посмотрите.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
23.10.2009, 11:29
    #36268502
mds_world
mds_world
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Прочитать значение комбобокса в ворде
Рремешок,
не совсем понимаю, о чем вы говорите.
Может быть, подробней как-то.

Разумеется, делал остановы и пытался пробовать любые свойства из предлагаемого набора. Не получается. Не знаю какой набор свойств должен показать желаемое
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
23.10.2009, 12:37
    #36268805
mds_world
mds_world
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Прочитать значение комбобокса в ворде
Если кто-то пожелает помочь, то прикладываю пример
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
23.10.2009, 13:07
    #36268936
MaximuS_G
MaximuS_G
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Прочитать значение комбобокса в ворде
Я бы с радостью Вам помог, к сожалению, не знаю как...
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
23.10.2009, 14:33
    #36269179
Ошибка
Ошибка
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Прочитать значение комбобокса в ворде
Can't exit design mode because Control 'DefaultOcxName' can not be created.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
23.10.2009, 21:27
    #36270042
Рремешок
Рремешок
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Прочитать значение комбобокса в ворде
в общем добрался до ворда.. не пойму в чём у вас проблема.


создал файлик с комбобоксом.

такой код вполне себе работает..

Код: plaintext
1.
2.
3.
4.
Sub controlsThisDocument1()    
    MsgBox ComboBox1.Value
    ComboBox1.Value = "-------------"
End Sub
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
23.10.2009, 21:39
    #36270053
mds_world
mds_world
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Прочитать значение комбобокса в ворде
Рремешок,
а в моем файле не пробовали?
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
23.10.2009, 21:41
    #36270055
Рремешок
Рремешок
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Прочитать значение комбобокса в ворде
mds_worldа в моем файле не пробовали?в вашем ошибка с ocx при выходе из режима дизайна. вот в точности как выше написано такая же.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
23.10.2009, 21:47
    #36270062
mds_world
mds_world
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Прочитать значение комбобокса в ворде
Вот именно. Блин! Проблема на пустом месте. Всегда работало, а сейчас, как раз когда клиент торопит, полный тормоз. И причину-то не пойму. Не улавливаю
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
23.10.2009, 21:48
    #36270066
Рремешок
Рремешок
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Прочитать значение комбобокса в ворде
походу у вас слетел ocx :)

попробуйте пересоздать шаблон
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
23.10.2009, 22:20
    #36270087
mds_world
mds_world
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Прочитать значение комбобокса в ворде
Рремешок,
если и слетел, то не у меня. Я получил это по почте. Удаленка. Заставлять клиента что-то переустанавливать? Не уверен, что правильно поймет.

Но ведь, что интересно - все контролы работают!
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
24.10.2009, 10:18
    #36270267
Рремешок
Рремешок
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Прочитать значение комбобокса в ворде
Значит у вас комбобоксы неправильной версии :)

потому как на чистой машине с офисом 2003 от контролов остались только картинки .
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
24.10.2009, 13:52
    #36270418
mds_world
mds_world
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Прочитать значение комбобокса в ворде
РремешокЗначит у вас комбобоксы неправильной версии :) .


Рремешокпотому как на чистой машине с офисом 2003 от контролов остались только картинки . Сегодня ночью, из-за вируса пришлось винду переустанавливать. Соответственно, снова офис 2003. На формуляре все контролы работают, видны не только картинки. Чудеса!
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
24.10.2009, 14:29
    #36270444
Рремешок
Рремешок
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Прочитать значение комбобокса в ворде
вот сичас винду на второй комп поставлю xpsp2 и office2003 - ещё разок проверю :)
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
Форумы / Microsoft Office [игнор отключен] [закрыт для гостей] / Прочитать значение комбобокса в ворде / 22 сообщений из 22, страница 1 из 1
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
Польз. соглашение  
Полит. конфиден.  
созд. / загр.: 516ms
Закрыть
start [/forum/topic.php?fid=61&mobile=1&tid=2178931]:
 0ms
get settings:
 11ms
get forum list:
 14ms
check forum access:
 3ms
check topic access:
 3ms
track hit:
 182ms
get topic data:
 9ms
get forum data:
 2ms
get page messages:
 56ms
get tp. blocked users:
 1ms
others: 235ms
total:  516ms
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]