Филипп, все эти вещи очень удобные и интересные. Жаль, что не все работодатели понимают, что подобные вещи могут не только облегчить работу отела планирования, но и без особых затрат вывести эту работу на более высокий уровень и тем самым принести больше прибыли.
Если кому-то нужно, то текст Макроса: Sub StartTimer() Application.OnTime Now + TimeValue("00:00:01"), "Increment_count" End Sub Sub Increment_count() Range("L7").Value = Range("L7") + 1 StartTimer End Sub Sub StopTamer() Application.OnTime Now + TimeValue("00:00:01"), "Increment_count", Schedule:=False End Sub Sub obnuleniye() Range("L7").Value = 0 End Sub
А новичку реально освоить VBA? Есть ли вообще литература, где всё подробно, разжёванно объясняют, как пользоваться VBA? Всё что встречал, даже близко не подходит для новичков.
Евгения, спасибо! Очень приятно видеть Вашу любознательность ко всем фишкам Excel - от VBA до Power Query -)
Филипп, все эти вещи очень удобные и интересные. Жаль, что не все работодатели понимают, что подобные вещи могут не только облегчить работу отела планирования, но и без особых затрат вывести эту работу на более высокий уровень и тем самым принести больше прибыли.
Если кому-то нужно, то текст Макроса:
Sub StartTimer()
Application.OnTime Now + TimeValue("00:00:01"), "Increment_count"
End Sub
Sub Increment_count()
Range("L7").Value = Range("L7") + 1
StartTimer
End Sub
Sub StopTamer()
Application.OnTime Now + TimeValue("00:00:01"), "Increment_count", Schedule:=False
End Sub
Sub obnuleniye()
Range("L7").Value = 0
End Sub
А новичку реально освоить VBA? Есть ли вообще литература, где всё подробно, разжёванно объясняют, как пользоваться VBA? Всё что встречал, даже близко не подходит для новичков.
Попробуйте пройти курсы "специалист" в институте имени Баумана, после этого книги станут понятнее и учится самому станет легче. Мне это помогло.