при изменении времени должны менятся данные в других ячейках

Старая форма входа

Страница 1 из 1 1
Модератор форума: китин, _Boroda_

Мир MS Excel » Вопросы и решения » Вопросы по Excel » при изменении времени должны менятся данные в других ячейках (Формулы/Formulas)

babdusya

Дата: Воскресенье, 11.08.2019, 00:28 | Сообщение № 1

Группа: Пользователи

Ранг: Прохожий

Сообщений: 1

Репутация: 0 ±

Замечаний: 0% ±

Excel 2010

Здравствуйте! В общем с помощью макроса сделал в ячейке часы, есть 4 смены А Б В Г в каждой смене по пять человек, мне необходимо чтобы при достижении определенного времени в ячейках менялась смена и состав смены.
Например: в смене А работают Иванов Петров Сидоров смена работает с 8:00 до 20:00 соответственно в 20:00 приходит смена Б где работают Зубков Котляров Медведев, нужно чтобы когда на часах было 20:00 А сменилась на Б и Иванов Петров Сидоров сменились на Зубков Котляров Медведев.
макрос для часов:
Sub UpdateTime()
Dim varNextCall As Variant
' Записываем в ячейку текущее время
Cells(4, 12).Value = Now
' Записываем в varNextCall время, когда вызвать этот макрос _
в следующий раз (через 1 секунду)
varNextCall = TimeSerial(Hour(Now), Minute(Now), Second(Now) + 1)
' Уведомляем Excel в необходимости вызова макроса
Application.OnTime varNextCall, "UpdateTime"
End Sub

Ответить

Pelena

Дата: Воскресенье, 11.08.2019, 06:50 | Сообщение № 2

Группа: Админы

Ранг: Местный житель

Сообщений: 19177

Репутация: 4417 ±

Замечаний: ±

Excel 365 & Mac Excel

babdusya, оформите код тегами с помощью кнопки # в режиме правки поста и приложите файл с примером

"Черт возьми, Холмс! Но как??!!"
Ю-money 41001765434816

Ответить

Страница 1 из 1
1