В Excel VBA раскрывающийся список отображается только один раз для каждого отдельного значения в упорядоченном столбце, содержащем дубликаты. - PullRequest
Новая
       7

В Excel VBA раскрывающийся список отображается только один раз для каждого отдельного значения в упорядоченном столбце, содержащем дубликаты.

0 голосов
/ 16 ноября 2018

У меня есть один упорядоченный столбец, ColumnA, содержащий список идентификаторов с некоторыми дубликатами. У меня есть другой столбец, ColumnB, с независимым раскрывающимся списком рядом с каждым идентификатором (включая дубликаты) в ColumnA. Выпадающий список одинаков для каждого значения в столбце А. Я хотел бы сделать так, чтобы раскрывающийся список появлялся только один раз для каждого отдельного идентификатора, а раскрывающийся список заполнял ячейки в ColumnB одинаковыми соответствующими идентификаторами.

Буду очень признателен за любые указатели или указания.

На данный момент у меня есть следующий код для выпадающего списка (по общему признанию, взят и отредактирован из другого Q & A переполнения стека): 

LastRow = 6 + ThisWorkbook.Worksheets(p_CurrentWorkbook).Cells(Rows.count, ActiveCell.Column).End(xlUp).row - ActiveCell.row
Dim Mylist(1) As String
Mylist(0) = "Male"
Mylist(1) = "Female"
With Range("B7:B" & LastRow).Validation
    .Delete
    .Add Type:=xlValidateList, AlertStyle:=xlValidAlertStop, _
         Operator:=xlBetween, Formula1:=Join(Mylist, ",")
End With
...