Автоматическое выставление имени ПК в ячейке

[Николай Ераскин]

Есть файл с отчетностью по выполненной работе, в столбце А - название, в столбцах ВСD - каким образом, отмечается плюсом (+), в столбце J - Фамилия. Нужно чтобы сразу после выставления плюса (+) в столбце ВС или D вставлялось имя ПК в столбце H.

[boa]

а где пример-то?
но это возможно только через макрос

[Николай Ераскин]

Пример добавил. Как раз макросом и нужно.

[boa]

В модуль листа:

Код Выделить Развернуть

Private Sub Worksheet_Change(ByVal Target As Range)
    With Target
        If .Value = "+" And .Column >= 2 And .Column <= 4 Then Cells(.Row, 8).Value = Environ("ComputerName")
    End With
End Sub