Як встановити значення за замовчуванням у розкривному списку перевірки даних у Excel?
Встановлення значення за замовчуванням у розкривному списку перевірки даних допомагає іншим легко ідентифікувати клітинки випадаючого списку одним поглядом на робочому аркуші. Ця стаття пропонує метод VBA для детального встановлення значення за замовчуванням у розкривному списку перевірки даних.
Встановіть значення за замовчуванням у розкривному списку перевірки даних за допомогою коду VBA
Встановіть значення за замовчуванням у розкривному списку перевірки даних за допомогою коду VBA
Як показано на скріншоті, припустимо, що всі комірки в діапазоні B2: C7 містять випадаючий список, і ви хочете встановити значення за замовчуванням (говорить - Виберіть зі списку -) у цьому розкривному списку перед вибором значень із них. Ви можете спробувати наступний код VBA.
1. Клацніть правою кнопкою миші вкладку аркуша зі спадними списками, які потрібно встановити за замовчуванням, а потім натисніть Переглянути код з меню.
2 В Microsoft Visual Basic для додатків вікно, скопіюйте та вставте наступний код VBA у вікно коду.
Код VBA: встановіть значення за замовчуванням у розкривному списку перевірки даних
Sub DropDownListToDefault()
Dim xCell As Range
Dim xRg As Range
Dim xAcCell As Range
Dim xScreen As Boolean
On Error Resume Next
Set xAcCell = Application.ActiveCell
Set xRg = ActiveSheet.UsedRange.SpecialCells(xlCellTypeAllValidation)
If xRg Is Nothing Then
MsgBox "No data validation drop-down lists in current worksheet", vbInformation, "Kutools for Excel"
Exit Sub
End If
xScreen = Application.ScreenUpdating
Application.ScreenUpdating = False
For Each xCell In xRg
If xCell.Validation.Type = 3 Then
If xCell.Value = "" Then xCell.Value = "'- Choose from the list -"
End If
Next
xAcCell.Select
Application.ScreenUpdating = xScreen
End Subпримітки: Ви можете змінити значення за замовчуванням у коді VBA на потрібне.
6 Натисніть кнопку F5 клавіша для запуску коду. Ви можете бачити, що значення за замовчуванням додаються до всіх комірок випадаючого списку, як показано нижче.
примітки:
Статті по темі:
- Як здійснити автозаповнення під час набору тексту у випадаючому списку Excel?
- Як створити календар випадаючого списку в Excel?
- Як створити розкривний список у Excel, який можна знайти?
- Як створити випадаючий список із декількома виділеннями або значеннями в Excel?
- Як автоматично заповнити інші комірки при виборі значень у випадаючому списку Excel?
Найкращі інструменти продуктивності офісу
Покращуйте свої навички Excel за допомогою Kutools для Excel і відчуйте ефективність, як ніколи раніше. Kutools для Excel пропонує понад 300 додаткових функцій для підвищення продуктивності та економії часу. Натисніть тут, щоб отримати функцію, яка вам найбільше потрібна...
Вкладка Office Передає інтерфейс із вкладками в Office і значно полегшує вашу роботу
- Увімкніть редагування та читання на вкладках у Word, Excel, PowerPoint, Publisher, Access, Visio та Project.
- Відкривайте та створюйте кілька документів на нових вкладках того самого вікна, а не в нових вікнах.
- Збільшує вашу продуктивність на 50% та зменшує сотні клацань миші для вас щодня!
