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

Вход

Регистрация

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

 

= Мир MS Excel/Отоброжение/скрытие - строк - Мир MS Excel

Старая форма входа
  • Страница 1 из 1
  • 1
Модератор форума: китин  
Отоброжение/скрытие - строк
anisimovaleksandr32 Дата: Суббота, 14.10.2023, 12:04 | Сообщение № 1
Группа: Пользователи
Ранг: Участник
Сообщений: 86
Репутация: 4 ±
Замечаний: 20% ±

Добрый день всем!!!
Тема работы отобразить или скрыть строки согласно условия выбора количества образцов
- имеется "Forms.OptionButton" в количестве 5 шт. Оператор выбирает количество образцов в серии, в таблице имеется при этом 6 серий по 6-ть образцов в каждой. После выбора нужного числа образцов в серии в данной таблице должно в каждой серии уменьшиться(скрыть лишние если указали три то значится в серии три образца; указали 4 то значится 4 образца в серии и т. д.)на это количество.
Ранее уже был создан макрос Бородой - но данный код был для одной серии образцов и работает на ура


В связи с изменениями поставленной задачи (и нормативной документации) требуется дополнить серии образцов в протоколе - но при этом соответственно условие работы данного макроса расширить диапазон условия чтоб в каждой отображаемой серии учитывалось количество образцов выбранных оператором.
[img][/img]

И вторая задача
- если в ячейке Е24 оператор указал объем бетона то должно сработать условие:
1. если менее 12 кубов - три серии но при этом должно учитываться количество образцов в серии указанных оператором в "Forms.OptionButton"
[img][/img]
2. если указанно от 12 до 24 кубов то количество серий должно быть 4-е + условие количества образцов в серии
3. если указанно более 24 куба то количество серий должно быть 6-ть + условие количества образцов в серии
- если в ячейке Е24 оператор не указал объем бетона то должно сработать условие:
- две серии образцов + условие количества образцов в серии

Работу оцениваю в 1500 рублей, файл прилагаю


Сообщение отредактировал anisimovaleksandr32 - Воскресенье, 15.10.2023, 08:15
 
Ответить
СообщениеДобрый день всем!!!
Тема работы отобразить или скрыть строки согласно условия выбора количества образцов
- имеется "Forms.OptionButton" в количестве 5 шт. Оператор выбирает количество образцов в серии, в таблице имеется при этом 6 серий по 6-ть образцов в каждой. После выбора нужного числа образцов в серии в данной таблице должно в каждой серии уменьшиться(скрыть лишние если указали три то значится в серии три образца; указали 4 то значится 4 образца в серии и т. д.)на это количество.
Ранее уже был создан макрос Бородой - но данный код был для одной серии образцов и работает на ура


В связи с изменениями поставленной задачи (и нормативной документации) требуется дополнить серии образцов в протоколе - но при этом соответственно условие работы данного макроса расширить диапазон условия чтоб в каждой отображаемой серии учитывалось количество образцов выбранных оператором.
[img][/img]

И вторая задача
- если в ячейке Е24 оператор указал объем бетона то должно сработать условие:
1. если менее 12 кубов - три серии но при этом должно учитываться количество образцов в серии указанных оператором в "Forms.OptionButton"
[img][/img]
2. если указанно от 12 до 24 кубов то количество серий должно быть 4-е + условие количества образцов в серии
3. если указанно более 24 куба то количество серий должно быть 6-ть + условие количества образцов в серии
- если в ячейке Е24 оператор не указал объем бетона то должно сработать условие:
- две серии образцов + условие количества образцов в серии

Работу оцениваю в 1500 рублей, файл прилагаю

Автор - anisimovaleksandr32
Дата добавления - 14.10.2023 в 12:04
anisimovaleksandr32 Дата: Воскресенье, 15.10.2023, 12:17 | Сообщение № 2
Группа: Пользователи
Ранг: Участник
Сообщений: 86
Репутация: 4 ±
Замечаний: 20% ±

Многоуважаемые форумчане - завтра уже рабочая неделя )))) хватит отдыхать!
ПОМОГИТЕ пжл осуществить задачу

