Домашняя страница Undo Do New Save Карта сайта Обратная связь Поиск по форуму
МИР MS EXCEL - Гость.xls

Вход

Регистрация

Напомнить пароль

 

= Мир MS Excel/очистка всех комбоксов и листбоксов при запуске юзерформ - Мир MS Excel

Старая форма входа
  • Страница 1 из 1
  • 1
Модератор форума: китин, _Boroda_, DrMini  
Мир MS Excel » Вопросы и решения » Вопросы по VBA » очистка всех комбоксов и листбоксов при запуске юзерформ (Макросы/Sub)
очистка всех комбоксов и листбоксов при запуске юзерформ
ovechkin1973 Дата: Среда, 15.11.2017, 19:42 | Сообщение № 1
Группа: Проверенные
Ранг: Обитатель
Сообщений: 429
Репутация: 1 ±
Замечаний: 0% ±

Excel 2010
Есть файл с юзерформой, на которой несколько комбоксов и листбоксов. Юзерформа запускается с листа кодом
[vba]
Код
Private Sub btnStart1_Click()
    zapolnenie_blanka.Show vbModeless
End Sub
[/vba]
Как сделать, чтобы при запуске все комбоксы и литсбоксы очищались?

Плохо когда не знаешь, да еще забудешь. Правильно сформулированный вопрос содержит половину ответа.

Сообщение отредактировал ovechkin1973 - Среда, 15.11.2017, 19:43
 
Ответить
СообщениеЕсть файл с юзерформой, на которой несколько комбоксов и листбоксов. Юзерформа запускается с листа кодом
[vba]
Код
Private Sub btnStart1_Click()
    zapolnenie_blanka.Show vbModeless
End Sub
[/vba]
Как сделать, чтобы при запуске все комбоксы и литсбоксы очищались?
Автор - ovechkin1973
Дата добавления - 15.11.2017 в 19:42
buchlotnik Дата: Среда, 15.11.2017, 19:47 | Сообщение № 2
Группа: Заблокированные
Ранг: Участник клуба
Сообщений: 3442
Репутация: 929 ±
Замечаний: 20% ±

2010, 2013, 2016 RUS / ENG
И вам здрасьте. А зачем они заполнены, если надо чистить - что мешает изначально пустую запускать?


Сообщение отредактировал buchlotnik - Среда, 15.11.2017, 19:48
 
Ответить
СообщениеИ вам здрасьте. А зачем они заполнены, если надо чистить - что мешает изначально пустую запускать?
Автор - buchlotnik
Дата добавления - 15.11.2017 в 19:47
ovechkin1973 Дата: Среда, 15.11.2017, 19:52 | Сообщение № 3
Группа: Проверенные
Ранг: Обитатель
Сообщений: 429
Репутация: 1 ±
Замечаний: 0% ±

Excel 2010
пример "весит" много, чтобы выложить.. Почему то в одном комбоксе у меня при запуске информация остается с момента прошлой работы в файлом.

Плохо когда не знаешь, да еще забудешь. Правильно сформулированный вопрос содержит половину ответа.
 
Ответить
Сообщениепример "весит" много, чтобы выложить.. Почему то в одном комбоксе у меня при запуске информация остается с момента прошлой работы в файлом.
Автор - ovechkin1973
Дата добавления - 15.11.2017 в 19:52
RAN Дата: Среда, 15.11.2017, 19:58 | Сообщение № 4
Группа: Друзья
Ранг: Экселист
Сообщений: 5660
Репутация: 1163 ±
Замечаний: 0% ±

2010
Цитата ovechkin1973, 15.11.2017 в 19:52, в сообщении № 3 ()
остается

Она не остается. Это вы зачем-то ее туда при запуске формы заносите.

Быть или не быть, вот в чем загвоздка!
 
Ответить
Сообщение
Цитата ovechkin1973, 15.11.2017 в 19:52, в сообщении № 3 ()
остается

Она не остается. Это вы зачем-то ее туда при запуске формы заносите.
Автор - RAN
Дата добавления - 15.11.2017 в 19:58
ovechkin1973 Дата: Среда, 15.11.2017, 20:03 | Сообщение № 5
Группа: Проверенные
Ранг: Обитатель
Сообщений: 429
Репутация: 1 ±
Замечаний: 0% ±

