ReSQL.ru
     
powered by simpleCommunicator - 2.0.61     © 2026 Programmizd 02
Мобильная версия    Контакт    Правила    FAQ    Помощь
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Доб. в избранное | Игнор. тему | Прикреп. тему | Пометить прочит. / непрочит. | Фильтр
Форумы / Microsoft Office [игнор отключен] [закрыт для гостей] / Определение данных формы и вывод их на печать.
23 сообщений из 48, страница 2 из 2
  2  все
Определение данных формы и вывод их на печать.
    #37394609
Ципихович Эндрю
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Ципихович Эндрю
Участник
уточнение, от 4х надо:
Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
14.
15.
16.
Private Sub UserForm_Initialize()

Dim Столбец As String
Столбец = "A"

Dim Последняя_заполненная_строка_в_столбце As Long
Последняя_заполненная_строка_в_столбце = Cells(Rows.Count, Столбец).End(xlUp).Row

Dim q As Long

For q =  4  To Последняя_заполненная_строка_в_столбце

Me.ComboBoxGrz.AddItem Trim$(Worksheets("base").Range("A" & q).Value)

Next q

End Sub
Окейно???
...
Рейтинг: 0 / 0
14.08.2011, 17:03
| Ответить | Цитировать | Написать  
Определение данных формы и вывод их на печать.
    #37394615
Ципихович Эндрю
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Ципихович Эндрю
Участник
а кстати, свойство RowSourse в Ворде существует???
...
Рейтинг: 0 / 0
14.08.2011, 17:08
| Ответить | Цитировать | Написать  
Определение данных формы и вывод их на печать.
    #37394618
G.
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
G.
Участник
BasileКод несложный, с комментариями, посмотри на досуге -- может пригодится
посмотрел бы, но наверное кто-то руку приложил , жалко.
Все равно спасибо.
Shocker.Pro сделал как Вы сказали, но теперь не знаю как удалить все повторяющиеся значения списка.
...
Рейтинг: 0 / 0
14.08.2011, 17:13
| Ответить | Цитировать | Написать  
Определение данных формы и вывод их на печать.
    #37394620
G.
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
G.
Участник
G., опа на, сколько пропустил
...
Рейтинг: 0 / 0
14.08.2011, 17:14
| Ответить | Цитировать | Написать  
Определение данных формы и вывод их на печать.
    #37394622
Ципихович Эндрю
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Ципихович Эндрю
Участник
BasileВ заключение, в прикреплённом файле я реализовал то, о чём говорил в начале (по поводу именованных областей и динамического обновления некоторых полей на форме). Код несложный, с комментариями, посмотри на досуге -- может пригодится.

Где это всё смотреть надо??
...
Рейтинг: 0 / 0
14.08.2011, 17:16
| Ответить | Цитировать | Написать  
Определение данных формы и вывод их на печать.
    #37394624
Фотография Shocker.Pro
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Shocker.Pro
Участник
G.Shocker.Pro сделал как Вы сказали, но теперь не знаю как удалить все повторяющиеся значения списка.

Стоп-стоп-стоп.
Ну надо же тогда сначала начинать, вы пытаетесь делать с конца, а надо было ставить вопрос - как получить неповторяющийся список, а потом уже - как загрузить его в комбобокс.
Я считал, что у вас УЖЕ ЕСТЬ список с неповторяющимися значениями, поэтому предложил цикл, иначе было бы проще как предложил Бэзил:
txtGrz.List = RNumber.Value
...
Рейтинг: 0 / 0
14.08.2011, 17:24
| Ответить | Цитировать | Написать  
Определение данных формы и вывод их на печать.
    #37394625
Basile
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Basile
Гость
Ципихович ЭндрюЧего там далее??
В смысле?
Я в своём сообщении предлагаю несколько иной подход. Предлагаю задать имена областям в таблице. Посмотри мой код в прикреплённом файле из прошлого сообщения...
...
Рейтинг: 0 / 0
14.08.2011, 17:25
| Ответить | Цитировать | Написать  
Определение данных формы и вывод их на печать.
    #37394626
