Выделение скопированных ячеек
|
|
Archer |
Дата: Воскресенье, 15.12.2013, 07:31 |
Сообщение № 1 |
|
Группа: Пользователи
Ранг: Новичок
Сообщений: 47
Репутация:
0
±
Замечаний:
40% ±
Excel 2003 | |
Добрый день! Мне необходимо, чтобы после копировения ячейки автоматически выделялись каким-либо образом. Если есть идеи - проше подсказать.
Добрый день! Мне необходимо, чтобы после копировения ячейки автоматически выделялись каким-либо образом. Если есть идеи - проше подсказать.Archer
|
|
| Ответить
|
KuklP |
Дата: Воскресенье, 15.12.2013, 10:11 |
Сообщение № 2 |
|
Группа: Проверенные
Ранг: Старожил
Сообщений: 2369
Репутация:
486
±
Замечаний:
0% ±
2003-2010 | |
Каким либо образом они и так выделяются. И после копирования и после вставки.
Каким либо образом они и так выделяются. И после копирования и после вставки.KuklP
Ну с НДС и мы чего-то стoим! kuklp60@gmail.com WM Z206653985942, R334086032478, U238399322728
|
|
| Ответить
|
Archer |
Дата: Воскресенье, 15.12.2013, 11:34 |
Сообщение № 3 |
|
Группа: Пользователи
Ранг: Новичок
Сообщений: 47
Репутация:
0
±
Замечаний:
40% ±
Excel 2003 | |
Необходимо, чтобы выделение сохранялось для дальнейшей работы.
Необходимо, чтобы выделение сохранялось для дальнейшей работы.Archer
|
|
| Ответить
|
KuklP |
Дата: Воскресенье, 15.12.2013, 11:51 |
Сообщение № 4 |
|
Группа: Проверенные
Ранг: Старожил
Сообщений: 2369
Репутация:
486
±
Замечаний:
0% ±
2003-2010 | |
Ну так после вставки ткните мыхой в значок заливки. По умолчанию там стоит желтая, диапазон выделен. Вот, в модуль книги: [vba]Код Private Sub Workbook_SheetChange(ByVal Sh As Object, ByVal Target As Range) If Application.CutCopyMode Then _ Target.Interior.ColorIndex = 6 End Sub [/vba]
Ну так после вставки ткните мыхой в значок заливки. По умолчанию там стоит желтая, диапазон выделен. Вот, в модуль книги: [vba]Код Private Sub Workbook_SheetChange(ByVal Sh As Object, ByVal Target As Range) If Application.CutCopyMode Then _ Target.Interior.ColorIndex = 6 End Sub [/vba]KuklP
Ну с НДС и мы чего-то стoим! kuklp60@gmail.com WM Z206653985942, R334086032478, U238399322728
Сообщение отредактировал KuklP - Воскресенье, 15.12.2013, 11:55 |
|
| Ответить
|
Archer |
Дата: Воскресенье, 15.12.2013, 13:13 |
Сообщение № 5 |
|
Группа: Пользователи
Ранг: Новичок
Сообщений: 47
Репутация:
0
±
Замечаний:
40% ±
Excel 2003 | |
Кажется понял, спасибо
|
|
| Ответить
|