В лучшем случае я новичок в 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