Excel 2010
Цитата RAN, 15.11.2017 в 19:58, в сообщении № 4 ()
Это вы зачем-то ее туда при запуске формы заносите.

Возможно.. буду искать в коде.. или искать человека, который в коде найдет ошибку..
Спасибо!

Плохо когда не знаешь, да еще забудешь. Правильно сформулированный вопрос содержит половину ответа.
 
Ответить
Сообщение
Цитата RAN, 15.11.2017 в 19:58, в сообщении № 4 ()
Это вы зачем-то ее туда при запуске формы заносите.

Возможно.. буду искать в коде.. или искать человека, который в коде найдет ошибку..
Спасибо!
Автор - ovechkin1973
Дата добавления - 15.11.2017 в 20:03
RAN Дата: Среда, 15.11.2017, 20:09 | Сообщение № 6
Группа: Друзья
Ранг: Экселист
Сообщений: 5660
Репутация: 1163 ±
Замечаний: 0% ±

2010
Цитата ovechkin1973, 15.11.2017 в 19:52, в сообщении № 3 ()
пример "весит" много

Это не пример.
Файл с формой, содержащей ~300 контролов (с кодом к ним) весит 50Kb. %)

Быть или не быть, вот в чем загвоздка!
 
Ответить
Сообщение
Цитата ovechkin1973, 15.11.2017 в 19:52, в сообщении № 3 ()
пример "весит" много

Это не пример.
Файл с формой, содержащей ~300 контролов (с кодом к ним) весит 50Kb. %)
Автор - RAN
Дата добавления - 15.11.2017 в 20:09
nilem Дата: Среда, 15.11.2017, 20:09 | Сообщение № 7
Группа: Авторы
Ранг: Старожил
Сообщений: 1613
Репутация: 563 ±
Замечаний: 0% ±

Excel 2013, 2016
Цитата ovechkin1973, 15.11.2017 в 19:52, в сообщении № 3 ()
в одном комбоксе у меня при запуске информация остается

посмотрите в свойствах RowSource для этого комбобокса

Яндекс.Деньги 4100159601573
 
Ответить
Сообщение
Цитата ovechkin1973, 15.11.2017 в 19:52, в сообщении № 3 ()
в одном комбоксе у меня при запуске информация остается

посмотрите в свойствах RowSource для этого комбобокса
Автор - nilem
Дата добавления - 15.11.2017 в 20:09
RAN Дата: Среда, 15.11.2017, 20:13 | Сообщение № 8
Группа: Друзья
Ранг: Экселист
Сообщений: 5660
Репутация: 1163 ±
Замечаний: 0% ±

2010
Только не
Цитата nilem, 15.11.2017 в 20:09, в сообщении № 7 ()
RowSource

а
[vba]
Код
ControlSource
[/vba]

Быть или не быть, вот в чем загвоздка!
 
Ответить
СообщениеТолько не
Цитата nilem, 15.11.2017 в 20:09, в сообщении № 7 ()
RowSource

а
[vba]
Код
ControlSource
[/vba]
Автор - RAN
Дата добавления - 15.11.2017 в 20:13
ovechkin1973 Дата: Среда, 15.11.2017, 20:13 | Сообщение № 9
Группа: Проверенные
Ранг: Обитатель
Сообщений: 429
Репутация: 1 ±
Замечаний: 0% ±

Excel 2010
Цитата RAN, 15.11.2017 в 20:09, в сообщении № 6 ()
Файл с формой, содержащей ~300 контролов (с кодом к ним) весит 50Kb.

не спорю с профи.. но даже не знаю, как свой файл "урезать", чтобы осталась проблема и он "весил" приемлимо.

Плохо когда не знаешь, да еще забудешь. Правильно сформулированный вопрос содержит половину ответа.
 
Ответить
Сообщение
Цитата RAN, 15.11.2017 в 20:09, в сообщении № 6 ()
Файл с формой, содержащей ~300 контролов (с кодом к ним) весит 50Kb.

не спорю с профи.. но даже не знаю, как свой файл "урезать", чтобы осталась проблема и он "весил" приемлимо.
Автор - ovechkin1973
Дата добавления - 15.11.2017 в 20:13
RAN Дата: Среда, 15.11.2017, 20:13 | Сообщение № 10
Группа: Друзья
Ранг: Экселист
Сообщений: 5660
Репутация: 1163 ±
Замечаний: 0% ±

