ComboBoxы

[jekarmazin]

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

Руками естественно
Во вложении мультик

Ок, спасибо за мультик, очень позновательно. Скажите пожалуйста, возможно ли такое сделать при помощи кода, тоесть не вносить данные в ячейки а прописать в коде и присвоить всем КомбоБоксам?

[jekarmazin]

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

Руками естественно
Во вложении мультик

Да и спасибо за опративность, как "чайник" очень ценю это

[doober]

Дополнение к мультику( там имя диапазона jekarmazin)

Private Sub CommandButton1_Click()
Range("jekarmazin").Cells(1, 1) = "Значение1"
Range("jekarmazin").Cells(2, 1) = "Значение2"
Range("jekarmazin").Cells(3, 1) = "Значение3"
Range("jekarmazin").Cells(4, 1) = "Значение4"
Range("jekarmazin").Cells(5, 1) = "Значение5"

End Sub

[jekarmazin]

Спасибо, все оч хорошо, но вот порблема что это для 2007-2010 Excel, и в 2003 у меня это не получаеться... Если можно покажите с '03 Excel.

[doober]

Не могу.Не установлен 2003.А какие проблемы возникают?

[jekarmazin]

Проблемы в том что невозможно задать имя диапазону выделеных ячеек, соответственно не получаеться дальше как по вашему видео.

[doober]

А так прокатит
Лист1,диапазон A1:A5

Sub Names_jekarmazin()
   ThisWorkbook.Names.Add Name:="jekarmazin", RefersToR1C1:="=Лист1!R1C1:R5C1"

End Sub

[jekarmazin]

Что-то не так, или я не так делаю... вот скрины

[doober]

А вы создайте файл в 2007,сохраните как 2003.И гоните Агена вместе с Мерлином


А макрос запускали?

[jekarmazin]

Все ок, спасибо.