Доброго времени суток! Подскажите пожалуйста, как скорректировать код, чтобы при удалении из какой-либо ячейки, к примеру из B2 или C9 или D13 очищалась ячейка напротив только в столбце A, в той cтроке, в которой очищаю ячейку, но если другие ячейки заняты в этой строке, очистка ячейки в колонке А не требуется.
Код
Private Sub Worksheet_Change(ByVal Target As Range)
For Each cell In Target 'проходим по всем измененным ячейкам
If Not Intersect(cell, Range("B2:D66")) Is Nothing Then 'если измененная ячейка попадает в диапазон B2:B66
If cell = Empty Then 'если в B2:B66 пусто, то
Target.Offset(, -1).Value = Empty 'очищаем ячейку колонки А
Else 'в ином случае (если диапазон B2:B66 не пустой), то
With Range("A" & cell.Row) 'вводим в ячейку, в столбец A дату
.Value = Date
End With
End If
End If
Next cell
End Sub
В данный момент очищается вся строка, если удалять к примеру ячейку D13.
Возможно ли реализация: выделение значения при клике на combobox, минуя даблклик, выделение вручную или очистка формы с помощью бэкспейс? Т.е. нужно вводить значение в combobox, по принципу как в excel, выбрал ячейку кликом(не даблклик) и вводишь. Если возможно, подкиньте идею, пожалуйста!