Форум программистов, компьютерный форум, киберфорум
VBA
Войти
Регистрация
Восстановить пароль
Блоги Сообщество Поиск  
 
 
Рейтинг 4.82/11: Рейтинг темы: голосов - 11, средняя оценка - 4.82
0 / 0 / 0
Регистрация: 26.01.2023
Сообщений: 19
Excel

Увеличение диапазона выбора ячеек для таймера

27.01.2023, 20:01. Показов 3086. Ответов 39

Студворк — интернет-сервис помощи студентам
Здравствуйте

Макрос в приложенном файле действует по принципу:
Есть столбец где отсчитывает таймер, в столбце можно выбирать ячейку в которой можно запустить таймер.

Мне нужно сделать так чтобы диапазон ячеек распространялся не только на столбец R2C19 но и на другие столбцы и строки

Пример R5C20;R5C21;R5C22; R6C20; R6C21; R6C22;

Желательно чтоб диапазон был с R5C20; до R116C29;


Буду благодарен за помощь!
Вложения
Тип файла: rar PROD+TIME.rar (39.6 Кб, 9 просмотров)
0
IT_Exp
Эксперт
34794 / 4073 / 2104
Регистрация: 17.06.2006
Сообщений: 32,602
Блог
27.01.2023, 20:01
Ответы с готовыми решениями:

Меню диалога выбора диапазона ячеек
Добрый день, уважаемые Гуру Excel VBA. Подскажите пожалуйста, как вызвать меню выбора диапазона ячеек, примерно как на скрине? На...

Использование get_Range для выбора диапазона ячеек в Excel
Добрый день всем! Использую get_Range("a" + 7, "i" + 95); тут понятно все, выбирается диапазон ячеек книги Excell от а7 до i95. А как можно...

Как с помощью maskedTextBox сделать маску например A1:C10 для выбора диапазона ячеек Excel
Доброго времени суток, собственно как с помощью maskedtextbox сделать маску например A1:C10 для выбора диапазона ячеек Excel книги ? ...

39
1847 / 1162 / 354
Регистрация: 11.07.2014
Сообщений: 4,107
01.02.2023, 18:10
Студворк — интернет-сервис помощи студентам
Vaty, ну, наконец-то мне удалось объяснить вам чего вы хотите, завтра посмотрю
0
1847 / 1162 / 354
Регистрация: 11.07.2014
Сообщений: 4,107
02.02.2023, 11:26
Vaty, Сделал поочередный запуск секундомера в активной ячейке с сохранением секундомеров в предыдущих ячейках: встаёшь на ячейку Пуск, встаёшь на другую и снова Пуск ...... Адреса Запущенных ячеек запоминаются в Public StRan. Поэтому после СТОП запущенные ячейки сохраняются и секундомер при пуске продолжает в них работать. Чтобы его остановить после Стоп надо еще нажать на третью кнопку Очистить, в которой теперь есть строка StRan="".
Там у вас ещё вроде используются ячейки из девятого столбца. Я не разбирался с ними, пока, думаю, можно и без них. Но, если вы знаете зачем они нужны или можете узнать у ваших помощников, то поделитесь.
Вложения
Тип файла: rar PROD+TIME_Bur.rar (42.0 Кб, 6 просмотров)
0
1847 / 1162 / 354
Регистрация: 11.07.2014
Сообщений: 4,107
02.02.2023, 17:58
Vaty, повторно кнопку Пуск нажимать нет смысла, при переходе на другую ячейку секундомер продолжает работать без нажатия на Пуск. Но если активируете по ошибке не ту ячейку (например заголовок), то на ней секундомер тоже начнет работать. Поэтому лучше определить диапазон ячеек в котором секундомер может работать. Либо, если формат ячейки не ВРЕМЯ, то пропускаем. Если что, пишите.

