
Другие языки программирования и технологии
excel! Помогите!
Нужно время, в каждой ячейки увеличить на 3 минуты, подскажите пожалуйста как... в ручную не получится таких таблиц 36!

решим чуть более усложненный вариант:
если в ячейке формула то добавим ВРЕМЯ (0;3;0)
если в ячейки значение то увеличим на 3 минуты
формат ячеек должен быть форматом времени)) )
вот макрос:
Sub ppp()
For Each ttt In Selection
If Left(ttt.FormulaR1C1, 1) = "=" Then
ttt.FormulaR1C1 = ttt.FormulaR1C1 + "+TIME(0,3,0)"
Else
ttt.Value = ttt.Value + TimeSerial(0, 3, 0)
End If
Next
End Sub
выделяете нужную область и запускаете макрос
а вот картинка с результатом
в первой строке бывшие значения, курсор стоит на ячейке куда макрос добавил элемент формулы)))
если в ячейке формула то добавим ВРЕМЯ (0;3;0)
если в ячейки значение то увеличим на 3 минуты
формат ячеек должен быть форматом времени)) )
вот макрос:
Sub ppp()
For Each ttt In Selection
If Left(ttt.FormulaR1C1, 1) = "=" Then
ttt.FormulaR1C1 = ttt.FormulaR1C1 + "+TIME(0,3,0)"
Else
ttt.Value = ttt.Value + TimeSerial(0, 3, 0)
End If
Next
End Sub
выделяете нужную область и запускаете макрос
а вот картинка с результатом

в первой строке бывшие значения, курсор стоит на ячейке куда макрос добавил элемент формулы)))
Вобщем так создаешь ниже еще одну такую же таблицу
В первую ячейку пишешь формулу для ячейки где у тя там 6:10 стоит путь А1
=А1+ВРЕМЯ (0;3;0)
0 часов 3 минуты 0 секунд
если ячейка отформатирована показывать время то все нормалек прокатит.. . потом распространяешь ету ячейку на скока нада и копируешь и специальной вставкой вставляешь значения в исходную таблицу.. . Правда тебе ето 36 раз придется провернуть.. . Делов минут на 15... ток у тя там в исходной таблице условное форматирование как понимаю стоит возможно слетит.. . придется заново задавать.. .
В первую ячейку пишешь формулу для ячейки где у тя там 6:10 стоит путь А1
=А1+ВРЕМЯ (0;3;0)
0 часов 3 минуты 0 секунд
если ячейка отформатирована показывать время то все нормалек прокатит.. . потом распространяешь ету ячейку на скока нада и копируешь и специальной вставкой вставляешь значения в исходную таблицу.. . Правда тебе ето 36 раз придется провернуть.. . Делов минут на 15... ток у тя там в исходной таблице условное форматирование как понимаю стоит возможно слетит.. . придется заново задавать.. .
ставишь на первую ячейку в которой надо увеличить на 3 курсор и пишешь формулу "= ячейка (А1например) +3! Когда это сделал ставишь курсор в нижний правый угол и растягиваешь на всю таблицу!
Похожие вопросы
- Формула в excel. Помогите сделать формулу.
- знатоки Excel, помогите!
- Excel ! Помогите! (см. пояснения)
- помогите с vba excel
- Вставка "вложенной" таблицы в Excel (или Access)
- Программирование в Excel - VBA
- Помогите с итогами в excel
- помогите в Excel-e
- люди подскажите пожалуйста, как в двух файлах excel найти совпадения????помогите очень нужно!!!
- пишу макрос в Excel, есть вопрос, помогите(2)