2010
Взятьмышем форму, и перетянуть в новый файл

Быть или не быть, вот в чем загвоздка!
 
Ответить
СообщениеВзятьмышем форму, и перетянуть в новый файл
Автор - RAN
Дата добавления - 15.11.2017 в 20:13
ovechkin1973 Дата: Среда, 15.11.2017, 20:17 | Сообщение № 11
Группа: Проверенные
Ранг: Обитатель
Сообщений: 429
Репутация: 1 ±
Замечаний: 0% ±

Excel 2010
Цитата RAN, 15.11.2017 в 20:13, в сообщении № 8 ()
ControlSource

Проверил. Вы правы.. у меня данные из этого комбокса "уходят" на определенную ячейку листа.. видимо когда форму запускаю от туда старое значение берется.. Даже и не знаю, можно ли в этой теме вопросы дальше задавать или новую создавать?

Плохо когда не знаешь, да еще забудешь. Правильно сформулированный вопрос содержит половину ответа.
 
Ответить
Сообщение
Цитата RAN, 15.11.2017 в 20:13, в сообщении № 8 ()
ControlSource

Проверил. Вы правы.. у меня данные из этого комбокса "уходят" на определенную ячейку листа.. видимо когда форму запускаю от туда старое значение берется.. Даже и не знаю, можно ли в этой теме вопросы дальше задавать или новую создавать?
Автор - ovechkin1973
Дата добавления - 15.11.2017 в 20:17
RAN Дата: Среда, 15.11.2017, 20:23 | Сообщение № 12
Группа: Друзья
Ранг: Экселист
Сообщений: 5660
Репутация: 1163 ±
Замечаний: 0% ±

2010
При связи через ControlSource возникают вопросы
Файл точно работает правильно?
Если да, то зачем комбо чистить?

Быть или не быть, вот в чем загвоздка!
 
Ответить
СообщениеПри связи через ControlSource возникают вопросы
Файл точно работает правильно?
Если да, то зачем комбо чистить?
Автор - RAN
Дата добавления - 15.11.2017 в 20:23
nilem Дата: Среда, 15.11.2017, 20:24 | Сообщение № 13
Группа: Авторы
Ранг: Старожил
Сообщений: 1613
Репутация: 563 ±
Замечаний: 0% ±

Excel 2013, 2016
все-таки RowSource надо смотреть )
т.е. откуда данные приходят в комбо. А не куда уходят.

Яндекс.Деньги 4100159601573
 
Ответить
Сообщениевсе-таки RowSource надо смотреть )
т.е. откуда данные приходят в комбо. А не куда уходят.
Автор - nilem
Дата добавления - 15.11.2017 в 20:24
ovechkin1973 Дата: Среда, 15.11.2017, 20:25 | Сообщение № 14
Группа: Проверенные
Ранг: Обитатель
Сообщений: 429
Репутация: 1 ±
Замечаний: 0% ±

Excel 2010
как очищать эту ячейку, когда закрываю юзерформу нажатием на специальную кнопку нашел
Private Sub btnClose1_Click()
Unload zapolnenie_blanka
Sheets("Áðèãàäà").Range("N3").Value = ""
End Sub
Но если форму закрывать нажатием на "крестик" в правом верхнем углу - то данные остаются

Плохо когда не знаешь, да еще забудешь. Правильно сформулированный вопрос содержит половину ответа.
 
Ответить
Сообщениекак очищать эту ячейку, когда закрываю юзерформу нажатием на специальную кнопку нашел
Private Sub btnClose1_Click()
Unload zapolnenie_blanka
Sheets("Áðèãàäà").Range("N3").Value = ""
End Sub
Но если форму закрывать нажатием на "крестик" в правом верхнем углу - то данные остаются
Автор - ovechkin1973
Дата добавления - 15.11.2017 в 20:25
ovechkin1973 Дата: Среда, 15.11.2017, 20:26 | Сообщение № 15
Группа: Проверенные
Ранг: Обитатель
Сообщений: 429
Репутация: 1 ±
Замечаний: 0% ±

Excel 2010
Цитата nilem, 15.11.2017 в 20:24, в сообщении № 13 ()
все-таки RowSource надо смотреть )

у меня в RowSource ничего нет для данного комбокса..

Плохо когда не знаешь, да еще забудешь. Правильно сформулированный вопрос содержит половину ответа.
 
