Cum să inserați calendarul drop-down în Excel (cu pași rapizi)

Hugh West

30-05-2023 Bazele Excel
  • Imparte Asta
Hugh West

În Microsoft Excel, este fără efort să inserați un calendar derulant. Din calendarul derulant, puteți cu ușurință să introduceți orice dată . de asemenea, puteți crea un link către celula cu calendar derulant în care va fi vizibilă data definită. În acest articol, oferim o prezentare generală valoroasă a modului de inserare a unui calendar derulant în Excel. Sper că veți găsi destul de ușor de utilizat.

Descărcați caietul de practică

Descărcați acest Caiet de practică

Inserare calendar picătură în jos.xlsm

Procedura pas cu pas pentru a insera un calendar picătură în jos în Excel

Pentru a insera un calendar derulant în Excel, vă vom arăta cum să o faceți pas cu pas. Toți pașii următori sunt foarte ușor de utilizat și vă îmbunătățesc cunoștințele despre Excel pentru a le aplica într-un scop mai mare.

Pasul 1: Activați fila Dezvoltator din panglica

Înainte de a face ceva cu privire la inserarea calendarului picătură în jos în Excel, trebuie să arătați fila Dezvoltator de pe panglică. În calitate de utilizator Excel, atunci când deschideți registrul de lucru Excel, în primul rând, nu există nicio Dezvoltator Deci, trebuie să o modificați prin personalizarea panglicii.

Pași

  • În primul rând, faceți clic pe butonul Fișier În fila Fișier selectați fila Opțiuni .

  • Asta va deschide Opțiuni Excel Selectați caseta de dialog. Personalizați panglica .

  • Acum, în colțul din dreapta, există Personalizarea panglicii , selectați Filele principale de acolo, iar în Filele principale , faceți clic pe butonul Dezvoltator După aceea, faceți clic pe OK Acest lucru va deschide fereastra Dezvoltator de pe panglică.

Citește mai mult: Cum să inserați ziua și data în Excel (3 moduri)

Pasul 2: Introduceți un calendar derulant

Pentru a introduce un calendar derulant, trebuie să urmați următorii pași.

Pași

  • În primul rând, selectați Dezvoltator Din fila Controale selectați grupul Introduceți opțiune.

  • Acum, în Introduceți opțiunea, faceți clic pe Mai multe controale de la Controale ActiveX .

  • A Mai multe controale Se va afișa caseta de dialog, selectați Microsoft Date and Time Picker Control 6.0 (SP4) Faceți clic pe ' OK '.

  • Acum, faceți clic pe orice celulă în care doriți să puneți acest lucru .

  • După ce ați inserat calendarul derulant, veți vedea un mesaj EMBEDDED formula în bara de formule.

Citiți mai mult: Cum să inserați un selector de date în Excel (cu o procedură pas cu pas)

Pasul 3: Personalizați Calendarul picătură în jos

După ce ați inserat calendarul derulant în celula preferată, puteți personaliza acest calendar derulant.

Pași

  • Puteți personaliza calendarul derulant prin simpla tragere a acestuia.

  • Puteți modifica Proprietăți din calendarul derulant făcând clic dreapta pe acesta. Dar nu uitați că pentru a face acest lucru trebuie să țineți Mod de proiectare pe .

  • În Proprietăți puteți modifica înălțimea, lățimea și alte câteva lucruri.

  • Puteți plasa calendarul derulant în orice loc prin simpla tragere a acestuia în locul respectiv.

Citește mai mult: Cum să inserați data în Excel (7 metode simple)

Lecturi similare

  • Cum să combinați data și ora într-o singură celulă în Excel (4 metode)
  • Schimbarea automată a datelor utilizând formula în Excel
  • Cum să completați automat data în Excel atunci când celula este actualizată

Pasul 4: Conectați Calendarul picătură în jos la o celulă în Excel

În Proprietăți din calendarul derulant, puteți vedea că există un ' LinkedCell '. Excel nu poate citi nicio dată din calendarul derulant, așa că trebuie să o legați de o celulă.

Pași

  • De la Dezvoltator fila, activați funcția Mod de proiectare.

  • Acum, faceți clic dreapta pe de pe calendarul derulant, iar din fereastra Meniul contextual , selectați Proprietăți .

  • În Proprietăți caseta de dialog, introduceți orice număr de celulă în câmpul LinkedCell opțiune.

  • Acum, întoarceți Modul de proiectare off și selectați orice dată din calendarul derulant, aceasta va apărea în celula respectivă.

  • Este posibil să apară o casetă de dialog de avertizare. Faceți clic pe ' OK '.

  • Schimbați Caseta de control valoarea din Fals la Adevărat în Proprietăți pentru a accepta valori nule.

  • Dacă doriți să vedeți codul VBA asociat cu acest lucru, faceți clic dreapta pe calendarul derulant și selectați Vezi codul .

