Skip i'r prif gynnwys

Sut i ychwanegu dyddiad ac amser i wneud sylwadau yn Excel?

Pan fewnosodwch sylw mewn cell, bydd enw defnyddiwr yn cael ei fewnosod yn awtomatig yn ddiofyn. Ydych chi erioed wedi meddwl a ellir ychwanegu'r dyddiad a'r amser cyfredol at y sylw hefyd? Bydd hyn yn eich helpu i nodi'r amser y gwnaethoch chi greu'r sylwadau yn gyflym. Yr erthygl hon, byddaf yn cyflwyno rhai triciau i chi ddelio â'r broblem hon yn Excel.

Ychwanegwch ddyddiad ac amser â llaw i roi sylwadau gydag allweddi wedi'u torri'n fyr

Auto ychwanegu dyddiad ac amser i wneud sylwadau gyda chod VBA


swigen dde glas saeth Ychwanegwch ddyddiad ac amser â llaw i roi sylwadau gydag allweddi wedi'u torri'n fyr

Heb deipio'r data a'r amser yn y blwch sylwadau, gallwch ddefnyddio'r bysellau toriad byr hyn i fewnosod y data a'r amser yn gyflym ac yn hawdd. Gwnewch fel a ganlyn:

1. Cliciwch un gell rydych chi am fewnosod sylw gyda'r data a'r amser cyfredol, ac yna cliciwch ar y dde i ddewis Mewnosodwch Sylw ffurfiwch y ddewislen cyd-destun, gweler y screenshot:

doc-ychwanegu-dyddiad-i-sylw-1

2. Ar ôl mewnosod y sylw, yn y blwch sylwadau, pwyswch CTRL+; i fewnosod y dyddiad cyfredol, a theipio bar gofod, yna pwyswch Ctrl + Shift +; i fewnosod yr amser cyfredol, ac mae'r data a'r amser cyfredol wedi'u hychwanegu at y sylw ar unwaith, gweler y screenshot:

doc-ychwanegu-dyddiad-i-sylw-1

3. Ac yna gallwch olygu eich sylw fel eich angen.


swigen dde glas saeth Auto ychwanegu dyddiad ac amser i wneud sylwadau gyda chod VBA

Os nad ydych yn gyfarwydd â'r bysellau wedi'u torri'n fyr, peidiwch â phoeni, yma, gallaf siarad am god VBA i'ch helpu i fewnosod y dyddiad a'r amser yn awtomatig.

1. Dewiswch y gell rydych chi am fewnosod y sylw.

2. Daliwch i lawr y ALT + F11 allweddi i agor y Ffenestr Microsoft Visual Basic for Applications.

3. Cliciwch Mewnosod > Modiwlau, a gludwch y cod canlynol yn y Ffenestr Modiwl.

Cod VBA: Auto ychwanegu dyddiad ac amser i wneud sylwadau

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. Yna pwyswch F5 allwedd i redeg y cod hwn, a bydd sylw yn cael ei fewnosod i'r gell a ddewiswyd gyda'r dyddiad a'r amser yn awtomatig, a gallwch olygu'r sylw fel eich angen, gweler y screenshot:

doc-ychwanegu-dyddiad-i-sylw-1

Tip: Ni all y VBA hwn weithio os yw'r gell a ddewiswyd eisoes wedi'i mewnosod sylw o'r blaen.


Erthyglau cysylltiedig:

Sut i ailosod pob swydd sylwadau yn Excel?

Sut i dynnu sylw at bob cell gyda sylwadau yn Excel?

Offer Cynhyrchiant Swyddfa Gorau