Ответить
Сообщение
Цитата nilem, 15.11.2017 в 20:24, в сообщении № 13 ()
все-таки RowSource надо смотреть )

у меня в RowSource ничего нет для данного комбокса..
Автор - ovechkin1973
Дата добавления - 15.11.2017 в 20:26
RAN Дата: Среда, 15.11.2017, 20:27 | Сообщение № 16
Группа: Друзья
Ранг: Экселист
Сообщений: 5660
Репутация: 1163 ±
Замечаний: 0% ±

2010
По RowSource заполняется лист комбо.
По ControlSource идет связь с ячейкой.
При наличии RowSource при активации заполнится список комбо, а не комбо.
Вот в листбоксе, дело другое.

Быть или не быть, вот в чем загвоздка!
 
Ответить
СообщениеПо RowSource заполняется лист комбо.
По ControlSource идет связь с ячейкой.
При наличии RowSource при активации заполнится список комбо, а не комбо.
Вот в листбоксе, дело другое.
Автор - RAN
Дата добавления - 15.11.2017 в 20:27
nilem Дата: Среда, 15.11.2017, 20:28 | Сообщение № 17
Группа: Авторы
Ранг: Старожил
Сообщений: 1613
Репутация: 563 ±
Замечаний: 0% ±

Excel 2013, 2016
[vba]
Код
Private Sub UserForm_Terminate()
MsgBox "вы нажали на крестик"
End Sub
[/vba]

"в одном комбоксе у меня при запуске информация остается"
я понял это как RowSource.

Яндекс.Деньги 4100159601573

Сообщение отредактировал nilem - Среда, 15.11.2017, 20:30
 
Ответить
Сообщение[vba]
Код
Private Sub UserForm_Terminate()
MsgBox "вы нажали на крестик"
End Sub
[/vba]

"в одном комбоксе у меня при запуске информация остается"
я понял это как RowSource.
Автор - nilem
Дата добавления - 15.11.2017 в 20:28
ovechkin1973 Дата: Среда, 15.11.2017, 20:33 | Сообщение № 18
Группа: Проверенные
Ранг: Обитатель
Сообщений: 429
Репутация: 1 ±
Замечаний: 0% ±

Excel 2010
Цитата nilem, 15.11.2017 в 20:28, в сообщении № 17 ()
MsgBox "вы нажали на крестик"

nilem, Спасибо! Это код "прикрутил" и после закрытия формы любым способом форма потом запускается чистая (нужный комбокс в ней)

Плохо когда не знаешь, да еще забудешь. Правильно сформулированный вопрос содержит половину ответа.
 
Ответить
Сообщение
Цитата nilem, 15.11.2017 в 20:28, в сообщении № 17 ()
MsgBox "вы нажали на крестик"

nilem, Спасибо! Это код "прикрутил" и после закрытия формы любым способом форма потом запускается чистая (нужный комбокс в ней)
Автор - ovechkin1973
Дата добавления - 15.11.2017 в 20:33
_Boroda_ Дата: Среда, 15.11.2017, 21:45 | Сообщение № 19
Группа: Админы
Ранг: Местный житель
Сообщений: 17006
Репутация: 6667 ±
Замечаний: ±

2003; 2007; 2010; 2013 RUS
ovechkin1973, - Оформите код макроса тегами (в режиме правки поста выделите код и нажмите кнопку #, пояснялка здесь)

Скажи мне, кудесник, любимец ба’гов...
Платная помощь:
Boroda_Excel@mail.ru
Яндекс-деньги: 41001632713405 | Webmoney: R289877159277; Z102172301748; E177867141995
 
Ответить
Сообщениеovechkin1973, - Оформите код макроса тегами (в режиме правки поста выделите код и нажмите кнопку #, пояснялка здесь)
Автор - _Boroda_
Дата добавления - 15.11.2017 в 21:45
Мир MS Excel » Вопросы и решения » Вопросы по VBA » очистка всех комбоксов и листбоксов при запуске юзерформ (Макросы/Sub)
  • Страница 1 из 1
  • 1
Поиск:

Яндекс.Метрика Яндекс цитирования
© 2010-2026 · Дизайн: MichaelCH · Хостинг от uCoz · При использовании материалов сайта, ссылка на www.excelworld.ru обязательна!