VBA Несоответствие - Диапазон - PullRequest
0 голосов
/ 23 февраля 2019

В лучшем случае я новичок в VBA.Я пытаюсь закодировать кнопку, чтобы создать электронное письмо для отправки после завершения всех ячеек в определенном диапазоне.У меня есть следующий код, и я продолжаю получать ошибку во время выполнения - ошибка 13, когда я иду к отладке, это указывает на Range("E13:18").Я не уверен, что я делаю не так здесь.Любая помощь будет принята с благодарностью.

Sub btnSendCompletedForm()
    '
    ' btnSendCompletedForm Macro
    ' Send Form
    'Dim MyOutlook As Object

    Dim MyMessage As Object

    Dim SubjectLine As String
    Dim SendOK As Boolean

    SendOK = False

    'Check if fields filled out.

    If Worksheets("NetCert Form").Range("E13:E18") = "" Then  ' Error is here
        Range("E13:E18").Select
        MsgBox ("Please complete all Client User Information.")
    Else
        SendOK = True
    End If

    'Check if OK to send.
    If SendOK Then
Добро пожаловать на сайт PullRequest, где вы можете задавать вопросы и получать ответы от других членов сообщества.
...