[offtop]Не могу больше руками...[/offtop] [offtop]Начал сам, но чувствую - не то что-то делаю (в файле видно) [/offtop] Здравствуйте! Помогите пожалуйста сделать следующее, если можно, то с комментариями (планирую поразбираться): 1. В выпадающих списках "ВОД" и "ЗАК" должны быть видны фамилии из соответствующих колонок с возможностью выбора (по алфавиту и без повторов). 2. По кнопке "сортировка" вся страница должна перестраиваться таким образом, чтоб строчки с выбранной фамилией оказывались наверху, соответствующие ячейки выделялись цветом, упорядочивались по дате. 3. Если плюсом была бы возможность выбирать фамилию путем выделения ячейки - это был бы вообще праздник. :hands:
[p.s.]Заранее благодарен.[/p.s.] [moder]Для решения этой задачи нужны три разные темы. Читайте Правила форума п.4. Альтернатива - перенос темы в платный раздел РАБОТА/ФРИЛАНС[/moder]
[offtop]Не могу больше руками...[/offtop] [offtop]Начал сам, но чувствую - не то что-то делаю (в файле видно) [/offtop] Здравствуйте! Помогите пожалуйста сделать следующее, если можно, то с комментариями (планирую поразбираться): 1. В выпадающих списках "ВОД" и "ЗАК" должны быть видны фамилии из соответствующих колонок с возможностью выбора (по алфавиту и без повторов). 2. По кнопке "сортировка" вся страница должна перестраиваться таким образом, чтоб строчки с выбранной фамилией оказывались наверху, соответствующие ячейки выделялись цветом, упорядочивались по дате. 3. Если плюсом была бы возможность выбирать фамилию путем выделения ячейки - это был бы вообще праздник. :hands:
[p.s.]Заранее благодарен.[/p.s.] [moder]Для решения этой задачи нужны три разные темы. Читайте Правила форума п.4. Альтернатива - перенос темы в платный раздел РАБОТА/ФРИЛАНС[/moder]kirill-kibor
Ну насчёт сделать — Елена права, это надо на темы разбивать, а общий принцип описать могу. 0) Убейте всё лишнее в результатах деятельности макрорекордера и опишите диапазоны в общем виде, примерно так: [vba]
[/vba] 1) Я бы стал делать не на ComboBox'ах, а на ListBox'ах. По мне так ComboBox предназначен для ввода с подсказкой, а не для выбора. Ответы на второй и третий пункт удалены. Тема создана с нарушением Правил форума [moder]Так и чешутся руки замечание влепить за ответы[/moder]
Ну насчёт сделать — Елена права, это надо на темы разбивать, а общий принцип описать могу. 0) Убейте всё лишнее в результатах деятельности макрорекордера и опишите диапазоны в общем виде, примерно так: [vba]
[/vba] 1) Я бы стал делать не на ComboBox'ах, а на ListBox'ах. По мне так ComboBox предназначен для ввода с подсказкой, а не для выбора. Ответы на второй и третий пункт удалены. Тема создана с нарушением Правил форума [moder]Так и чешутся руки замечание влепить за ответы[/moder]StoTisteg
Интуитивно понятный код - это когда интуитивно понятно, что это код.
Сообщение отредактировал Pelena - Воскресенье, 17.04.2016, 12:24
Ответы на второй и третий пункт удалены. Тема создана с нарушением Правил форума
Елена, так фишка в том, что ответ на третий вопрос снимает первый и второй, не? Хотя, конечно, надо признать, что ему не соответствует название темы. Тут каюсь и посыпаю голову пеплом. не обратил внимания
Ответы на второй и третий пункт удалены. Тема создана с нарушением Правил форума
Елена, так фишка в том, что ответ на третий вопрос снимает первый и второй, не? Хотя, конечно, надо признать, что ему не соответствует название темы. Тут каюсь и посыпаю голову пеплом. не обратил внимания StoTisteg
Интуитивно понятный код - это когда интуитивно понятно, что это код.
Сообщение отредактировал StoTisteg - Воскресенье, 17.04.2016, 13:24
[offtop] al-Ex, Вы уж извините, но антипаттерн "Волшебная Кнопка" у Вас в полный рост [vba]
Код
GoTo exi
[/vba]Знаете, человек, который меня учил, однажды сказал так. — Представьте себе, что на защите вашей докторской у вас прихватило живот и вы, не сдержавшись, шумно опорожнились в штаны, сопроводив это матерной тирадой. Так вот goto — это хуже.
[offtop] al-Ex, Вы уж извините, но антипаттерн "Волшебная Кнопка" у Вас в полный рост [vba]
Код
GoTo exi
[/vba]Знаете, человек, который меня учил, однажды сказал так. — Представьте себе, что на защите вашей докторской у вас прихватило живот и вы, не сдержавшись, шумно опорожнились в штаны, сопроводив это матерной тирадой. Так вот goto — это хуже.StoTisteg
Интуитивно понятный код - это когда интуитивно понятно, что это код.
Сообщение отредактировал StoTisteg - Воскресенье, 17.04.2016, 14:07
Это когда вся логика программы спрятана в клик по кнопке, известной только её разработчику. Например, в Вашем случае чтобы посмотреть, что делает Ваша программа, надо зайти в форму UserForm1 (непонятно для чего предназначенную), потом догадаться, что все действия находятся в событиях кнопки CommandButton1. Вместо того, чтобы открыть "очевидный" код Module1 и прочитать всё там. Ну это хорошо, что у Вас всего один модуль и одна форма. А если модулей, называемых Module1 ... ModuleN в проекте дофига, форм дохрена, а элементов в них столько, что даже Me.Hide по событию Click/Change по каждому в один экран не влазят? А это не теоретический пример, я сам лично напейсал заполнение простенькой (по сравнению с П-1) статистической формы примерно таких масштабов.
Это когда вся логика программы спрятана в клик по кнопке, известной только её разработчику. Например, в Вашем случае чтобы посмотреть, что делает Ваша программа, надо зайти в форму UserForm1 (непонятно для чего предназначенную), потом догадаться, что все действия находятся в событиях кнопки CommandButton1. Вместо того, чтобы открыть "очевидный" код Module1 и прочитать всё там. Ну это хорошо, что у Вас всего один модуль и одна форма. А если модулей, называемых Module1 ... ModuleN в проекте дофига, форм дохрена, а элементов в них столько, что даже Me.Hide по событию Click/Change по каждому в один экран не влазят? А это не теоретический пример, я сам лично напейсал заполнение простенькой (по сравнению с П-1) статистической формы примерно таких масштабов.StoTisteg
Интуитивно понятный код - это когда интуитивно понятно, что это код.
Ну этот-то вопрос решается тем, что у модулей тоже параметр Name есть... А вот логика, засунутая туда, куда разработчик телят не гонял — это хужее. Я так потерял реализацию неплохой идеи — где-то в старых версиях она есть, вот бы её найти
Ну этот-то вопрос решается тем, что у модулей тоже параметр Name есть... А вот логика, засунутая туда, куда разработчик телят не гонял — это хужее. Я так потерял реализацию неплохой идеи — где-то в старых версиях она есть, вот бы её найти StoTisteg
Интуитивно понятный код - это когда интуитивно понятно, что это код.
Спасибо всем огромное, ночью буду разбираться. Главное конечно не ComboBoxы и ListBoxы, а юзабилити. Пока почему-то не запускается. Дебагер ругается на это:
[vba]
Код
Private Sub lbx1_rfr() UserForm1.ListBox1.Clear For Each x In rngProd If x.EntireRow.Hidden = False Then For i = 0 To ListBox1.ListCount - 1 If ListBox1.List(i) = x.Value Then GoTo exi End If Next i UserForm1.ListBox1.AddItem x.Value exi: End If Next x Label1.Caption = "Заказчик" End Sub
[/vba]
Спасибо всем огромное, ночью буду разбираться. Главное конечно не ComboBoxы и ListBoxы, а юзабилити. Пока почему-то не запускается. Дебагер ругается на это:
[vba]
Код
Private Sub lbx1_rfr() UserForm1.ListBox1.Clear For Each x In rngProd If x.EntireRow.Hidden = False Then For i = 0 To ListBox1.ListCount - 1 If ListBox1.List(i) = x.Value Then GoTo exi End If Next i UserForm1.ListBox1.AddItem x.Value exi: End If Next x Label1.Caption = "Заказчик" End Sub
Что Вам модератор не дозволяет? Ответить на первый вопрос?
kirill-kibor, Правила для всех одинаковые. В этой теме решаем первую задачу. Для остальных создаём новые темы. И эту тему переименуйте в "Выпадающий список с сортировкой без повторов"
Что Вам модератор не дозволяет? Ответить на первый вопрос?
kirill-kibor, Правила для всех одинаковые. В этой теме решаем первую задачу. Для остальных создаём новые темы. И эту тему переименуйте в "Выпадающий список с сортировкой без повторов"Pelena
"Черт возьми, Холмс! Но как??!!" Ю-money 41001765434816