Как посчитать изменения ячеек 2 столбцов - PullRequest
0 голосов
/ 02 мая 2019

Я хочу улучшить общий файл Excel, чтобы иметь возможность показывать, когда конкретная ячейка изменяется.

Однако я не знаю, как кодировать

Я хотел бы поместить код, который подсчитывает, сколько раз меняются две другие ячейки в этой строке, и суммировать их в ячейке для всего диапазона столбцов.

Например, подсчитайте, сколько раз столбец U и Z изменялся (у меня есть раскрывающийся список с 3 опциями «OK, Change, TBC») и суммируйте эти изменения в ячейке X.

В частности, если кто-то изменяет ячейку в столбце U, а другой пользователь вносит изменения в ячейку Z или U (той же строки), в этом столбце X будет 2 в качестве значения номер 2 и т. Д.

Очень ценю ваше время.

1 Ответ

0 голосов
/ 02 мая 2019

Хорошо, я использовал следующий код, но он работает только для 1 ячейки.Я хотел бы включить 2 столбца, где он проверяет и вставить счетчик в другой ячейке.

Dim xCount As Integer

Private Sub Worksheet_Change(ByVal Target As Range)
    Dim xRg As Range, xCell As Range

    On Error Resume Next
    If Target = Range("U6") Then
        xCount = xCount + 1
        Range("X6").Value = xCount                                    
    End If
    Application.EnableEvents = False
    Set xRg = Application.Intersect(Target.Dependents, Me.Range("U6"))
    If Not xRg Is Nothing Then
        xCount = xCount + 1
        Range("X6").Value = xCount
    End If
    Application.EnableEvents = True
End Sub
Добро пожаловать на сайт PullRequest, где вы можете задавать вопросы и получать ответы от других членов сообщества.
...