Пишешь значение в одну и ту же ячейку, а рядом все заполняется и сохраняется в другие - 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

ИИ поможет Вам:


  • решить любую задачу по программированию
  • объяснить код
  • расставить комментарии в коде
  • и т.д
Попробуйте бесплатно

Оцени полезность:

8   голосов , оценка 3.875 из 5
Похожие ответы