"This command will stop the debugger" по 1-й строке макроса

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

"This command will stop the debugger" по 1-й строке макроса (Макросы/Sub)

andrfire

Дата: Суббота, 09.12.2017, 14:31 | Сообщение № 1

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

Ранг: Прохожий

Сообщений: 3

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

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

Excel 2013

Здравствуйте.
Первая строка (Sub добавка_строки()) заливается желтым и появляется "This command will stop the debugger"
Вот код:
[vba]

Код

Sub добавка_строки()
'
' добавка_строки Макрос
'

Private Sub Worksheet_Change(ByVal Target As Range)
Dim rng As Range: Set rng = [B4] 'диапазон Вашей таблицы
If Not Intersect(rng, Target) Is Nothing Then добавка_строки
Rows("6:6").Select
Range("M6").Activate
Selection.Insert Shift:=xlDown, CopyOrigin:=xlFormatFromLeftOrAbove
End Sub

[/vba]
Макрос для добавления строки при изменении значения в ячейке.
Прошу просветить начинающего грызть VBA.
Большое спасибо.