Ответить на сообщение
Вернуться к теме
Вы отвечаете на сообщение:
ник: osmor
Const intR As Long = 1 Const intC As Long = 5 Private Sub Worksheet_SelectionChange(ByVal Target As Range) Cells(intR, intC) = IIf(Target = "", "Пусто", Target) End Sub
Ваше имя:
Пароль:
Сообщение:
Прикрепить:
Для вставки смайлов в текст щелкните по значку.