Объединение ячеек!

Вход

Регистрация

Напомнить пароль

= Мир MS Excel/Объединение ячеек! - Мир MS Excel

Страница 1 из 1 1
Модератор форума: китин, _Boroda_, DrMini

Объединение ячеек! (Макросы Sub)

Объединение ячеек!

acid26sk

Дата: Четверг, 06.02.2014, 15:30 | Сообщение № 1

Группа: Пользователи

Ранг: Новичок

Сообщений: 14

Репутация: 0 ±

Замечаний: 0% ±

Excel 2013

Как в VBA написать команду не на ячейку а на объединеные ячейки, т.е. при нажатии на объединеные ячейки он пишет адрес первой ячейки в строке а VBA такое не понимает

Ответить

nilem

Дата: Четверг, 06.02.2014, 17:19 | Сообщение № 2

Группа: Авторы

Ранг: Старожил

Сообщений: 1613

Репутация: 563 ±

Замечаний: 0% ±

Excel 2013, 2016

может, что-то вроде этого:
[vba]

Код

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Intersect(Target, Range("A1").MergeArea) Is Nothing Then Exit Sub
MsgBox Target.Cells(1).Address
End Sub

[/vba]