Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > Microsoft Office и VBA программирование > Microsoft Office Word
Регистрация

Восстановить пароль
Повторная активизация e-mail

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 25.09.2011, 20:51   #1
0creator0
Пользователь
 
Регистрация: 13.05.2010
Сообщений: 94
По умолчанию List box

Здравствуйте, подскажите, пожалуйста, возможно ли сделать, что б в List box после выбора нужной строки, она в последующем вызове user form оставалась выбранной, а не опять пустой в list box
Вложения
Тип файла: doc Возможно ли.doc (43.0 Кб, 16 просмотров)
0creator0 вне форума Ответить с цитированием
Старый 25.09.2011, 21:48   #2
Казанский
Старожил
 
Аватар для Казанский
 
Регистрация: 31.12.2010
Сообщений: 2,133
По умолчанию

Замените Unload Me на Me.Hide
exceleved@yandex.ru Яндекс.Деньги: 410011500007619
Казанский вне форума Ответить с цитированием
Старый 25.09.2011, 22:28   #3
0creator0
Пользователь
 
Регистрация: 13.05.2010
Сообщений: 94
По умолчанию

Большое спасибо
0creator0 вне форума Ответить с цитированием
Старый 25.09.2011, 23:27   #4
0creator0
Пользователь
 
Регистрация: 13.05.2010
Сообщений: 94
По умолчанию

Подскажите, пожалуйста, а можно как-нибудь через VBA написать количество,+ заданное число через Textbox.
0creator0 вне форума Ответить с цитированием
Старый 26.09.2011, 00:23   #5
Казанский
Старожил
 
Аватар для Казанский
 
Регистрация: 31.12.2010
Сообщений: 2,133
По умолчанию

Можно, но непонятно, что нужно
exceleved@yandex.ru Яндекс.Деньги: 410011500007619
Казанский вне форума Ответить с цитированием
Старый 26.09.2011, 08:47   #6
0creator0
Пользователь
 
Регистрация: 13.05.2010
Сообщений: 94
По умолчанию

А да ссори , написал как то коряво , у меня есть документ, и в нем какое-то определенное количество странниц , в поле DOCVARIABLE через text box, я вставляю какое-то число и вот к этой цифре как прибавить общее количество странниц (NUMPAGES).
0creator0 вне форума Ответить с цитированием
Старый 26.09.2011, 14:53   #7
0creator0
Пользователь
 
Регистрация: 13.05.2010
Сообщений: 94
По умолчанию

Напишите пожалуйста как должна выглядеть запись с (NUMPAGES),
А то когда я пишу NUMPAGES+3 появляется только 3 без числа странниц
0creator0 вне форума Ответить с цитированием
Старый 26.09.2011, 15:52   #8
Казанский
Старожил
 
Аватар для Казанский
 
Регистрация: 31.12.2010
Сообщений: 2,133
По умолчанию

Если отталкиваться от примера выше:
Код:
With ActiveDocument
    .Variables("два").Value = ComboBox1.Text + .BuiltInDocumentProperties("number of pages")
    .Fields.Update
End With
Только в комбобоксе должны быть числа.
exceleved@yandex.ru Яндекс.Деньги: 410011500007619
Казанский вне форума Ответить с цитированием
Старый 26.09.2011, 21:29   #9
0creator0
Пользователь
 
Регистрация: 13.05.2010
Сообщений: 94
По умолчанию

Казанский спасибо, извини, что мучаю, но не могли бы вы еще подсказать с таким вопросом .
Me.Hide она хороша только когда ты макрос запускаешь при работе с документом без закрытия , а как только его закрываешь все настройки сбрасываются , но при List box это ещё пол беды, а вот при Text Box если не заполнена строка то остальные сбрасываются , но я так понимаю здесь проблема одна и та же что в той и другой ситуации , надо что б на данные записанные в Text Box он сам же при запуске макроса ссылался подскажите пожалуйста, или я вообще к этому вопросу подхожу не с той стороны??
Вложения
Тип файла: doc Казанский спасибо.doc (50.5 Кб, 13 просмотров)
0creator0 вне форума Ответить с цитированием
Старый 27.09.2011, 09:04   #10
0creator0
Пользователь
 
Регистрация: 13.05.2010
Сообщений: 94
По умолчанию

Цитата:
Private Sub TextBox2_Change()
With ActiveDocument
.Variables("Номер_документа").Value = TextBox2.Text
.Fields.Update
End With
End Sub
Решил разделить объявления и попробовать вставить Me.Hide но не помог, подскажите, пожалуйста, как сделать что бы после открытие, закрытия документа запись в text box оставалась
0creator0 вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Помощь с List Box Delphi Antyan-screammer Помощь студентам 7 16.06.2010 00:00
Поле списка (List Box) asas2010 Microsoft Office Excel 4 01.04.2010 15:24
List box help Ghennadiy Win Api 3 16.09.2009 22:33
DynamicSkinForm - загрузка списка скинов в list Box при запуске программы dani92 Компоненты Delphi 3 20.08.2009 19:22
E-Mail форма+List Box Nemesisking PHP 8 05.04.2008 12:59