Фотография Shocker.Pro
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Shocker.Pro
Участник
G.Требуется на форме, комбобокс txtGrz (с выпадающим списком) чтобы данные брались не из свойств RowSourse,
а программно из кода, наверное с применением массива.вот так изначально выглядел вопрос.
...
Рейтинг: 0 / 0
14.08.2011, 17:26
| Ответить | Цитировать | Написать  
Определение данных формы и вывод их на печать.
    #37394630
Basile
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Basile
Гость
G.посмотрел бы, но наверное кто-то руку приложил , жалко.
Все равно спасибо.

Не понял на счёт руки???
...
Рейтинг: 0 / 0
14.08.2011, 17:28
| Ответить | Цитировать | Написать  
Определение данных формы и вывод их на печать.
    #37394631
G.
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
G.
Участник
Shocker.Pro, Вы не поняли, я имел ввиду под неповторяющимися данными пустые, если ставлю диапазон с ячейки А4 по А например 3000.
А так в списке, который имеется, именно не равно нулю, нет повторяющихся данных
...
Рейтинг: 0 / 0
14.08.2011, 17:28
| Ответить | Цитировать | Написать  
Определение данных формы и вывод их на печать.
    #37394633
Ципихович Эндрю
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Ципихович Эндрю
Участник
Shocker.Pro, там с этим: txtGrz - засада, нет его
Этим: txtGrz.List = RNumber.Value как пользоваться????
...
Рейтинг: 0 / 0
14.08.2011, 17:29
| Ответить | Цитировать | Написать  
Определение данных формы и вывод их на печать.
    #37394634
G.
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
G.
Участник
BasileG.посмотрел бы, но наверное кто-то руку приложил , жалко.
Все равно спасибо.

Не понял на счёт руки???
так файла нет.
...
Рейтинг: 0 / 0
14.08.2011, 17:29
| Ответить | Цитировать | Написать  
Определение данных формы и вывод их на печать.
    #37394635
Basile
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Basile
Гость
G.так файла нет.
...и правда нет :)
Вот...
...
Рейтинг: 0 / 0
14.08.2011, 17:31
| Ответить | Цитировать | Написать  
Определение данных формы и вывод их на печать.
    #37394636
Ципихович Эндрю
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Ципихович Эндрю
Участник
G., с ячейки А4 по А например 3000.
А проверка на последнюю запись??
...
Рейтинг: 0 / 0
14.08.2011, 17:32
| Ответить | Цитировать | Написать  
Определение данных формы и вывод их на печать.
    #37394638
Basile
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Basile
Гость
Ципихович Эндрю,
извини, файл не приаттачил...
...
Рейтинг: 0 / 0
14.08.2011, 17:33
| Ответить | Цитировать | Написать  
Определение данных формы и вывод их на печать.
    #37394640
Ципихович Эндрю
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Ципихович Эндрю
Участник
Basile, вот и развязка
...
Рейтинг: 0 / 0
14.08.2011, 17:33
| Ответить | Цитировать | Написать  
Определение данных формы и вывод их на печать.
    #37394642
G.
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
G.
Участник
Спасибо всем, а Shocker.Pro спасибо за терпение.
Буду разбираться, хотя там столько пояснений, так сказать на блюдечке с голубой каемочкой.
...
Рейтинг: 0 / 0
14.08.2011, 17:37
| Ответить | Цитировать | Написать  
Определение данных формы и вывод их на печать.
    #37394646
Фотография Shocker.Pro
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Shocker.Pro
Участник
G.Shocker.Pro, Вы не поняли, я имел ввиду под неповторяющимися данными пустыена будущее тренируйтесь. Не надо под одним формальным определением ИМЕТЬ ВВИДУ другое формальное определение. Вас не поймут не только коллеги, но и компьютер - программирование требует четкости в мыслях и их изложении. Можно все было решить гораздо раньше (в чтом числе и через RowSource, который вы отвергли).

