I den här artikeln visar vi dig ett intressant knep för att infoga ett framtida eller förflutet datum i ditt Word-dokument via VBA-koder.
Generellt sett har vi inga svårigheter att infoga ett aktuellt datum i vårt Word-dokument. Men då och då kunde vi förbereda oss för det dokument som behövs nästa vecka eller månad eller till och med senare. Så här är problemet du inte kan kringgå. Hur kan du infoga ett framtida datum i Word-filen? Och ibland vad sägs om en tidigare ens?
Det är därför vi tror att du måste förstå den här användbara metoden för att bättre utföra dina arbetsuppgifter.
Använd VBA-koder för att infoga ett framtida eller klistra in datum
- Till att börja med öppnar du ditt Word-dokument.
- Klicka sedan på fliken "Utvecklare".
- Klicka sedan på “Visual Basic” för att öppna VBA-redigeraren. Om fliken "Utvecklare" inte finns i ditt Word-band kan du trycka på "Alt + F11" för att öppna redigeraren istället.
- Klicka nu på "Normal" till vänster i redigeraren.
- Klicka sedan på "Infoga" i verktygsfältet.
- Välj sedan ”Modul” från listmenyn.
- Dubbelklicka nu på den nyligen infogade modulen och redigeringsområdet ska vara tillgängligt på höger sida.
- Klistra bara in följande koder där:
Sub InsertFutureOrPastDate()
Dim strNumberOfDays As String
' Input the number of days you want to insert from today to the future or past date.
strNumberOfDays = InputBox("Please input the number of days you want to insert", "future or past date", "Input here.For exemple,input 1 to insert the date of tomorrow")
' Insert the future or past date according to the inputed number of days
If strNumberOfDays <> "" Then
Selection.TypeText Text:=Format(Date + strNumberOfDays, "dddd, MMMM dd, yyyy")
End If
End Sub
- Klicka sedan på “Spara” -knappen och stäng VBA-redigeraren.
- Byt nu tillbaka till Word-dokumentskärmen och placera markören på den plats där framtida eller tidigare datum går.
- Klicka sedan på fliken "Utvecklare" igen.
- Och klicka på "Makron" i gruppen "Kod" för att öppna fönstret "Makron". Återigen om fliken “Developer” inte visas behöver du bara trycka på “Alt + F8”.
- Nu i fönstret "Makron", hitta och välj "InsertFutureOrPastDate" makro.
- Klicka sedan på "Kör".
- Då hälsas du av en meddelanderuta. Du kan ange ett nummer i textrutan längst ner i rutan för att representera dagarna kvar till det framtida datumet. Om du till exempel vill infoga morgondagens datum ska du ange "1" där. På samma sätt, om du behöver ett förflutet datum, lägg bara till ett minustecken före värdet, till exempel “-1” för igår.
- Kom ihåg att klicka på “OK”.
Obs: I koder ”Selection.TypeText Text: = Format (Date + strNumberOfDays,“ dddd, MMMM dd, yyyy ”),“ dddd, MMMM dd, yyyy ”representerar datumformatet där“ M ”står för“ månad ” , "D" för "dag", "y" för "år" och "dddd" för "vecka", så du är fri att ändra det som du vill.
Återställ dina värdefulla filer
Word är mottagligt för kollaps vilket gör att våra Word-filer är i fara. Ibland är några av våra ovärderliga uppgifter bara borta. Men vad som är borta är inte helt borta. Du kan sitta för att klaga över förlusten av dina kritiska filer eller så kan du välja en skicklig skadad Word-återställningsverktyg att hämta dem.
Författarintroduktion:
Vera Chen är en dataåterställningsexpert i DataNumen, Inc., som är världsledande inom teknik för återställning av data, inklusive Reparation av Excel xls-filproblem och pdf reparera programvaruprodukter. För mer information besök www.datanumen.com