Еще раз о списках

[tae1980]

Списки можно создать либо указав при создании "проверки" список с разделителем, или ссылку на одну строки или столбец.
Список с разделителем выглядит так: 111;222;333
Но присвоить ту же строку переменной и использовать ее для организации списка не получается.
Существует ли способ организации списков с использованием переменных в которых перечислены значения, а не ссылки на ячейки?

[mchip]

Не понятен вопрос.
Вообще то список может ссылаться на диапазон ячеек (причем разный).
Попробуй так:
На любом листе в столбце А начиная с А1 введи штуки 3-5 значений.
А в ячейке, ну например С1, поставить проверку данных, список, а вместо источника запиши

=СМЕЩ(A1;;;СЧЁТЗ(A:A);1)

Теперь добавь в столбец А еще одно (два, три, ...) значения. Все они появятся в списке.

[DV68]

Сообщение от tae1980

Существует ли способ организации списков с использованием переменных в которых перечислены значения, а не ссылки на ячейки?

Нет. Сколько пробовал, не получалось. Буду рад, если кто-нибудь меня опровергнет)

[DV68]

Сообщение от mchip

Не понятен вопрос.
Вообще то список может ссылаться на диапазон ячеек (причем разный).
Попробуй так:
На любом листе в столбце А начиная с А1 введи штуки 3-5 значений.
А в ячейке, ну например С1, поставить проверку данных, список, а вместо источника запиши

=СМЕЩ(A1;;;СЧЁТЗ(A:A);1)

Теперь добавь в столбец А еще одно (два, три, ...) значения. Все они появятся в списке.

mchip
Здесь имелось ввиду виртуальный массив. Например:
=НАИБОЛЬШИЙ(A1:A10;СТРОКА(1:10))

[tae1980]

Сообщение от DV68

mchip
Здесь имелось ввиду виртуальный массив. Например:
=НАИБОЛЬШИЙ(A1:A10;СТРОКА(1:10))

Меня вполне бы устроил такой результат:
="11";"22";"333"
Но он не работает. :((

[mchip]

Так зачем в одну ячейку все запихивать? Формула

 СМЕЩ

как раз для этого и подходит!
В крайнем случае вот макрос:

Sub test()
    With Selection.Validation
        .Delete
        .Add Type:=xlValidateList, AlertStyle:=xlValidAlertStop, Operator:= _
        xlBetween, Formula1:=Cells(1, 1).Value

        .IgnoreBlank = True
        .InCellDropdown = True
        .InputTitle = ""
        .ErrorTitle = ""
        .InputMessage = ""
        .ErrorMessage = ""
        .ShowInput = True
        .ShowError = True
    End With
End Sub

Он подставляет в список значения из ячейки А1

[DV68]

Сообщение от tae1980

Меня вполне бы устроил такой результат:
="11";"22";"333"
Но он не работает. (

В каком месте?:

[IgorGO]

получилось)))
в доке написано:
тип проверки: xlValidateList
Formula1 is required, Formula2 is ignored. Formula1 must contain either a comma-delimited list of values (значения разделяются запятыми)

[The_Prist]

Сообщение от tae1980

Списки можно создать либо указав при создании "проверки" список с разделителем, или ссылку на одну строки или столбец.
Список с разделителем выглядит так: 111;222;333
Но присвоить ту же строку переменной и использовать ее для организации списка не получается.

Если Вы в VBA хотите в список передать значения из переменной, то разделять отдельные элементы списка надо не "точка с запятой", а "запятой".

ActiveCell.Validation.Add Type:=xlValidateList, AlertStyle:=xlValidAlertStop, Operator:= _
        xlBetween, Formula1:="111,222,333"

[tae1980]

Сообщение от The_Prist

Если Вы в VBA хотите в список передать значения из переменной, то разделять отдельные элементы списка надо не "точка с запятой", а "запятой".

ActiveCell.Validation.Add Type:=xlValidateList, AlertStyle:=xlValidAlertStop, Operator:= _
        xlBetween, Formula1:="111,222,333"

Я все испробовал...
Из екселя создаем переменную qqq со значением: ="1111,2222,3333"
Создаем в любой ячейке список и в качестве источника указываем переменную qqq. При нажатии ОК Ексель начинает злостно ругаться, что мол не нравиться источник.