Как да вмъкнете програма за избор на дата в Excel (с процедура стъпка по стъпка)

Hugh West

23-10-2023 Разширен Excel
  • Споделя Това
Hugh West

В Microsoft Excel има много важни инструменти, които създават чудесно потребителско изживяване. Един от тях е Date Picker (Избор на дата). С този инструмент можете да вмъкване на произволна дата и час в работен лист. Той се появява като календар . Можете да изберете дата от това. В този урок ще се научите да вмъквате програма за избор на дата в Excel с подходящи примери и подходящи илюстрации. Много подробности ще бъдат представени в следващите раздели. Така че се надявам да останете с нас.

Изтегляне на работна тетрадка за практика

Вмъкване на Date Picker.xlsm

Защо е полезно да избирате дата в Excel?

Сега хората обичат да работят с потребителски интерфейси. Това облекчава стреса в работата. въвеждане на дата в клетка? Като я въведете в клетката, нали? Всички знаем, че въвеждането е забързано. Какво става, ако имате 500 реда в набор от данни? Не бихте искали да вмъквате всички дати ръчно в Excel!

На помощ идва инструментът Date Picker. Това е изскачащ календар, който можете да използвате, за да вмъкване на дати и да ги контролирате. Погледнете следната снимка на екрана:

Можете да видите инструмента за избор на дата тук. С този инструмент можете да изберете всяка дата и да извършвате всякакви операции в Microsoft Excel.

Ръководство стъпка по стъпка за вмъкване на програма за избор на дата в Excel

В следващите раздели ще ви предоставим ръководство стъпка по стъпка за вмъкване на програма за избор на дата в Excel. Препоръчваме ви да разгледате внимателно и да научите всички тези стъпки. Това очевидно ще развие знанията ви за Excel.

1. Активирайте раздела Developer в Excel за избор на дата

На първо място, този инструмент за избор на дата е наличен само в Разработчик Така че, преди да започнете, трябва да активирате раздела за разработчици в Microsoft Excel.

Затова нека първо активираме раздела за разработчици.

📌 Стъпки

  • Първо, щракнете върху Файл таб.
  • След това щракнете върху Опция .

  • Сега, от Опции на Excel диалогов прозорец, щракнете върху Персонализиране на лентата опция от лявата страна.

  • От дясната страна на прозорците изберете Основни раздели .
  • Накрая проверете Разработчик кутия.

Както можете да видите от лентата на Excel, успешно вмъкваме раздела Developer (Разработчик) в Microsoft Excel.

Прочетете още: Как да вмъкнете ден и дата в Excel (3 начина)

2. Вмъкване на програма за избор на дата

Време е да вмъкнете органа за избор на дата в работния лист. Следвайте тези стъпки, за да направите това.

📌 Стъпки

  • Първо, отидете в Разработчик таб.
  • От Контроли щракнете върху Вмъкване на .

  • От Контроли ActiveX , щракнете върху Още контроли.

  • Сега изберете Контрол за избор на дата и час на Microsoft 6.0 (SP6) от Повече контроли диалогов прозорец.

  • След това щракнете върху ОК .
  • Накрая щракнете върху клетката, в която искате да вмъкнете избор на дата.

Както виждате, в клетката сме вмъкнали контрол за избор на дата.

Когато вмъкнете контрола за избор на дата в работния лист, ще видите EMBEDDED формула в лентата с формули.

Това означава какъв тип контрол е имплантиран в този работен лист. Запомнете, че не можете да го промените. Ще се покаже " Препратката не е валидна " грешка, ако направите това.

Прочетете още: Как да комбинирате дата и час в една клетка в Excel (4 метода)

3. Персонализиране на органа за избор на дата

Можете да видите, че контролът за избор на дата не изглежда добре тук. Затова трябва да го персонализираме, за да изглежда по-добре.

Когато вмъкнете органа за избор на дата, автоматично се активира режимът за проектиране. Той ви позволява да го променяте. Разбира се, ще го направим. Ще променим размера му, а също и някои от свойствата му.

