Į "Microsoft Excel" be vargo galima įterpti išskleidžiamąjį kalendorių. Iš išskleidžiamojo kalendoriaus galite lengvai įterpti bet kurią datą . Taip pat galite sukurti nuorodą į ląstelę su išskleidžiamojo kalendoriaus langeliu, kuriame bus matoma jūsų nustatyta data. Šiame straipsnyje pateikiame vertingą apžvalgą, kaip įterpti išskleidžiamąjį kalendorių "Excel" programoje. Tikiuosi, kad jums bus gana lengva juo naudotis.

Atsisiųsti praktikos sąsiuvinį

Atsisiųskite šį pratybų sąsiuvinį

Žingsnis po žingsnio procedūra išskleidžiamajam kalendoriui įterpti programoje "Excel

Norėdami įterpti išskleidžiamąjį kalendorių "Excel" programoje, parodysime, kaip tai padaryti žingsnis po žingsnio. Visus toliau nurodytus veiksmus tikrai lengva naudoti ir tai pagerina jūsų "Excel" žinias, kad galėtumėte jas pritaikyti didesniam tikslui.

1 veiksmas: juostoje įjunkite skirtuką Kūrėjas

Prieš ką nors darydami dėl išskleidžiamojo kalendoriaus įterpimo "Excel" programoje, turite parodyti skirtukas Kūrėjas kaip "Excel" naudotojas, kai atidarote savo "Excel" darbo knygą, visų pirma, nėra Kūrėjas Taigi, jį reikia pakeisti pritaikant juostą.

Žingsniai

• Pirmiausia spustelėkite Failas skirtukas. Failas skirtuką, pasirinkite Parinktys .

• Tai padės atverti "Excel" parinktys dialogo langą. Pasirinkite Pritaikyti juostelę .

• Dabar dešiniajame kampe yra Lentelės pritaikymas , pasirinkite Pagrindiniai skirtukai iš ten ir Pagrindiniai skirtukai , spustelėkite Kūrėjas parinkties langelį. Po to spustelėkite GERAI . Tai padės atverti Kūrėjas juostos skirtukas.

Skaityti daugiau: Kaip įterpti dieną ir datą programoje "Excel" (3 būdai)

2 žingsnis: Įterpti išskleidžiamąjį kalendorių

Norėdami įterpti išskleidžiamąjį kalendorių, turite atlikti šiuos veiksmus.

Žingsniai

• Pirmiausia pasirinkite Kūrėjas skirtukas. Iš Valdikliai grupę, pasirinkite Įdėkite galimybė.

• Dabar, kai Įdėkite parinktį, spustelėkite Daugiau valdiklių iš ActiveX valdikliai .

• A Daugiau valdiklių pasirodys dialogo langas, pasirinkite "Microsoft" datos ir laiko pasirinkimo valdiklis 6.0 (SP4) Spustelėkite GERAI '.

• Dabar spustelėkite bet kurią ląstelę, į kurią norite įdėti šį .

• Įterpę išskleidžiamąjį kalendorių, pamatysite EMBEDDED formulę formulių juostoje.

Skaitykite daugiau: Kaip "Excel" programoje įterpti datos rinkiklį (žingsnis po žingsnio procedūra)

3 žingsnis: Pritaikyti išskleidžiamąjį kalendorių

Įterpę išskleidžiamąjį kalendorių į pageidaujamą langelį, galite jį pritaikyti.

Žingsniai

• Išskleidžiamąjį kalendorių galite pritaikyti paprasčiausiai vilkdami.

• Galite keisti Savybės savo išskleidžiamojo kalendoriaus dešiniuoju pelės klavišu spustelėdami išskleidžiamąjį kalendorių. Tačiau nepamirškite, kad norėdami tai padaryti, turite išlaikyti Dizaino režimas svetainėje .

• Į Savybės dialogo lange galite keisti aukštį, plotį ir kitus dalykus.

• Išskleidžiamąjį kalendorių galite perkelti į bet kurią vietą tiesiog vilkdami jį į tą vietą.