Думал поступить аналогичном образом и дополнить макрос от Бороды диапазонами - но увы ((((( не сработал

А если Rows исправить на Range
[vba]
Код
Private Sub CommandButton1_Click() 'макрос для выбора количества образцов

If OptionButton1.Value = True Then
Range("S1") = 1
End If
    Application.ScreenUpdating = 0
    Range("33:38,39:44,45:50,51:56,57:62,63:68").EntireRow.Hidden = False
    If Range("S1") < 5 Then
        Range("34,40,46,52,58,64" + Range("S1") & ":38,:44,:50,:56,:62,:68").EntireRow.Hidden = True
    End If
[/vba]
то ругается на эту строку
[vba]
Код
Range("34,40,46,52,58,64" + Range("S1") & ":38,:44,:50,:56,:62,:68").EntireRow.Hidden = True
[/vba]

Так еще ведь это дело увезать в связку с объем как то надо (((( %) :'(


Сообщение отредактировал anisimovaleksandr32 - Понедельник, 16.10.2023, 10:00
 
Ответить
СообщениеМногоуважаемые форумчане - завтра уже рабочая неделя )))) хватит отдыхать!
ПОМОГИТЕ пжл осуществить задачу

Думал поступить аналогичном образом и дополнить макрос от Бороды диапазонами - но увы ((((( не сработал

А если Rows исправить на Range
[vba]
Код
Private Sub CommandButton1_Click() 'макрос для выбора количества образцов

If OptionButton1.Value = True Then
Range("S1") = 1
End If
    Application.ScreenUpdating = 0
    Range("33:38,39:44,45:50,51:56,57:62,63:68").EntireRow.Hidden = False
    If Range("S1") < 5 Then
        Range("34,40,46,52,58,64" + Range("S1") & ":38,:44,:50,:56,:62,:68").EntireRow.Hidden = True
    End If
[/vba]
то ругается на эту строку
[vba]
Код
Range("34,40,46,52,58,64" + Range("S1") & ":38,:44,:50,:56,:62,:68").EntireRow.Hidden = True
[/vba]

Так еще ведь это дело увезать в связку с объем как то надо (((( %) :'(

Автор - anisimovaleksandr32
Дата добавления - 15.10.2023 в 12:17
anisimovaleksandr32 Дата: Понедельник, 16.10.2023, 12:36 | Сообщение № 3
Группа: Пользователи
Ранг: Участник
Сообщений: 86
Репутация: 4 ±
Замечаний: 20% ±

Народ!!!
Решение по первому вопросу нашлось!!!
Осталось решить задачу по второму вопросу:
И вторая задача
- если в ячейке Е24 оператор указал объем бетона то должно сработать условие:
1. если менее 12 кубов - три серии но при этом должно учитываться количество образцов в серии указанных оператором в "Forms.OptionButton"
[img][/img]
2. если указанно от 12 до 24 кубов то количество серий должно быть 4-е + условие количества образцов в серии
3. если указанно более 24 куба то количество серий должно быть 6-ть + условие количества образцов в серии
- если в ячейке Е24 оператор не указал объем бетона то должно сработать условие:
- две серии образцов + условие количества образцов в серии

Работу оцениваю в 1000 рублей, файл прилагаю
 
Ответить
СообщениеНарод!!!
Решение по первому вопросу нашлось!!!
Осталось решить задачу по второму вопросу:
И вторая задача
- если в ячейке Е24 оператор указал объем бетона то должно сработать условие:
1. если менее 12 кубов - три серии но при этом должно учитываться количество образцов в серии указанных оператором в "Forms.OptionButton"
[img][/img]
2. если указанно от 12 до 24 кубов то количество серий должно быть 4-е + условие количества образцов в серии
3. если указанно более 24 куба то количество серий должно быть 6-ть + условие количества образцов в серии
- если в ячейке Е24 оператор не указал объем бетона то должно сработать условие:
- две серии образцов + условие количества образцов в серии

Работу оцениваю в 1000 рублей, файл прилагаю

Автор - anisimovaleksandr32
Дата добавления - 16.10.2023 в 12:36
anisimovaleksandr32 Дата: Понедельник, 16.10.2023, 12:51 | Сообщение № 4
Группа: Пользователи
Ранг: Участник
Сообщений: 86
Репутация: 4 ±
Замечаний: 20% ±

Всем огромное спасибо!!!!
Человек взялся за решение вопроса.
Тема пока приостановлена....
 
Ответить
СообщениеВсем огромное спасибо!!!!
Человек взялся за решение вопроса.
Тема пока приостановлена....

Автор - anisimovaleksandr32
Дата добавления - 16.10.2023 в 12:51
anisimovaleksandr32 Дата: Вторник, 17.10.2023, 09:01 | Сообщение № 5
Группа: Пользователи
Ранг: Участник
Сообщений: 86
Репутация: 4 ±
Замечаний: 20% ±

Уважаемые форумчане - доброе утро!!!
Решение задач было найдено - спасибо всем огромное...
Тема закрыта
 
Ответить
СообщениеУважаемые форумчане - доброе утро!!!
Решение задач было найдено - спасибо всем огромное...
Тема закрыта

Автор - anisimovaleksandr32
Дата добавления - 17.10.2023 в 09:01
  • Страница 1 из 1
  • 1
Поиск:

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