Šiame įraše atkreipsime dėmesį į 3 greitus būdus, kaip įterpti sukurtą arba paskutinį kartą modifikuotą datą į „Word“ dokumentą.
Kiekvieną kartą, kai sukuriame dokumentą, jame yra daug informacijos, pavyzdžiui, sukūrimo data ir paskutinio modifikavimo data. Ši informacija leidžia mums gerai sekti, kaip redagavome dokumentą. Taigi šiandien parodysime būdus, kaip į dokumentą įterpti sukūrimo ar paskutinio modifikavimo datą.
pastabos:
Visų pirma, kai baigsite rengti dokumentą, pirmiausia jį išsaugokite. Taigi, galite turėti naujausią versiją. Tada galite įterpti atitinkamas datas į dokumentą vadovaudamiesi šiomis instrukcijomis.
1 būdas: datą įterpkite rankiniu būdu
Programoje „Word“ galite matyti sukūrimo ir paskutinio modifikavimo datas, jei persijungsite į foną. Tačiau šios informacijos tiesiogiai kopijuoti negalite. Vietoj to atlikite šiuos veiksmus.
- Pirmiausia „Word“ spustelėkite skirtuką „Failas“.
- Tada spustelėkite parinktį „Informacija“, o dešiniajame stulpelyje spustelėkite „Ypatybės“.
- Tada išskleidžiamajame meniu pasirinkite „Išplėstinės savybės“.
- Atsidariusiame lange spustelėkite skirtuką „Bendra“.
- Dabar galite nukopijuoti ir įklijuoti atitinkamą informaciją į dokumentą.
2 būdas: įterpkite lauką
- Pirmiausia tinkamai uždėkite įterpimo žymeklį ir spustelėkite skirtuką „Įterpti“.
- Tada spustelėkite „Quick Parts“ ir pasirinkite „Field“.
- Lauke „Laukas“ kategorijai pasirinkite „Data ir laikas“.
- Tada, norėdami įterpti sukūrimo datą, pasirinkite „CreateDate“ lauko pavadinimą. Ir norėdami įterpti paskutinio modifikavimo datą, pasirinkite „Išsaugoti datą“.
- Tada, jei reikia, pasirinkite datos formatą.
- Galiausiai spustelėkite „Gerai“. Datą turėsite įterpti į pasirinkimą.
3 būdas: paleiskite VBA kodus, kad įterptumėte sukūrimo ir paskutinio modifikavimo datą
- Visų pirma, užveskite žymeklį ten, kur yra datos.
- Tada paspauskite „Alt + F11“, kad atidarytumėte VBA redaktorių.
- Skydelyje „Projektas“ spustelėkite „Įprastas“.
- Tada spustelėkite skirtuką „Įterpti“.
- Pasirinkite „Modulis“.
- Dukart spustelėkite, kad atidarytumėte modulį.
- Įklijuokite šiuos kodus:
Function GetDocDates(strDocPath) As String
Dim objFileSystem As Object
Dim objFile As Object
Dim strDates As String
Set objFileSystem = CreateObject("Scripting.FileSystemObject")
Set objFile = objFileSystem.GetFile(strDocPath)
strDates = "Created Date: " & objFile.DateCreated & vbNewLine & _
"Last Modified Date: " & objFile.DateLastModified
GetDocDates = strDates
Set objFile = Nothing
Set objFileSystem = Nothing
End Function
' Call Function GetDocDates
Sub InsertDocDates()
' Insert dates at selection point.
Selection.InsertAfter GetDocDates(ActiveDocument.FullName)
End Sub
- Įveskite žymeklį į makrokomandą „InsertDocDates“ ir spustelėkite mygtuką „Vykdyti“, kad paleistumėte.
Datos bus įtrauktos į dokumentą taip:
Išspręskite duomenų praradimo problemą
Duomenų praradimas šiandien tapo gana aktualia tema. Visų rūšių informacija dabar tampa skaitmenine. Tai reiškia, kad turime iš anksto visiškai pasiruošti duomenų katastrofai. Ir Word dokumentų sugadinimas yra problema, su kuria galime lengvai susidurti. Todėl siūlome gauti a Žodžių taisymas įrankis rankoje.
Autoriaus įvadas:
Vera Chen yra duomenų atkūrimo ekspertė DataNumen, Inc., kuri yra pasaulyje duomenų atkūrimo technologijų lyderė, įskaitant remontas xls bei pdf programinės įrangos gaminių taisymas. Norėdami gauti daugiau informacijos, apsilankykite WWW.datanumen.com






