Tip: Mae ieithoedd eraill yn Google-Cyfieithu. Gallwch ymweld â'r English fersiwn o'r ddolen hon.
Mewngofnodi
x
or
x
x
cofrestr
x

or

Sut i ychwanegu taflen waith newydd gyda'r dyddiad cyfredol yn Excel?

Efallai y bydd angen i rai o bobl ariannol a gwerthiant osod taflen waith newydd gyda'r dyddiad cyfredol bob dydd ar gyfer ystadegau gwaith dyddiol. Os byddwch yn mewnosod taflen waith newydd ac yna ei ailenwi â llaw, bydd yn anodd. Heddiw, byddaf yn cyflwyno rhai driciau cyflym i ddelio â'r broblem hon.

Ychwanegwch daflen waith newydd gyda'r dyddiad cyfredol trwy ddefnyddio cod VBA

Ychwanegu taflenni gwaith newydd gyda dyddiad dilyniannol trwy ddefnyddio Kutools ar gyfer Excel


swigod saeth cywir glas Ychwanegwch daflen waith newydd gyda'r dyddiad cyfredol trwy ddefnyddio cod VBA


Bydd y cod VBA canlynol yn eich helpu i fewnosod taflen waith newydd gyda'r dyddiad cyfredol pan fyddwch chi'n rhedeg y cod bob dydd.

1. Dal i lawr y ALT + F11 allweddi, ac mae'n agor y Microsoft Visual Basic ar gyfer Ffenestri Ceisiadau.

2. Cliciwch Mewnosod > Modiwlau, a gludwch y macro canlynol yn y Ffenestr modiwl.

Cod VBA: Ychwanegwch daflen waith newydd gyda'r dyddiad cyfredol

Sub AddSheets_TodayDate()
'Updateby20140717
    Dim szTodayDate As String
    szTodayDate = Format(Date, "mmm-dd-yyyy")
    On Error GoTo MakeSheet
    Sheets(szTodayDate).Activate
    Exit Sub
MakeSheet:
    Sheets.Add , Worksheets(Worksheets.Count)
    ActiveSheet.Name = szTodayDate
End Sub

3. Yna, pwyswch F5 allweddol i redeg y cod hwn, ac mae taflen newydd gyda dyddiad heddiw wedi ei fewnosod ar ôl taflenni gwaith presennol. Gweler y sgrin:

doc-add-sheet-with-date-1

Nodyn: Pan fyddwch chi'n achub a chau'r llyfr gwaith hwn, cadwch ef fel Llyfr Gwaith Excel Macro-Enabled fformat trwy glicio ffeil > Save As. A phan fyddwch yn lansio'r llyfr gwaith y diwrnod nesaf, gwnewch yn siŵr eich bod yn clicio Galluogi cynnwys, fel y gallwch chi redeg y cod yn llwyddiannus i ychwanegu taflen waith ddyddiad newydd.


swigod saeth cywir glas Ychwanegu taflenni gwaith newydd gyda dyddiad dilyniannol trwy ddefnyddio Kutools ar gyfer Excel

Gall y cod uchod eich helpu i fewnosod dim ond un daflen waith gyda dyddiad y dydd cyfredol ar y tro, os ydych chi eisiau gosod taflenni gwaith lluosog gyda dyddiad dilyniannol, y cyfleustod hwn Creu Taflenni Gwaith Sequence of Kutools ar gyfer Excel a wnewch chi o blaid.

Kutools ar gyfer Excel yn cynnwys mwy na 300 offer llaw defnyddiol. Am ddim i geisio heb gyfyngiad mewn dyddiau 30. Get it Now.

Os ydych wedi gosod Kutools ar gyfer Excel, gwnewch fel a ganlyn:

1. Mewn celloedd gwag, nodwch ddyddiad heddiw, ac wedyn llusgo'r daflen lenwi i lenwi'r celloedd gyda'r drefn ddyddiad ag y bydd ei angen arnoch.

doc-add-sheet-with-date-1

2. Yna cliciwch Menter > Offer Taflenni Gwaith > Creu Taflenni Gwaith Sequence, gweler y sgrin:

doc-add-sheet-with-date-1

3. Yn y Creu Taflenni Gwaith Sequence blwch deialog, nodwch daflen waith yr ydych am i'r taflenni newydd yn seiliedig arnynt Taflen Waith Sylfaenol rhestr ostwng. Ac yna dewiswch Data mewn amrediad opsiwn o dan Enwau taflenni yn seiliedig ar adran i ddewis ystod o ddata yr ydych am ei ddefnyddio fel enwau'r daflen. Gweler y sgrin:

doc-add-sheet-with-date-1

4. Yna cliciwch OK, a bydd llyfr gwaith newydd yn cael ei greu gyda'r enwau taflenni yn gyfres dyddiad. Gweler y sgrin:

doc-add-sheet-with-date-1

I wybod mwy am y nodwedd Creu Taflenni Gwaith Sequence hwn.


Erthygl gysylltiedig:

Sut i greu taflenni gwaith dilyniant o ystod o gelloedd yn Excel?



Offer Cynhyrchiant a Argymhellir

Tab Swyddfa

star1 aur Dewch â thafiau defnyddiol i Excel a meddalwedd Swyddfa eraill, yn union fel Chrome, Firefox a Internet Explorer newydd.

Kutools ar gyfer Excel

star1 aur Yn rhyfeddol! Cynyddu eich cynhyrchedd mewn munudau 5. Peidiwch ag angen unrhyw sgiliau arbennig, arbed dwy awr bob dydd!

star1 aur 300 Nodweddion Newydd ar gyfer Excel, Gwnewch Excel Yn Fach Hawdd a Phwerus:

  • Cyfuno Cell / Rows / Colofnau heb Colli Data.
  • Cyfuno a Chyfuno Taflenni Lluosog a Llyfrau Gwaith.
  • Cymharwch Rangau, Copi Lluosog, Trosi Testun hyd yma, Uned ac Addasu Arian.
  • Count by Colors, Subtotals Paging, Trefnu Uwch ac Uwch Hidlo,
  • Mwy Dethol / Mewnosod / Delete / Text / Format / Link / Comment / Llyfrau Gwaith / Taflenni Gwaith Offer ...

Sgrîn sgript o Kutools ar gyfer Excel

Say something here...
symbols left.
You are guest ( Sign Up? )
or post as a guest, but your post won't be published automatically.
Loading comment... The comment will be refreshed after 00:00.

Be the first to comment.