Как да добавя автоматично дата и час за коментар в Excel?
Когато вмъкнете коментар в клетка, потребителското име ще бъде вмъкнато автоматично по подразбиране. Чудили ли сте се дали текущата дата и час също могат да бъдат автоматично добавени към коментара? Това ще ви помогне бързо да идентифицирате часа, в който сте създали коментарите. В тази статия ще ви представя някои трикове за справяне с този проблем в Excel.
Добавете ръчно дата и час за коментар с клавишни комбинации
Автоматично добавяне на дата и час за коментар с VBA код
Добавете ръчно дата и час за коментар с клавишни комбинации
Без да въвеждате данните и часа в полето за коментари, можете да използвате тези клавишни комбинации, за да вмъкнете данните и часа бързо и лесно. Моля, направете следното:
1. Щракнете върху една клетка, в която искате да вмъкнете коментар с текущите данни и час, след което щракнете с десния бутон, за да изберете Вмъкване на коментар формирайте контекстното меню, вижте екранната снимка:
2. След като вмъкнете коментара, в полето за коментар натиснете CTRL+; за да вмъкнете текущата дата и въведете интервал, след което натиснете Ctrl + Shift +; за да вмъкнете текущото време и текущите данни и час са добавени в коментара наведнъж, вижте екранната снимка:
3. И след това можете да редактирате коментара си според вашите нужди.
Автоматично добавяне на дата и час за коментар с VBA код
Ако не сте запознати с клавишите за бърз достъп, не се притеснявайте, тук мога да говоря за VBA код, който да ви помогне да вмъкнете датата и часа автоматично.
1. Изберете клетката, в която искате да вмъкнете коментара.
2. Задръжте натиснат ALT + F11 за да отворите Прозорец на Microsoft Visual Basic за приложения.
3. Щракнете Поставете > Модулии поставете следния код в Прозорец на модула.
VBA код: Автоматично добавяне на дата и час за коментар
Sub DatedComment()
'Update 20141110
Dim pComment As Comment
Dim WorkRng As Range
Set WorkRng = Application.ActiveCell
Set pComment = WorkRng.AddComment(Application.UserName & ":" & vbLf & Now & vbLf)
pComment.Shape.TextFrame.Characters(1, VBA.Len(Application.UserName) + 1).Font.Bold = True
End Sub
4. След това натиснете F5 за да изпълните този код и автоматично ще бъде вмъкнат коментар в избраната клетка с дата и час и можете да редактирате коментара според вашите нужди, вижте екранната снимка:
тип: Този VBA не може да работи, ако избраната клетка вече е била вмъкната преди това.
Още по темата:
Как да нулирам всички позиции на коментари в Excel?
Как да маркирате всички клетки с коментари в Excel?
Най-добрите инструменти за продуктивност в офиса
Усъвършенствайте уменията си за Excel с Kutools за Excel и изпитайте ефективност, както никога досега. Kutools за Excel предлага над 300 разширени функции за повишаване на производителността и спестяване на време. Щракнете тук, за да получите функцията, от която се нуждаете най-много...
Раздел Office Внася интерфейс с раздели в Office и прави работата ви много по-лесна
- Разрешете редактиране и четене с раздели в Word, Excel, PowerPoint, Publisher, Access, Visio и Project.
- Отваряйте и създавайте множество документи в нови раздели на един и същ прозорец, а не в нови прозорци.
- Увеличава вашата производителност с 50% и намалява стотици кликвания на мишката за вас всеки ден!