Гость
Войти | Профиль | Очистить
Целевая тема:
Создать новую тему:
Автор:
Действия ...
Форумы / Microsoft Office [игнор отключен] [закрыт для гостей] / Предидущие значения и адрес / 7 сообщений из 7, страница 1 из 1
09.01.2007, 17:06:00
    #34243544
talgat
talgat
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Предидущие значения и адрес
Типа
Worksheet_SelectionChange(ByVal Target As Range)
msgbox(Target.address)
end
Точно помню, что раньше выводился адрес ячейки где был до перехода.
Теперь выводит адрес текущей ячейки. Это глюк программы или я сам глючу?
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
09.01.2007, 17:09:48
    #34243574
mmmmm
mmmmm
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Предидущие значения и адрес
Worksheet_Change ?
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
09.01.2007, 17:14:04
    #34243585
talgat
talgat
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Предидущие значения и адрес
mmmmmWorksheet_Change ?
Worksheet_SelectionChange
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
09.01.2007, 18:31:55
    #34243825
White Owl
White Owl
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Предидущие значения и адрес
talgatТипа
Worksheet_SelectionChange(ByVal Target As Range)
msgbox(Target.address)
end
Точно помню, что раньше выводился адрес ячейки где был до перехода.
Теперь выводит адрес текущей ячейки. Это глюк программы или я сам глючу?Никогда старый адрес не выводился. Если нужен адрес откуда ушли, делай так:
Код: plaintext
1.
2.
3.
4.
5.
6.
Option Explicit
Dim OldTarget As Range

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
    MsgBox (OldTarget.Address & " => " & Target.Address)
    Set OldTarget = Target
End Sub
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
10.01.2007, 20:22:51
    #34246921
talgat
talgat
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Предидущие значения и адрес
White Owl
Код: plaintext
1.
2.
3.
4.
5.
6.
Option Explicit
Dim OldTarget As Range

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
    MsgBox (OldTarget.Address & " => " & Target.Address)
    Set OldTarget = Target
End Sub

Спасибо.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
10.01.2007, 22:16:02
    #34247090
Michael5
Michael5
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Предидущие значения и адрес
Зачем так сложно заморачиваться с SelectionChange, если mmmmm уже сказал:

Код: plaintext
Worksheet_Change

(самому, кстати, сегодня понадобилось, проверял, что возвращают Target'ы этих процедур)
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
10.01.2007, 22:38:55
    #34247110
White Owl
White Owl
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Предидущие значения и адрес
Michael5Зачем так сложно заморачиваться с SelectionChange, если mmmmm уже сказал:
Код: plaintext
Worksheet_Change
(самому, кстати, сегодня понадобилось, проверял, что возвращают Target'ы этих процедур)Вот мне интересно, каким образом ты проверял, что именно проверял и что в результате проверки получил. А заодно скажи мне, читал ли ты документацию?
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
Форумы / Microsoft Office [игнор отключен] [закрыт для гостей] / Предидущие значения и адрес / 7 сообщений из 7, страница 1 из 1
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
Польз. соглашение  
Полит. конфиден.  
созд. / загр.: 335ms
Закрыть
start [/forum/topic.php?fid=61&tablet=1&tid=2183669]:
 0ms
get settings:
 7ms
get forum list:
 10ms
check forum access:
 2ms
check topic access:
 2ms
track hit:
 48ms
get topic data:
 6ms
get forum data:
 1ms
get page messages:
 29ms
get tp. blocked users:
 1ms
others: 229ms
total:  335ms
x
x
Закрыть


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