Добавлено через 52 минуты
Vaty, так время должно быть от начала запуска в ячейке и до настоящего момента, именно СЕКУНДОМЕР? Тогда надо алгоритм переделывать так как могут быть несколько ячеек с секундомером в одной строке. Вы постарайтесь пояснить это понятным языком и другие нюансы, если ещё есть, что я не уловил пока. И поставьте в таких ячейках формат ВРЕМЯ

Vaty, этот файл выбросьте,там неправильно, нужны ответы на мои вопросы.
0
0 / 0 / 0
Регистрация: 26.01.2023
Сообщений: 19
02.02.2023, 17:59  [ТС]
Burk,
Так, смотрите, в изначальном файле, который я прикрепил, секундомер работал верно, в каждой ячейке отдельно можно было запустить секундомер и остановить его.
1. Нужно что в каждой выбранной ячейке можно было запустить секундомер не зависимо т другого-го.
Концепция какая, есть рабочий, который работает над материалом и нужно узнать сколько времени уходит на его обработку.
Например у нас два рабочих С и В.
С подходит компьютеру и запускает свой секундомер, потом подходит В и запускает свой.
Потом возвращается С и должен выключить только свой секундомер.
2.Нужно чтоб после стопа значения сохранялись и потом когда снова старт, они шли с того времени, как в файле что изначально я прикрепил.
Надеюсь так более понятно.
Благодарю
0
1847 / 1162 / 354
Регистрация: 11.07.2014
Сообщений: 4,107
03.02.2023, 11:05
Vaty, вернулись в начало, вы говорили в ваших сообщениях, что нужно, чтобы секундомер работал в нескольких ячейках одновременно.А оказалось, что вы имели в виду, что работают с программой разные люди со своими ячейками, но последовательно друг за другом. Надо яснее выражать свои мысли. Или я опять где-то вас не понял? Теперь секундомер работает с одной выбранной (активной) ячейкой с кнопками Пуск Стоп, потом садится другой юзер и активирует запускает секундомер в своей ячейке, т.е. работа не параллельная, а последовательная. Там ещё заносятся в ячейки 1,8 в девятый и десятый столбцы, хотя это можно и выкинуть. Но я оставил это, но,видимо, спрашивать вас зачем они нужны бесполезно.
Поставил зону действия секундомера S5:AC116, в остальных он работать не будет.
Вложения
Тип файла: rar PROD+TIME_Bur.rar (41.1 Кб, 5 просмотров)
0
0 / 0 / 0
Регистрация: 26.01.2023
Сообщений: 19
03.02.2023, 17:41  [ТС]
Burk, да, верно, нужно чтоб секундомер работал независимо в каждой ячейке.
Я в файл загрузил видео, попытался там объяснить.
Вложения
Тип файла: rar PROD+TIME_Bur (2).rar (9.57 Мб, 7 просмотров)
0
349 / 190 / 108
Регистрация: 01.04.2020
Сообщений: 538
03.02.2023, 18:35
Vaty, и кому нужно смотреть, как красиво крутяся счётчики?
0
0 / 0 / 0
Регистрация: 26.01.2023
Сообщений: 19
03.02.2023, 18:45  [ТС]
elixi, не понял вопроса.
0
349 / 190 / 108
Регистрация: 01.04.2020
Сообщений: 538
03.02.2023, 22:16
Vaty, вопрос к тому, необходимо ли вообще, чтобы в ячейках посекундно обновлялся таймер.
Не достаточно ли например закрасить ячейку, чтобы знали, что здесь работают
и время работы посчитать:
- или после окончания работы
- или запуском отдельного макроса к моменту его запуска.

