Выдает ошибку при очистке диапазона( выделении + belete)

Вход

Регистрация

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

= Мир MS Excel/Выдает ошибку при очистке диапазона( выделении + belete) - Мир MS Excel

Старая форма входа

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

Мир MS Excel » Вопросы и решения » Вопросы по VBA » Выдает ошибку при очистке диапазона( выделении + belete) (Макросы/Sub)

Выдает ошибку при очистке диапазона( выделении + belete)

roman66rus

Дата: Среда, 03.08.2016, 21:42 | Сообщение № 1

Группа: Проверенные

Ранг: Форумчанин

Сообщений: 113

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

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

2010

Помогите доработать макрос.

К сообщению приложен файл: 7107287.xlsm (20.7 Kb)

Ответить

Pelena

Дата: Среда, 03.08.2016, 22:15 | Сообщение № 2

Группа: Админы

Ранг: Местный житель

Сообщений: 19182

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

Замечаний: ±

Excel 365 & Mac Excel

Может, так?
[vba]

Код

Private Sub Worksheet_Change(ByVal Target As Range)
    Dim KeyCells As Range
    Set KeyCells = Range("B2:E10")
    If Not Intersect(Target, Range("B2:E10")) Is Nothing And Target.Cells.Count = 1 Then
        If Target = "рем" Then
            UserForm1.Show
        End If
    End If
End Sub

[/vba]

"Черт возьми, Холмс! Но как??!!"
Ю-money 41001765434816

Ответить

roman66rus

Дата: Среда, 03.08.2016, 23:48 | Сообщение № 3

Группа: Проверенные

Ранг: Форумчанин

Сообщений: 113

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

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

2010

Pelena, спасибо большое, все работает

Ответить

Мир MS Excel » Вопросы и решения » Вопросы по VBA » Выдает ошибку при очистке диапазона( выделении + belete) (Макросы/Sub)

Страница 1 из 1
1