nick7inc
Advanced Member | Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору abyrrr 1) Используйте ссылки с указанием имени листа. Если работаете вне предела одной книги, то и имени книги тоже. 2) Цитата: ComboBox3.RowSource = Диапазон | должен быть в одной из следующих функций: UserForm_Initialize() или UserForm_Activate() (думаю, что первый вариант предпочтительнее, а второй - более затратный), причём для каждой из форм. Добавлено: Для получения адреса можно воспользоваться Address() вместо Цитата: Диапазон = "c1:c" & CStr(n) | Вот пример: Код: Dim r As Range With Workbooks("Книга1").Sheets("Лист1") ' или ActiveSheet Set r = Range(.Cells(1, "A"), .Cells(5, "B")) ' Вместо имени столбца можно использовать его номер, как целое число (без кавычек) End With MsgBox r.Address(True, True, xlA1, True) ' получится что-то вроде [Книга1]Лист1!$A$1:$B$5 | Добавлено: Или так: Код: Dim S As String With Workbooks("Книга1").Sheets("Лист1") ' или ActiveSheet S = Range(.Cells(1, "A"), .Cells(5, "B")).Address(True, True, xlA1, True) End With MsgBox S Debug.Print S |
| Всего записей: 1138 | Зарегистр. 04-05-2007 | Отправлено: 13:29 18-01-2008 | Исправлено: nick7inc, 13:45 18-01-2008 |
|