Citește mai mult: Excel introduce automat data atunci când datele sunt introduse (7 metode ușoare)

Inserarea calendarului drop-down în întreaga coloană

Un alt lucru interesant poate fi făcut prin utilizarea calendarului drop down. Puteți insera un calendar drop down în întreaga coloană sau în mai multe coloane. Ori de câte ori faceți clic pe orice celulă, se va deschide un calendar și puteți selecta o dată de acolo. Ambele lucruri pot fi realizate în special prin coduri VBA.

1. Calendar derulant pentru o singură coloană

Pași

  • Deoarece dorim să introducem un calendar derulant pentru o singură coloană, mai întâi, introduceți calendarul derulant utilizând pașii de mai sus.
  • Acum, faceți clic dreapta pe calendarul derulant și selectați Vezi codurile .

  • Când deschideți opțiunea de vizualizare a codului, va apărea o interfață Visual Basic și există coduri aleatorii în acea foaie. Dacă trebuie să o personalizați, ștergeți-o și copiați următorul cod și lipiți-l acolo. 
 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
  • Acum, opriți Modul de proiectare .
  • Selectați orice celulă din cadrul celulelor date în codul VBA, veți găsi un calendar derulant în fiecare celulă în limita celulei.

Explicația codului VBA: 

 Cu Sheet3.DTPicker1 .Height = 20 .Width = 20

Acest cod indică faptul că trebuie să selectați numele foii în care doriți să aplicați acest cod și numărul selectorului de date. De asemenea, puteți modifica valorile înălțimii și lățimii. 

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

Acest cod indică faptul că, dacă selectați orice celulă din acest interval, calendarul derulant va fi vizibil în fiecare celulă din acest interval. 

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

Top denotă valoarea de top a apartenenței unei celule specificate.

Stânga denotă următoarea celulă din dreapta celulei specificate.

LinkedCell c Conectează calendarul derulant cu celula specificată. 

 Else .Visible = False

Acest lucru indică faptul că, dacă selectați o altă celulă decât cea dată, calendarul derulant nu va fi vizibil.

Citește mai mult: Cum să inserați automat date în Excel (3 trucuri simple)

2. Calendar derulant pentru coloane multiple

Dacă doriți să utilizați calendarul derulant pentru mai multe coloane, puteți urma acești pași. Nu uitați că trebuie să introduceți mai multe calendare derulante pentru a face acest lucru.

Pași

  • Introduceți mai multe calendare derulante din Dezvoltator tab.
  • Așezați aceste calendare derulante în poziția dorită prin tragere.
  • Am dori să inserăm un calendar derulant în coloană B și coloana D Faceți clic dreapta pe calendarul derulant și selectați Vezi codul Acum, copiați următorul cod și lipiți-l în foaia respectivă. 
 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 If With 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
  • Aceasta va crea două calendare derulante în coloana B și coloana D Puteți introduce orice dată din calendarul derulant în intervalul respectiv.

Notă:

Trebuie să vă schimbați CheckBox de la Fals la Adevărat pentru a evita orice mesaj de eroare.

Citiți mai mult: Macro Excel: Introduceți data și ora într-o celulă (4 exemple)

Problemă cu Calendarul picătură în jos

Dacă sunteți un utilizator activ de Microsoft 365 sau Microsoft Excel 2019, nu veți găsi calendarul derulant. Acest calendar derulant este disponibil numai în Microsoft Excel 2007 și în versiunile pe 32 de biți ale Excel 2010,2013 și 2016.

Concluzie

Am discutat procesul pas cu pas pentru a insera calendarul drop down în Excel. Am încercat, de asemenea, să arătăm cum să folosim un calendar drop down atât pentru coloana unică, cât și pentru coloane multiple. Sper că puteți obține multe cunoștințe din acest articol. Dacă aveți întrebări, nu ezitați să le puneți în secțiunea de comentarii și nu uitați să vizitați pagina noastră de Exceldemy pentru mai multe informații.

Postarea anterioară Există o problemă cu Clipboard în Excel
Postarea următoare Cum să adăugați caseta de selectare în Excel fără a utiliza fila Dezvoltator (3 metode)

Hugh West este un trainer și analist Excel cu o experiență de peste 10 ani în industrie. Deține o diplomă de licență în contabilitate și finanțe și un master în administrarea afacerilor. Hugh are o pasiune pentru predare și a dezvoltat o abordare unică de predare care este ușor de urmărit și de înțeles. Cunoștințele sale experte despre Excel au ajutat mii de studenți și profesioniști din întreaga lume să-și îmbunătățească abilitățile și să exceleze în cariera lor. Prin blogul său, Hugh își împărtășește cunoștințele lumii, oferind tutoriale gratuite Excel și instruire online pentru a ajuta persoanele și companiile să-și atingă întregul potențial.