🤖 Kutools AI Aide: Chwyldro dadansoddi data yn seiliedig ar: Cyflawniad Deallus   |  Cynhyrchu Cod  |  Creu Fformiwlâu Personol  |  Dadansoddi Data a Chynhyrchu Siartiau  |  Invoke Swyddogaethau Kutools...
Nodweddion Poblogaidd: Darganfod, Amlygu neu Adnabod Dyblygiadau   |  Dileu Rhesi Gwag   |  Cyfuno Colofnau neu Gelloedd heb Colli Data   |   Rownd heb Fformiwla ...
Super-edrych: VLookup Meini Prawf Lluosog    VLookup Gwerth Lluosog  |   VLookup Ar Draws Taflenni Lluosog   |   Edrych Niwlog ....
Rhestr gwympo Uwch: Creu Rhestr Gollwng yn Gyflym   |  Rhestr Gollwng Dibynnol   |  Rhestr Gollwng Aml-ddewis ....
Rheolwr Colofn: Ychwanegu Nifer Penodol o Golofnau  |  Symud Colofnau  |  Toglo Statws Gwelededd Colofnau Cudd  |  Cymharwch Ystodau a Cholofnau ...
Nodweddion dan Sylw: Ffocws ar y Grid   |  Golwg Dylunio   |   Bar Fformiwla Mawr    Rheolwr Llyfr Gwaith a Thaflen   |  Llyfrgell Adnoddau (Testun Auto)   |  Dewiswr Dyddiad   |  Cyfuno Taflenni Gwaith   |  Amgryptio/Dadgryptio Celloedd    Anfon E-byst trwy Restr   |  Hidlo Super   |   Hidlo Arbennig (hidlo mewn print trwm/italig/strikethrough...) ...
15 Set Offer Gorau12 Testun offer (Ychwanegu Testun, Dileu Cymeriadau,...)   |   50 + Siart Mathau (Siart Gantt,...)   |   40+ Ymarferol Fformiwlâu (Cyfrifwch oedran yn seiliedig ar ben-blwydd,...)   |   19 mewnosod offer (Mewnosod Cod QR, Mewnosod Llun o'r Llwybr,...)   |   12 Trosi offer (Rhifau i Eiriau, Trosi arian cyfred,...)   |   7 Uno a Hollti offer (Rhesi Cyfuno Uwch, Celloedd Hollt,...)   |   ... a mwy

Supercharge Eich Sgiliau Excel gyda Kutools ar gyfer Excel, a Phrofiad Effeithlonrwydd Fel Erioed Erioed. Kutools ar gyfer Excel Yn Cynnig Dros 300 o Nodweddion Uwch i Hybu Cynhyrchiant ac Arbed Amser.  Cliciwch Yma i Gael Y Nodwedd Sydd Ei Angen Y Mwyaf...

Disgrifiad


Mae Office Tab yn dod â rhyngwyneb Tabbed i Office, ac yn Gwneud Eich Gwaith yn Haws o lawer

  • Galluogi golygu a darllen tabbed yn Word, Excel, PowerPoint, Cyhoeddwr, Mynediad, Visio a Phrosiect.
  • Agor a chreu dogfennau lluosog mewn tabiau newydd o'r un ffenestr, yn hytrach nag mewn ffenestri newydd.
  • Yn cynyddu eich cynhyrchiant 50%, ac yn lleihau cannoedd o gliciau llygoden i chi bob dydd!
Comments (6)
No ratings yet. Be the first to rate!
This comment was minimized by the moderator on the site
Love it. Now, I would like to go one step further. When the cell value is changed, I want a comment inserted into the cell with the date/time the cell value changed. if a cell comment already exists, it will be replaced with the new cell comment. This will eliminate a column on my spreadsheet that tracks when an adjacent cell value is updated. Can you help?
This comment was minimized by the moderator on the site
In this video i will show you the present tense with few examples. Quadratic Equation
This comment was minimized by the moderator on the site
In this video I will show you how the angles are formed with different property. angle calculator
This comment was minimized by the moderator on the site
Hey, you used to write amazing, but the last couple of posts have been kinda boring I miss your tremendous writings. Past couple of posts are just a little out of track! come on! bakdfdebffacdefe
This comment was minimized by the moderator on the site
If you work with a Belgian keyboard then Ctrl + does not work. To add the date in your command use Ctrl ; (semi-colon)
This comment was minimized by the moderator on the site
i encounter run time error in line 6-8 line
There are no comments posted here yet
Please leave your comments in English
Posting as Guest
×
Rate this post:
0   Characters
Suggested Locations