Макрос Excel VBA не отправляет электронную почту всем получателям - PullRequest
0 голосов
/ 28 февраля 2020

У меня есть макрос Excel VBA, который отправляет один лист Excel различным группам людей. Существует около 50 различных рабочих листов, которые разосланы примерно в 60 электронных письмах или около того. Мне нужно было добавить несколько человек в некоторые из этих писем, но Excel не отправляет им письма после их добавления в список, но продолжает отправлять письма в первоначальный список.

Вот как я я добавляю получателей в список сейчас:

If Range("Q3").Value = "example0@example.com" Then
    Recipient = Range("Q3").Value + "; example1@example.com; example2@example.com"
Else
    Recipient = Range("Q3").Value
End If

Вот как выглядел код перед добавлением получателей (что работает так, как задумано):

If Range("Q3").Value = "example0@example.com" Then
    Recipient = Range("Q3").Value + "; example1@example.com"
Else
    Recipient = Range("Q3").Value
End If

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

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

Добро пожаловать на сайт PullRequest, где вы можете задавать вопросы и получать ответы от других членов сообщества.
...