Excel VBA - изменение цвета вкладки в зависимости от пользователя

Question

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

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

Моя проблема в том, что электронная таблица затем получает доступ к дополнительному тестеру, а затем мне нужна вкладкаоставаться красным, пока они не пройдут или не пройдут работу (опять же на основе проверки ячейки).

Так что я думаю, что нашел решение, в котором

В модуле, который я получил:

Public Function UserName()
    UserName = Environ$("UserName")
End Function

Range("M5").Value = Environ("username")

В другом рабочем листе у меня есть:

Set myRange3 = ActiveSheet.Range("P21")

  If UserName <> Range("M5").Value Then

            If UserName = Range("E15").Value Then

                If Application.WorksheetFunction.CountA(myRange3) = 0 Then
                    ActiveWorkbook.ActiveSheet.Tab.Color = vbRed
                Else
                    ActiveWorkbook.ActiveSheet.Tab.Color = xlColorIndexNone
                End If
            End If
  End If

'M5 = Primary tester
'E15 = Secondary tester

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