📌 Стъпки

  • За да го увеличите или намалите, можете просто да плъзнете бутона за избор на дата.

  • Докато Дизайн щракнете с десния бутон на мишката върху бутона за избор на дата. След това щракнете върху Имоти .

  • Тук ще видите различни опции. Ще работим с няколко от тях.

  • Можете да променяте височината, ширината, шрифта, цвета и др.
  • Сега плъзнете органа за избор на дата до мястото на клетката, в която искате да го поставите.

Сега нашият инструмент за избор на дата е почти готов. Остава само да свържем календара с клетка.

Прочетете още: Как да вмъкнете дата в долния колонтитул в Excel (3 начина)

4. Свързване на контролата за избор на дата с клетка

Може би си мислите, че сме го вмъкнали и сега можем да извършваме всякаква процедура. Но тук има уловка. Можете да извършвате всякаква операция, без да свържете органа за избор на дата с клетка. Microsoft Excel няма да разпознае автоматично датата, свързана с която и да е клетка. Не забравяйте, че без това няма да работи нито една формула.

📌 Стъпки

  • Първо щракнете с десния бутон на мишката върху органа за избор на дата.

  • От контекстното меню щракнете върху Имоти .

  • Сега, в Свързана клетка въведете референтната клетка, която искате да свържете.

  • Когато изберете дата от календара, автоматично ще видите датата в свързаната клетка. ОК ако Excel показва " Не мога да задам стойността на клетката като NULL... " грешка.
  • За да приемете нулеви стойности, променете стойността от FALSE към TRUE в CheckBox.

  • Ако щракнете с десния бутон на мишката върху органа за избор на дата и щракнете върху Вижте кода ще видите свързаните с него VBA кодове.

Прочетете още: Автоматично въвеждане на дата в Excel при въвеждане на данни (7 лесни метода)

Как да вмъкнете програма за избор на дата в цяла колона в Excel

Това, което направихме досега, е да вмъкнем програма за избор на дата в клетка. Можем да вмъкнем програма за избор на дата в диапазон от клетки или в конкретна колона. Когато щракнете върху клетката, ще се покаже календар и ще можете да изберете дата от него. В следващите раздели ще ви покажем как да вмъкнете както единични, така и множество колони.

1. Вмъкване на програма за избор на дата за една колона

📌 Стъпки

  • За да зададете избор на дата на цяла колона, щракнете с десния бутон на мишката върху избор на дата. След това щракнете върху Вижте кода .

  • След това ще видите някои кодове, ако сте ги персонализирали.
  • Сега изчистете VBA и въведете следния код, който показваме тук: 
 Sub Worksheet_SelectionChange(ByVal Target As Range) With Sheet1.DTPicker1 .Height = 20 .Width = 20 If Not Intersect(Target, Range("B:B")) 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

Този код основно задава колона B като програма за избор на дата.

  • Сега отменете избора на режим Дизайн.
  • След това щракнете върху която и да е клетка, за да премахнете функцията за избор на дата.
  • Сега щракнете върху която и да е клетка от колона B . Ще видите контрол за избор на дата от всяка клетка.

Обяснения на кодове: 

 С Sheet1.DTPicker1 .Height = 20 .Width = 20

Този код демонстрира номера на листа (Запомнете номера на листа, дори ако сте променили името му) и номера на избирателя на дата. Тук имаме лист1(основен лист Datepicker) и избирател на дата 1. Височина и ширина, които задавате ръчно. 

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

Този код показва, че ако някоя клетка от колона B е избрана, ще се види функцията за избор на дата. Или можете да зададете потребителски диапазон като Range("B5:B14") . Това ще зададе избор на дата само за тези конкретни клетки в колоната B . 

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

" топ " означава, че той се движи заедно с горната граница на посочената клетка. Той е еквивалентен на стойността на "горната" принадлежност на посочената клетка.

" Вляво " свойството е еквивалентно на следващата дясна клетка (на клетката, която сте посочили). Това е дължината на лявата граница от външната лява страна на работния лист. Използвахме функцията за отместване, за да получим референцията на дясната клетка.

" LinkedCell " свързва функцията за избор на дата с целевата клетка. Когато изберем датата от падащото меню, тя ще бъде въведена в клетката. 

 В противен случай .Visible = False

Когато изберете друга клетка, а не клетка от колона C , няма да се появи избор на дата.

2. Вмъкване на програма за избор на дата за няколко колони

