Функция WorkbookOpen с оператором If

Question

Я пытаюсь написать код, который запускается, когда я открываю файл, который имеет в имени что-то и имеет определенное значение в ячейке (код ниже).

Прежде всего, возможно лииспользовать оба эти утверждения вместе? Тот, который проверяет условие «пока файл открывается», а второй, которому нужен открытый файл, чтобы найти ответ?

Если нет, как лучше это сделать?

Когдая использую только условие имени файла, частично содержащего что-то, оно работает, но когда я пытаюсь применить оба условия, оно как бы игнорирует второе (значение ячейки).

Option Explicit

Public WithEvents MonitorApp As Application

Private Sub Workbook_Open()

Set MonitorApp = Application

End Sub

Private Sub MonitorApp_WorkbookOpen(ByVal Wb As Workbook)

    Dim Text As String
    Dim myCell As Range

    Set myCell = ThisWorkbook.ActiveSheet.Range("A1")

    Text = "Partial Name of File"

    If UCase(Left(Wb.Name, Len(Text))) = UCase(Text) And myCell.Value <> "Example" Then

    'Code'

    End If
End Sub

Я ожидаю, что коддолжен выполняться, только если оба условия выполняются, но код выполняется, даже если myCell.Value = "Example"