Другие вопросы:
- Может ли один рабочий работать сразу на двух - трёх задачах?
Не уместно ли блокировать возможность запуска счётчика на второй
задаче, пока не окончена / не прервана работа на первой?
- Аналогично, могут ли на одной задаче одновременно работать
несколько работников?
0
1847 / 1162 / 354
Регистрация: 11.07.2014
Сообщений: 4,107
04.02.2023, 16:16
Vaty, посмотрите теперь, кнопка Пуск надо нажимать в каждой ячейке, в которой надо запускать секундомер, в предыдущих ячейках секундомеры продолжат работу.
кнопка Стоп остановит секундомер в одной активной ячейке с секундомером
Алгоритм изменил.
Кнопка Очистить Все остановит все запущенные секундомеры
Вложения
Тип файла: rar PROD+TIME_Bur.rar (42.8 Кб, 3 просмотров)
0
1847 / 1162 / 354
Регистрация: 11.07.2014
Сообщений: 4,107
04.02.2023, 16:38
Vaty, Ещё раз напоминаю, что область работы секундомеров, как и было в вашем первом сообщении, Range("T5:AC116")), если нужно изменить, то, думаю, это будет нетрудно.
0
1847 / 1162 / 354
Регистрация: 11.07.2014
Сообщений: 4,107
05.02.2023, 13:58
Vaty, тут обнаружились неожиданно некие проблемы с закрытием оператора On Time с таким коротким интервалом. Объяснять долго, но в итоге справился. Поэтому предыдущий файл в урну, а этот посмотрите. Будут замечания, пишите.
Вложения
Тип файла: rar PROD+TIME_BurN.rar (42.6 Кб, 11 просмотров)
0
0 / 0 / 0
Регистрация: 26.01.2023
Сообщений: 19
08.02.2023, 04:43  [ТС]
Burk, Спасибо большое!Теперь работает как нужн, спасибо!
Только можно ее вопрос, возможно ли сделать так, чтобы те я ейки в которых работает секундомер загорались красным ?
0
1847 / 1162 / 354
Регистрация: 11.07.2014
Сообщений: 4,107
08.02.2023, 09:11
Vaty, это с красным цветом. Если что-то ещё будете мне писать, то может через личные сообщения?А то мы, наверно, всем надоели с этой темой.
Вложения
Тип файла: rar PROD+TIME_BurN.rar (42.8 Кб, 10 просмотров)
0
0 / 0 / 0
Регистрация: 26.01.2023
Сообщений: 19
08.02.2023, 20:17  [ТС]
Burk, Да, все отлично.Спасибо большое вам!Вы очень помогли!
0
08.02.2023, 20:44

Не по теме:

Vaty, для "Спасибо большое вам!Вы очень помогли!" есть кнопка такая под полезными для Вас сообщениями.
Вы её намеренно игнорируете?

0
0 / 0 / 0
Регистрация: 26.01.2023
Сообщений: 19
15.03.2023, 18:49  [ТС]
Здравствуйте.
Извините возвращаюсь через время.
В процессе использования таймера обнаружилась проблема.
Когда запускаешь таймер в данном файле excel, он начинает записывать время в этой ячейке во всех открытых файлах excel.
Это возможно как-то исправить ?
Миниатюры
Увеличение диапазона выбора ячеек для таймера   Увеличение диапазона выбора ячеек для таймера  
Вложения
Тип файла: rar PRODTIME _DONE_SHOP.rar (39.7 Кб, 6 просмотров)
0
ᴁ ©
Эксперт MS Access
 Аватар для АЕ
4087 / 2468 / 514
Регистрация: 13.12.2016
Сообщений: 8,396
Записей в блоге: 5
15.03.2023, 22:38
Цитата Сообщение от Vaty Посмотреть сообщение
Это возможно как-то исправить ?
Да, открывайте файлов поменьше.
0
0 / 0 / 0
Регистрация: 26.01.2023
Сообщений: 19
16.03.2023, 20:46  [ТС]
АЕ, ну возможно можно как-то это исправить в коде, чтоб активный лист записывал данные
0
ᴁ ©
Эксперт MS Access
 Аватар для АЕ
