Как я могу изменить диапазон на AC с этим кодом?

Question

Этот код дает мне целевой диапазон как каждая ячейка в столбце A.Я хотел бы изменить это на A, B и C. Я не смог успешно сделать это.Также отметка даты и времени должна быть в столбце D.Вот код

Private Sub Worksheet_Change(ByVal Target As Range)
Dim c As Range
If Not Intersect(Target, Range("A:A")) Is Nothing Then
    Application.EnableEvents = False
    For Each c In Intersect(Target, Range("A:A"))
        If c.Value <> "" Then
            c.Offset(0, 1).Value = Now
        Else
            c.Offset(0, 1).Value = ""
        End If
    Next c
    Range("D:D").EntireColumn.AutoFit
    Application.EnableEvents = True
End If
End Sub