Skaityti daugiau: Kaip įterpti datą programoje "Excel" (7 paprasti metodai)

Panašūs skaitiniai

• Kaip sujungti datą ir laiką vienoje "Excel" ląstelėje (4 metodai)
• Automatinis datų keitimas naudojant "Excel" formulę
• Kaip automatiškai užpildyti "Excel" datą, kai ląstelė atnaujinama

4 žingsnis: Susieti išskleidžiamąjį kalendorių su "Excel" ląstele

Į Savybės išskleidžiamajame kalendoriuje, galite pamatyti, kad yra LinkedCell ' parinktis. "Excel" negali perskaityti jokios datos iš išskleidžiamojo kalendoriaus, todėl ją reikia susieti su ląstele.

Žingsniai

• Iš Kūrėjas skirtuką, įjunkite Dizaino režimas.

• Dabar, dešiniuoju pelės klavišu spustelėkite išskleidžiamajame kalendoriuje, o iš Kontekstinis meniu , pasirinkite Savybės .

• Į Savybės dialogo lange įrašykite bet kurį langelio numerį į LinkedCell galimybė.

• Dabar pasukite Dizaino režimas išjungti ir išskleidžiamajame kalendoriuje pasirinkti bet kurią datą, ji bus rodoma tame nurodytame langelyje.

• Gali pasirodyti įspėjimo dialogo langas. Spustelėkite GERAI '.

• Pakeiskite Pažymimasis langelis vertė iš Klaidingas į Tiesa į Savybės dialogo lange priimti nulines reikšmes.

• Jei norite pamatyti su tuo susijusį VBA kodą, tiesiog dešiniuoju pelės klavišu spustelėkite išskleidžiamąjį kalendorių ir pasirinkite Peržiūrėti kodą .

Skaityti daugiau: "Excel" automatiškai įveda datą, kai įvedami duomenys (7 paprasti metodai)

Įterpti išskleidžiamąjį kalendorių visame stulpelyje

Dar vieną įdomų dalyką galima padaryti naudojant išskleidžiamąjį kalendorių. Išskleidžiamąjį kalendorių galima įterpti visame stulpelyje arba keliuose stulpeliuose. Spustelėjus bet kurią ląstelę, atsidarys kalendorius, kuriame galėsite pasirinkti datą. Abu šiuos dalykus galima atlikti ypač naudojant VBA kodus.

1. Vieno stulpelio išskleidžiamasis kalendorius

Žingsniai

• Kadangi norime įterpti išskleidžiamąjį kalendorių vienam stulpeliui. Pirmiausia įterpkite išskleidžiamąjį kalendorių naudodami pirmiau nurodytus veiksmus.
• Dabar dešiniuoju pelės klavišu spustelėkite išskleidžiamąjį kalendorių ir pasirinkite Peržiūrėti kodus .

• Kai atidarysite kodo peržiūros parinktį, pasirodys "Visual Basic" sąsaja ir tame lape bus atsitiktinių kodų. Jei turite jį pritaikyti, todėl ištrinkite jį, nukopijuokite toliau pateiktą kodą ir įklijuokite jį ten.

 Sub Worksheet_SelectionChange(ByVal Target As Range) With Sheet3.DTPicker1 .Height = 20 .Width = 20 If Not Intersect(Target, Range("B5:B7")) Is Nothing Then .Visible = True .Top = Target.Top .Left = Target.Offset(0, 1).Left .LinkedCell = Target.Address Else .Visible = False End If End With End Sub 

• Dabar išjunkite Dizaino režimas .
• Pasirinkę bet kurią ląstelę iš pateiktų VBA kodo langelių, kiekvienoje ląstelėje rasite išskleidžiamąjį kalendorių, neviršijantį ląstelės ribos.

VBA kodo paaiškinimas:

 Su Sheet3.DTPicker1 .Height = 20 .Width = 20 

