Багато ведуть реєстри обліку всіляких документів в таблицях Excel, проставляючи в них дати різних етапів узгодження та підписання. При цьому не всі знають, що ввести поточну дату в клітинку Excel можна натисканням сполучення гарячих клавіш. Крім того, для цієї ж мети можна використовувати макрос VBA.

Для швидкого введення поточної дати в осередок передбачено стандартна програма Excel - натискання поєднання гарячих клавіш Ctrl +; (Або Ctrl + Ж, кому як зручніше запам'ятати). У разі, якщо комусь таке поєднання клавіш не цілком зручно, то можна зберегти в особистому книзі макросів процедуру (код якої наведено нижче) і закріпити її за більш зручним сполучення клавіш, наприклад Ctrl + d ( про те як це зробити можна прочитати докладніше ), А для того щоб це поєднання спрацьовувало незалежно від розкладки клавіатури, можна зберегти не одну, а дві ідентичних процедури і прив'язати їх до різних сполучень клавіш, наприклад одну до Ctrl + d, а іншу до Ctrl + ст.

Sub InsertDate () 'Вставка поточної дати в активний осередок' Швидкий доступ: Ctrl + d ActiveCell.Value = Format (Now, "dd.mm.yyyy") End Sub '------------- ------------------------------------------ Sub Вставка_Дати () 'Вставка поточної дати в активний осередок 'Швидкий доступ: Ctrl + в ActiveCell.Value = Format (Now, "dd.mm.yyyy") End Sub

Для того щоб поточна дата вставлялася не тільки в активну комірку, а й в усі виділені осередки, досить додати цикл в програмний код.

Sub InsertDate () 'Вставка поточної дати в активний осередок' Швидкий доступ: Ctrl + d for each Cell in Selection Cell.Value = Format (Now, "dd.mm.yyyy") Next End Sub '------- ------------------------------------------------ Sub Вставка_Дати () 'Вставка поточної дати в активний осередок' Швидкий доступ: Ctrl + в for each Cell in Selection Cell.Value = Format (Now, "dd.mm.yyyy") Next End Sub

Для того, щоб перенести цей програмний код на свій комп'ютер, наведіть курсор миші на поле з програмним кодом, натисніть на одну з двох кнопкок в правому верхньому куті цього поля, скопіюйте програмний код і вставте його в модуль проекту на своєму комп'ютері (докладніше про те, як зберегти програмний код макросу ).

Інші матеріали по темі: