Страница 1 из 1
Переменная в качестве константы
Добавлено: 22 янв 2010, 08:11
Busine2009
Есть код (сокращенный вариант):
[HTML]With Selection.ParagraphFormat
.OutlineLevel = wdOutlineLevel1
End With[/HTML]
У меня есть переменная x, я в неё помещаю текст wdOutlineLevel1.
И мой код имеет вид
[HTML]With Selection.ParagraphFormat
.OutlineLevel = x
End With[/HTML]
Но выдаётся ошибка.
Это нужно мне для того, чтобы с помощью combobox, выбирать нужный параметр.
Значение combobox я помещаю в переменную x.
Re: Переменная в качестве константы
Добавлено: 22 янв 2010, 11:53
RomaS
может я не совсем понял, но почему не используете свойство ListIndex комбобокса?
Re: Переменная в качестве константы
Добавлено: 23 янв 2010, 07:04
Busine2009
RomaS
нет такого свойства у комбобокса.
Ну а вообще возможно такое, чтобы в качестве константы использовать переменную?
Re: Переменная в качестве константы
Добавлено: 23 янв 2010, 07:55
AlexEL
Busine2009 писал(а):
У меня есть переменная x, я в неё помещаю текст wdOutlineLevel1.
...
Но выдаётся ошибка.
Надо в x помещать не текст "wdOutlineLevel1", а писать так:
Код: Выделить всё
Dim x As Word.WdOutlineLevel
x = wdOutlineLevel1
Re: Переменная в качестве константы
Добавлено: 23 янв 2010, 10:03
Busine2009
AlexEL
да работает. А как ты узнал про это? Если бы не форум, то я бы никогда наверное не узнал этого бы.
Re: Переменная в качестве константы
Добавлено: 23 янв 2010, 10:29
AlexEL
Busine2009 писал(а): AlexEL
да работает. А как ты узнал про это? Если бы не форум, то я бы никогда наверное не узнал этого бы.
Есть такая "секретная" штука - Help называется

В редакторе VisualBasic помещаешь курсор в текст "OutlineLevel" и жмешь F1...
Еще полезная штука ObjectBrowser - жмем F2 в редакторе VisualBasic, а дальше поиском...
Re: Переменная в качестве константы
Добавлено: 23 янв 2010, 11:37
Busine2009