Додайте випадаючий список до комірки та включіть його початкове значення

Я хочу додати випадаючий список до осередку A1 (який має значення 2) У випадаючому списку є декілька елементів ("кішки", "собаки", "мавпи сиру") Це легко.

Однак, я хочу включити початкове значення клітинки (2) як частину списку динамічно. Отже, це має виглядати так:

2
cats
dogs
cheese monkeys

Верхнє значення (2) має бути легко змінено (як і звичайна клітина), а також включати інші (не динамічні) стани.

Це необхідно зробити без додавання додаткових "примарних" (прихованих) опорних осередків на лист розкладки. Це також необхідно зробити без VBA / макросів, оскільки файл повинен бути .XLSX. Чи можливий цей гібрид звичайної клітини / випадаючого списку?

Де зберігається ваш список?

Якщо ви хочете ввести дані в комірку А1, і ви перерахуєте B1: B4, то просто встановіть формулу в B1 = A1 і у вас є випадаючий список, включаючи початкове значення.

Не впевнений, що це кваліфікується як примарна клітина, але списки зазвичай зберігаються десь на робочому аркуші.

Якщо ви просто хочете зберегти його у спливаючому вікні перевірки даних, я не думаю, що це можливо.

Введіть наступні Макрос події в області коду робочого листа:

Private Sub Worksheet_Change(ByVal Target As Range)
If Intersect(Range("A1"), Target) Is Nothing Then Exit Sub
t = Target.Text & ","
t2 = t & "cats,dogs,cheeese monkeys"
Application.EnableEvents = False
With Target.Validation
        .Delete
        .Add Type:=xlValidateList, AlertStyle:=xlValidAlertStop, Operator:= _
        xlBetween, Formula1:=t2
        .IgnoreBlank = True
        .InCellDropdown = True
        .InputTitle = ""
        .ErrorTitle = ""
        .InputMessage = ""
        .ErrorMessage = ""
        .ShowInput = True
        .ShowError = False
End With
Application.EnableEvents = True
End Sub

Потім введіть значення в комірку A1 .

Оскільки це код робочого листа, його дуже легко встановити та використовувати автоматично:

1. клацніть правою кнопкою миші на імені вкладки біля нижньої частини вікна Excel
2. виберіть Переглянути код - це відкриває вікно VBE
3. вставте матеріал і закрийте вікно VBE

Якщо у вас виникли зауваження, спочатку спробуйте його на тестовому аркуші.

Якщо ви збережете книгу, макрос буде збережено з нею. Якщо ви використовуєте версію Excel пізніше 2003, ви повинні зберегти файл .xlsm, а не .xlsx

Щоб видалити макрос:

1. відкрийте вікна VBE, як описано вище
2. очистіть код
3. закрийте вікно VBE

Щоб дізнатися більше про макроси в цілому, див.

http://www.mvps.org/dmcritchie/excel/getstarted.htm

і

http://msdn.microsoft.com/en-us/library/ee814735(v=office.14).aspx

Докладніше про макроси подій (код робочого листа) див.

http://www.mvps.org/dmcritchie/excel/event.htm

Для цього потрібно ввімкнути макроси!