Как вызвать событие нажатия кнопки в зависимости от значения ячейки?

Question

У меня есть таблица отслеживания отгрузки со многими записями, каждая из которых представляет отгрузку, и на отдельном листе у меня есть шаблон «Уведомление о прибытии», с кнопкой команды для обновления значений шаблона и автоматической отправки c сообщения электронной почты клиенту, как только его отправка приходит

обратно в таблицу, столбец «Z» содержит столбец даты прибытия посылки «AH» для уведомления о прибытии. может иметь только 2 значения ( ОТПРАВИТЬ , SENT ) .. SEND для отправлений, уведомления о которых еще не отправлены, и SENT для уже отправленных уведомлений

ЧТО ХОЧУ: для каждой ячейки в столбце Только «AH» со значением « SEND », один раз нажмите для запуска кода CommandButton1_Click со второго листа, а затем измените значение ячейки на « SENT »

* То, что я сделал, было, как показано ниже, но не работает

Private Sub Worksheet_Change(ByVal Target As Range)
  If Target.Column = Range("AH1").Column Then
Call CommandButton1_Click
Else
Range("AH" & Target.Row).Value = "SENT"
  End If
End Sub

Answer 1

Сначала найдите событие SelectionChange для Worksheet (это важно, поскольку вы не можете просто разместить этот код где-либо ... он должен быть в этом событии.

Затем вставьте этот код

If Target.Column = 26 Then ' column Z
  CommandButton1_Click
  Range("AH" & Target.Row).Value = "SENT"
End If

Когда вы закончите, это должно выглядеть так:

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
  If Target.Column = 26 Then ' column Z
    CommandButton1_Click
    Range("AH" & Target.Row).Value = "SENT"
  End If
End Sub