Sut i gadw dogfen Word gyda'r dyddiad cyfredol yn enw ffeil?
Awdur: Xiaoyang Wedi'i Addasu Diwethaf: 2024-08-26
Os oes angen ichi ychwanegu'r dyddiad cyfredol yn enw ffeil yn awtomatig wrth arbed dogfen Word, sut allech chi ddelio â'r dasg hon yn ffeil Word?
Cadwch ddogfen Word gyda'r dyddiad cyfredol yn enw ffeil gyda chod VBA
Cadwch ddogfen Word gyda'r dyddiad cyfredol yn enw ffeil gyda chod VBA
I ychwanegu'r dyddiad cyfredol yn awtomatig yn enw'r ffeil wrth gadw'r ddogfen Word, gwnewch y camau canlynol:
1. Daliwch i lawr y ALT + F11 allweddi i agor y Microsoft Visual Basic ar gyfer Ceisiadau ffenestr.
2. Ac yna, cliciwch Mewnosod > Modiwlau, copïo a gludo islaw'r cod i'r modiwl gwag agored:
Cod VBA: Cadw dogfen Word gyda'r dyddiad cyfredol yn enw'r ffeil
Public Sub FileSave1()
Dim xDlg As Dialog
Dim xTitle As String
On Error Resume Next
xTitle = ActiveDocument.BuiltInDocumentProperties("Title").Value
xTitle = xTitle & " " & Format((Year(Now() + 1) Mod 100), "20##") & "-" & _
Format((Month(Now() + 1) Mod 100), "0#") & "-" & _
Format((Day(Now()) Mod 100), "0#")
Set xDlg = Dialogs(wdDialogFileSaveAs)
xDlg.Name = xTitle
xDlg.Show
End Sub
3. Ar ôl pasio'r cod i'r modiwl, pwyswch F5 allwedd i redeg y cod hwn, ac a Save As ffenestr yn cael ei harddangos gyda'r dyddiad cyfredol yn awtomatig i mewn i'r enw ffeil blwch testun, gweler y screenshot:
4. Ac yna, 'ch jyst angen i chi deipio enw eich ffeil eich hun yn ôl yr angen, gweler screenshot:
Gwnewch Mwy mewn Llai o Amser gyda Kutools wedi'i Wella gan AI ar gyfer Word
Nid set o offer yn unig yw Kutools ar gyfer Word - mae'n ddatrysiad smart sydd wedi'i gynllunio i roi hwb i'ch cynhyrchiant. Gyda galluoedd a yrrir gan AI a'r nodweddion mwyaf hanfodol, mae Kutools yn eich helpu i gyflawni mwy mewn llai o amser:
- Cynhyrchu cynnwys sy'n cyfateb yn berffaith i'ch anghenion.
- Trawsnewidiwch eich ysgrifennu gyda dros 20 o arddulliau ysgrifennu, gan sicrhau ei fod yn ddi-fai.
- Crynhowch eich dogfen mewn un clic.
- Cyfieithwch eich cynnwys i dros 40 o ieithoedd yn rhwydd, gan ehangu eich cyrhaeddiad yn fyd-eang.
- Derbyn cymorth a gwybodaeth ar unwaith am eich dogfen.
- Gofynnwch am brosesu dogfennau, ac os oes gan Kutools yr offeryn, bydd y Cynorthwy-ydd AI yn cyflawni'ch tasg ar unwaith ar eich gorchymyn, gan roi pŵer llawn Word ar flaenau eich bysedd.
- Gofynnwch unrhyw gwestiwn heb adael Word - wedi'i integreiddio'n ddi-dor, mae'r Cynorthwy-ydd AI bob amser o fewn cyrraedd.
- Cynhyrchu, ailysgrifennu, crynhoi, a chyfieithu cynnwys gyda chliciau.
- Derbyn cymorth a gwybodaeth ar unwaith am eich dogfen.
- Gofynnwch am brosesu dogfennau, a bydd y Cynorthwy-ydd AI yn cyflwyno'r offeryn cywir ac yn cyflawni'r dasg, neu'n eich tywys trwy'r camau.
- Gofynnwch unrhyw gwestiwn heb adael Word - wedi'i integreiddio'n ddi-dor, mae'r Cynorthwy-ydd AI bob amser o fewn cyrraedd.
Dysgwch fwy am Kutools ar gyfer Word Lawrlwytho Nawr
Offer Cynhyrchiant Swyddfa Gorau
Kutools am Word - 100+ Offer ar gyfer Word
