Пишешь значение в одну и ту же ячейку, а рядом все заполняется и сохраняется в другие - VBA
Формулировка задачи:
Можно ли сделать так, пишеешь значение в одну и ту же ячейку, а рядом все заполняется и
сохраняется
(см пример на скрине)Решение задачи: «Пишешь значение в одну и ту же ячейку, а рядом все заполняется и сохраняется в другие»
textual
Листинг программы
Private Sub Worksheet_Change(ByVal T As Range)
Application.EnableEvents = False
On Error Resume Next
Set T = Intersect(T, Range("A1:A4"))
If Not T Is Nothing Then
For Each T In T
If Not IsEmpty(T) Then _
Cells(Rows.Count, T.Row + 2).End(xlUp).Offset(1).Value = T.Value
Next
End If
Application.EnableEvents = True
End Sub