Šis kodas reiškia, kad reikia pasirinkti lapo pavadinimą, kuriame norite taikyti šį kodą, ir datos pasirinkimo numerį. Taip pat galite keisti aukščio ir pločio reikšmes.

 If Not Intersect(Target, Range("B5:B7")) Is Nothing Then .Visible = True 

Šis kodas reiškia, kad pasirinkus bet kurią šio intervalo ląstelę, išskleidžiamasis kalendorius bus matomas kiekvienoje šio intervalo ląstelėje.

 .Top = Target.Top .Left = Target.Offset(0, 1).Left .LinkedCell = Target.Address 

Viršuje savybė žymi nurodytos ląstelės viršutinę priklausomybės vertę.

Kairėje pusėje savybė žymi kitą dešinįjį nurodyto langelio langelį.

LinkedCell c sujungia išskleidžiamąjį kalendorių su nurodytu langeliu.

 Kitaip .Visible = False 

Tai reiškia, kad jei pasirinksite bet kurį kitą langelį, išskyrus šį langelį, išskleidžiamasis kalendorius nebus matomas.

Skaityti daugiau: Kaip automatiškai įterpti datas "Excel" programoje (3 paprasti triukai)

2. Kelių stulpelių išskleidžiamasis kalendorius

Jei norite naudoti išskleidžiamąjį kalendorių keliems stulpeliams, galime atlikti šiuos veiksmus. Atminkite, kad norėdami tai padaryti turite įterpti kelis išskleidžiamus kalendorius.

Žingsniai

• Įterpti kelis išskleidžiamus kalendorius iš Kūrėjas skirtukas.
• Vilkdami perkelkite šiuos išskleidžiamus kalendorius į norimą vietą.
• Norėtume įterpti išskleidžiamąjį kalendorių į stulpelį B ir stulpelis D . Dešiniuoju pelės mygtuku spustelėkite išskleidžiamąjį kalendorių ir pasirinkite Peržiūrėti kodą . Dabar nukopijuokite toliau pateiktą kodą ir įklijuokite jį į tą lapą.

 Private Sub Worksheet_SelectionChange(ByVal Target As Range) With Sheet5.DTPicker1 .Height = 20 .Width = 20 If Not Intersect(Target, Range("B5:B9")) Is Nothing Then .Visible = True .Top = Target.Top .Left = Target.Offset(0, 1).Left .LinkedCell = Target.Address Else .Visible = False End If End With With Sheet5.DTPicker2 .Height = 20.Width = 20 If Not Intersect(Target, Range("D5:D9")) Is Nothing Then .Visible = True .Top = Target.Top .Left = Target.Offset(0, 1).Left .LinkedCell = Target.Address Else .Visible = False End If End With End Sub 

• Tai sukurs du išskleidžiamus kalendorius stulpelyje B ir stulpelis D į tam tikrą intervalą. Į šį intervalą galite įrašyti bet kurią datą iš išskleidžiamojo kalendoriaus.

Pastaba:

Turite pakeisti Pažymimasis langelis iš Klaidingas į Tiesa kad išvengtumėte bet kokio klaidos pranešimo.

Skaityti daugiau: "Excel" makrokomanda: datos ir laiko įterpimas į ląstelę (4 pavyzdžiai)

Išskleidžiamojo kalendoriaus problema

Jei esate aktyvus "Microsoft 365" arba "Microsoft Excel 2019" naudotojas, išskleidžiamojo kalendoriaus nerasite. Šis išskleidžiamasis kalendorius yra tik "Microsoft Excel 2007" ir 32 bitų "Excel 2010", "2013" ir "2016" versijose.

Išvada

Aptarėme išskleidžiamojo kalendoriaus įterpimo į "Excel" programą procesą žingsnis po žingsnio. Taip pat stengėmės parodyti, kaip naudoti išskleidžiamąjį kalendorių tiek viename stulpelyje, tiek keliuose stulpeliuose. Tikiuosi, kad iš šio straipsnio įgysite daug žinių. Jei turite klausimų, nedvejodami klauskite komentarų skiltyje ir nepamirškite apsilankyti mūsų Exceldemy puslapį, kad sužinotumėte daugiau.