Считайте дружеским советом
...
Рейтинг: 0 / 0
14.08.2011, 17:40
| Ответить | Цитировать | Написать  
Определение данных формы и вывод их на печать.
    #37394652
Ципихович Эндрю
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Ципихович Эндрю
Участник
Basile, так у Вас же и пустые ячейки попадают в ЛистБокс
Как сделать, чтобы они мимо???
...
Рейтинг: 0 / 0
14.08.2011, 17:50
| Ответить | Цитировать | Написать  
Определение данных формы и вывод их на печать.
    #37394656
Basile
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Basile
Гость
Ципихович ЭндрюBasile, так у Вас же и пустые ячейки попадают в ЛистБокс
Как сделать, чтобы они мимо???
Почему попадают пустые? Пустые могут попасть, если в записи не указать номер автомобиля... Но, я так понимаю, госномер -- это обязательная запись в базе.
...
Рейтинг: 0 / 0
14.08.2011, 17:57
| Ответить | Цитировать | Написать  
Определение данных формы и вывод их на печать.
    #37394726
Ципихович Эндрю
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Ципихович Эндрю
Участник
Basile, неа, спецом гос. номер убираю, проверяю, в ЛистБоксе с пробелом попадает
...
Рейтинг: 0 / 0
14.08.2011, 19:43
| Ответить | Цитировать | Написать  
Определение данных формы и вывод их на печать.
    #37394837
Basile
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Basile
Гость
Ципихович ЭндрюBasile, неа, спецом гос. номер убираю, проверяю, в ЛистБоксе с пробелом попадает
Может мы друг друга не понимаем :) Но ещё раз повторюсь. На мой взгляд поле гос. номер в данной базе -- это типа уникального идентификатора. И если это поле пустое, то, на мой взгляд, запись теряет свой смысл. И, следовательно, в области "base!RNumber" пустых полей быть не должно. Конечно, можно предположить абсурдную ситуацию, когда это поле не заполнено и в ComboBox такие поля не показывать. А смысл такой записи, которую пользователь в форме просто не сможет выбрать?
...
Рейтинг: 0 / 0
14.08.2011, 22:33
| Ответить | Цитировать | Написать  
Определение данных формы и вывод их на печать.
    #37394856
Ципихович Эндрю
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Ципихович Эндрю
Участник
Basile, всё правильно Вы говорите, поясню, это вопрос не мой, значит я спрашиваю попутно обо всём до прихода сознания, тем более Эксель, в нём я слабоват, если это можно сделать, чтобы пустые не попадали, то есть коротко сделать, 1-2 строками кода а не циклом, тогда подскажите, поучусь

Знаю по себе сделать прогу это одно, а против идиотов кучу проверок это совсем другое
...
Рейтинг: 0 / 0
14.08.2011, 22:52
| Ответить | Цитировать | Написать  
23 сообщений из 48, страница 2 из 2
  2  все
Форумы / Microsoft Office [игнор отключен] [закрыт для гостей] / Определение данных формы и вывод их на печать.
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
Польз. соглашение   Полит. конфиден.  
NoSQL.ru       Кролег: Проекты, Новости, Чат       РЕД ФОРУМ       Фотоальбом: Участники, Встречи
Закрыть
start [/forum/topic.php?fid=61&startmsg=37394609&tid=2176590]:
 0ms
get settings:
 9ms
get forum list:
 14ms
check forum access:
 4ms
check topic access:
 4ms
track hit:
 45ms
get topic data:
 11ms
get forum data:
 3ms
get page messages:
 53ms
get tp. blocked users:
 1ms
others: 242ms
total:  386ms
созд. / загр.: 386ms
x
x
Закрыть


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