Необходимо заполнить весь столбец на основе изменения значения ячейки - PullRequest
0 голосов
/ 04 ноября 2019

У меня есть формула в ячейке G11, которая показывает, какую часть # использовать для D2. Как только эта часть вставлена ​​в D2, ячейка G11 обновляется новой деталью для следующей ячейки (D3) и так далее. Мне нужен код VBA, который будет автоматически заполнять столбец D2: D4 только значениями для соответствующих дат. Не уверен, что это возможно, учитывая, что G11 постоянно обновляется.

enter image description here

Я сделал очень простой VBA, который копирует и вставляет только значение из ячейки g11 в d2. Но это хорошо только для одного ряда.

Sub CopyingCellValues()
  Range("G11").Copy
  Range("D2").PasteSpecial xlPasteValues
End Sub

Код будет работать только для первой строки

Обновление: я использовал этот код для заполнения каждого, теперь я сделаю процесс автоматического назначения всех ячеек одним щелчком мышикнопка:

Sub copy_values()
Dim R As Range
Set R = Worksheets("Sheet1").Cells(Rows.Count, "G").End(xlUp) 'last cell in Column G with data
If Len(R.Value) > 0 Then Set R = R.Offset(1)
R.Value = Worksheets("Sheet1").Range("U17").Value

End Sub

Добро пожаловать на сайт PullRequest, где вы можете задавать вопросы и получать ответы от других членов сообщества.
...