4087 / 2468 / 514
Регистрация: 13.12.2016
Сообщений: 8,396
Записей в блоге: 5
16.03.2023, 20:59
Цитата Сообщение от Vaty Посмотреть сообщение
ну возможно можно как-то это исправить
придерживайтесь правильной тактики
1
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
BasicMan
Эксперт
29316 / 5623 / 2384
Регистрация: 17.02.2009
Сообщений: 30,364
Блог
16.03.2023, 20:59

Установите для диапазона ячеек B6:B8 числовой формат ячеек с количество десятичных знаков равным 2
Здравствуйте, нужна помощь в excel. Я все выполнил но здесь уже никак не смог решить. Помогите пожалуйста! Вот само задание которое нужно...

Увеличение высоты ячеек для слишком длинного текста
Добрый вечер, уважаемые коллеги! Искал, честно искал в просторах интернета и не нашел решения одного вопроса. В таблице есть...

Объединение диапазона ячеек для фильтра
Добрый день. Интересует возможность фильтровать одну колонку по значению, и что бы при этом в соседней колонке выводились все...

Событие Worksheet_SelectionChange для диапазона ячеек
Добрый день. Помогите разобраться. Вот этот макрос - реагирует на выделение одной ячейки A1. Private Sub...

Контрол для выбора диапазона дат для отчета?
Добрый день. Подскажите, пожалуйста, может где-то здесь у кого-нибудь в наработках есть что-то вроде контрола для выбора диапазона дат? То...


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
40
Ответ Создать тему
Новые блоги и статьи
Nekobox - outbounds[0].transport: unknown transport type: raw
damix 01.10.2026
Фикс ошибки Правым кликом по серверу -> отладочная информация -> edit Заменить "net": "raw", на "net": "tcp", Нажать кнопку reload.
Программный домашний кинотеатр
russiannick 27.09.2026
Сподобился на программный домашний кинотеатр. В качестве ЯВУ по традиции выбрал js. В помощники взял Яндекс-Алису. Было создано три зала на разные интересы. исторические и ретро сериал Хичкок. . .
Беседа с ИИ о программистах, недопускающих к созданию и правке кода генеративные ИИ и причины этого
zorxor 21.09.2026
Раньше я радовался или получал некоторые эмоции, пусть небольшие, но всё же, от самого процесса написания кода, рекомпиляции и запуска, видя постепенное развитие программы и прочее. А теперь лень. . .
Мобильное приложение ColorStep
pavlinmavlin 17.09.2026
Реализовал приложение Красный, Зеленый, Синий в Unity3d + c#. Название изменил на ColorStep. Приложение прошло модерацию и теперь доступно для скачивания. Делал его сам, шаг за шагом — и вот,. . .
Запрет дублирования строк в табличной части
Maks 13.09.2026
Реализация из решения ниже выполнена на нетиповом справочнике "Нормы ТО" с табличной часть "Виды ТО", разработанного в КА2, со следующими реквизитами: - ВидТО (СправочникСсылка. ВидыТО); - ВидГСМ. . .
Скрипты Tampermonkey для CyberForum, ChatGPT, Claude и пр.
Jin X 06.09.2026
Скрипты Tampermonkey для CyberForum, ChatGPT, Claude и пр. Работая с форумом и нейросетями в браузере часто хочется что-то подкорректировать или добавить какого-то функционала. Ниже прикреплён. . .
Программа опроса у.з. расходомера SLS-720F
Argus19 02.09.2026
Программа опроса у. з. расходомера SLS-720F Программа опрашивает один раз в минуту три ультразвуковых расходомера SLS-720F через интерфейс RS-485 по протоколу Modbus RTU. Опрашиваются регистры. . .
Hyper-V: Компьютер должен поддерживать доверенный платформенный модуль 2.0.
Maks 31.08.2026
При установке Windows 11 на виртуальную машину Hyper-V 2-го поколения вылезла такая ошибка: Решение: в параметрах виртуальной машины, в разделе "Безопасность" (Security) активировать флаг. . .
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2026, CyberForum.ru