Поиск  Пользователи  Правила 
Закрыть
Логин:
Пароль:
Забыли свой пароль?
Регистрация
Войти
 
Страницы: 1
RSS
Application.inputbox, как получить адрес выбранного диапазона (ячейки) с названием листа
 
Добрый день!
Не получилось к сожалению самостоятельно разобраться с этой функцией
fSearchCelladr = Application.InputBox("ХХХХХХХХХХХ", "хххххххххххì", Type:=  8)  .Address
В адресе диапазона (ячейки) который возвращается этой функцией не указывается ссылка на лист, даже если она присутствует в окне выбора. Возвращает только адрес вида "$A$1"
Задача стоит получать адреса ячеек с разных листов, а не только с активного.
Вобщем, хелп ми плиз
Изменено: jfd - 1 Июл 2013 17:26:23
 
Код
    With Application.InputBox("ХХХХХХХХХХХ", "хххххххххххi", Type:=8)
        fSearchCelladr = .Parent.Name & " - " & .Address
    End With
    MsgBox fSearchCelladr
Изменено: Hugo - 1 Июл 2013 17:02:41
 
Hugo, для моих целей вставка " - " лишняя, но в остальном все отлично. спасибо за подсказку
 
Так на вставке не настаиваю :)
Что-то нужно было воткнуть...
 
Можно еще и с именем книги:
Код
    Dim fSearchCelladr As String
    With Application.InputBox("", "", Type:=8)
        fSearchCelladr = .Address(External:=True)
    End With
    MsgBox fSearchCelladr
Даже самый простой вопрос можно превратить в огромную проблему. Достаточно не уметь формулировать вопросы...
 
Дима, спасибо за External:=True - не знал.
Хотя в хелпе по Range.Address Property есть :)
Может запомнится...
Страницы: 1
Читают тему (гостей: 1)