Як в Ексель зробити список, що випадає?

Для того, щоб зробити список, що випадає в Excel, зробимо насамперед звичайний список. У вікні програми вводимо, послідовно, наприклад, список канцтоварів.

Після введення вибираємо діапазон або осередок, в якій буде випадає список з перерахованих приладдя. Заходимо в пункт меню дані    Перевірка даних . У вікні вибираємо Тип даних    Список . У полі джерело вибираємо діапазон з нашим списком $A $ 1:$A$8 і натиснемо кнопку  Ок .

Після цього в обраній комірці D1 з'явиться список, що випадає з канцтоварами. Таким чином ми зробили випадаючий список для однієї комірки.

Тепер виконаємо ті ж маніпуляції, тільки тепер виберемо діапазон, в якому буде список, що випадає. Для цього вибираємо діапазон осередків, а не ону, робимо ті дії, що описані вище. Після цього у виділеній області в кожній клітинці буде випадаючий список.

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

Private Sub Worksheet_Change(ByVal Target As Range)
 On Error Resume Next
 If Not Intersect(Target, Range("C2:C5")) Is Nothing And Target.Cells.Count = 1 Then
  Application.EnableEvents = False
  newVal = Target
  Application.Undo
  oldval = Target
  If Len(oldval) <> 0 And oldval <> newVal Then
   Target = Target & "," & newVal
  Else
   Target = newVal
  End If
  If Len(newVal) = 0 Then Target.ClearContents
  Application.EnableEvents = True
 End If
End Sub

Щоб ним скористатися зробимо наступне: натиснемо по листу правою кнопкою миші і виберемо пункт оригінальний текст .

Відкриється вікно Visual Basic. Вставимо вище вказаний скрипт в вікно і змінимо діапазон на потрібний вам B1:b8. натиснемо піктограму із зображенням дискети або Ctrl+S - це допоможе нам зберегти зміни. Після цього переходимо у вікно де список і дивимося, чи з'явилася можливість вибрати значення зі списку. У кожній клітинці вибраного нами діапазону тепер буде накопичуватися випадаючий список.