Гость
Целевая тема:
Создать новую тему:
Автор:
Форумы / Microsoft Office [игнор отключен] [закрыт для гостей] / Ошибка при изменении стиля ссылок / 4 сообщений из 4, страница 1 из 1
10.07.2007, 18:16:45
    #34651375
Chelovek Tapok
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Ошибка при изменении стиля ссылок
Собственно, вопрос в следующем: при изменении стиля ссылок в excel на R1C1 у ComboBox не работает ListIndex, почему?

Приложен файл. Если при стандартном стиле ссылок изменять значения ComboBox все хорошо, а вот при установке галочки в сервис-параметры-общие-стильссылокR1C1 возникает ошибка.
...
Рейтинг: 0 / 0
10.07.2007, 22:30:57
    #34651801
Deggasad
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Ошибка при изменении стиля ссылок
Потому что нечего выделять. Так как стиль ссылок другой чем вы пытаетесь задать исходный диапазон. а так как исходный диапазон не задан, то элементов в списке нет, поэтому нет элемента с номером 0.
Выход: использовать проперти Address со следующими параметрами (, , xlR1C1), т.е.
Код: plaintext
Address(, , xlR1C1)

Наверное можно оба варинта предусмотреть, но так как я никогда этот стиль не включаю, так сразу не скажу.
Пока писал придумал на скорую руку. Как вариант
...
Рейтинг: 0 / 0
10.07.2007, 22:32:09
    #34651804
Deggasad
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Ошибка при изменении стиля ссылок
Разбираться особо некогда, но если хочешь так работает
Код: plaintext
1.
    Imya.ListFillRange = "2!" & Cells( 1 ,  1 ).Address(, , xlR1C1) & ":" & Cells( 4 ,  1 ).Address(, , xlR1C1)
    If Imya.ListFillRange = "" Then Imya.ListFillRange = "2!" & Cells( 1 ,  1 ).Address(, , xlA1) & ":" & Cells( 4 ,  1 ).Address(, , xlA1)
...
Рейтинг: 0 / 0
11.07.2007, 00:14:43
    #34651948
Chelovek Tapok
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Ошибка при изменении стиля ссылок
[quot Deggasad]Потому что нечего выделять. Так как стиль ссылок другой чем вы пытаетесь задать исходный диапазон. а так как исходный диапазон не задан, то элементов в списке нет, поэтому нет элемента с номером 0.
Выход: использовать проперти Address со следующими параметрами (, , xlR1C1), т.е.
Код: plaintext
Address(, , xlR1C1)

Спасибо! Теперь все встало на свои места.
...
Рейтинг: 0 / 0
Форумы / Microsoft Office [игнор отключен] [закрыт для гостей] / Ошибка при изменении стиля ссылок / 4 сообщений из 4, страница 1 из 1
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]