Сега, ако искате да зададете няколко колони с избор на дата, трябва да направите проста промяна. Не забравяйте, че преди да зададете няколко колони с избиратели на дати, трябва отново да вмъкнете друг избирател на дати.

Ако искате да зададете избор на дата за съседни колони, не е необходимо да пишете друг сегмент от кода. Просто променете в IF сегмент: 

 If Not Intersect(Target, Range("C:D")) Is Nothing Then

Следващият код ще зададе избор на дата за колоните B, D, E, G:

Тук не задаваме избор на дата в цялата колона, а го вмъкваме в диапазон от клетки. Избор на дата 1 за B5:B14, избор на дата 2 за D5:E14 и избор на дата 3 за G5:G14. 

 Private Sub Worksheet_SelectionChange(ByVal Target As Range) With Sheet1.DTPicker1 .Height = 20 .Width = 20 If Not Intersect(Target, Range("B5:B14")) 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 Sheet1.DTPicker2 .Height = 20 .Width = 20 If Not Intersect(Target, Range("D5:E14")) Is NothingТогава .Visible = True .Top = Target.Top .Left = Target.Offset(0, 1).Left .LinkedCell = Target.Address В противен случай .Visible = False End If End With With Sheet1.DTPicker3 .Height = 20 .Width = 20 If Not Intersect(Target, Range("H5:H14")) Is Nothing Then .Visible = True .Top = Target.Top .Left = Target.Offset(0, 1).Left .LinkedCell = Target.Address В противен случай .Visible = False End If End With End Sub

Вижте тук, имаме три опции за избор на дата. Една за колона B , един за колони D и E и още една за колона G . След като щракнете върху всяка клетка от тези колони, ще видите календар. По този начин можете да вмъкнете програма за избор на дата за няколко колони в Excel.

Голям проблем с избирателя на дати в Excel

Ако използвате 64-битов софтуер на Microsoft Excel или използвате Excel 365 или Excel 2019, вече сте объркани. Това е така, защото не сте могли да намерите избор на дата в ActiveX контрол.

Съжаляваме, че контролът Date Picker на Microsoft е наличен само в 32-битовите версии на Excel 2016, Excel 2013 и Excel 2010, но няма да работи в 64-битовата версия на Excel. Така че, ако наистина искате да вмъкнете календар в работния си лист, използвайте някой календар на трета страна. Надявам се, че Microsoft ще въведе някакъв вид избор на дата в бъдеще.

💬 Нещата, които трябва да запомните

✎ Уверете се, че сте свързали функцията за избор на дата с клетка, ако работите с такава.

✎ Вашият файл трябва да бъде запазен като Работна книга с активирани макроси (.xlsm).

✎ За да направите промени в органа за избор на дата, не забравяйте да го изберете от раздела за разработчици.

✎ За да видите промените от VBA кодовете, премахнете избора на избор на дата.

Заключение

В заключение, надявам се, че този урок ви е предоставил част от полезните знания за вмъкване на програма за избор на дата в Excel. Препоръчваме ви да научите и приложите всички тези инструкции към вашата съвкупност от данни. Изтеглете работната тетрадка за упражнения и ги изпробвайте сами. Също така, не се колебайте да дадете обратна връзка в раздела за коментари. Вашата ценна обратна връзка ни мотивира да създаваме подобни уроци.

Не забравяйте да проверите нашия уебсайт Exceldemy.com за различни проблеми и решения, свързани с Excel.

Продължавайте да изучавате нови методи и да се развивате!

Предишна публикация Как да промените малките букви на големите в Excel без формула
Следваща публикация Как да закръгляме до най-близките 1000 в Excel (7 лесни метода)

Хю Уест е опитен обучител и анализатор на Excel с над 10 години опит в индустрията. Има бакалавърска степен по счетоводство и финанси и магистърска степен по бизнес администрация. Хю има страст към преподаването и е разработил уникален подход на преподаване, който е лесен за следване и разбиране. Неговите експертни познания по Excel са помогнали на хиляди студенти и професионалисти по целия свят да подобрят уменията си и да постигнат отлични резултати в кариерата си. Чрез своя блог Хю споделя знанията си със света, като предлага безплатни уроци за Excel и онлайн обучение, за да помогне на хората и фирмите да достигнат пълния си потенциал.