Как скопировать и вставить значения из одного диапазона, в котором есть несколько пустых ячеек, в новый столбец в Excel - PullRequest
0 голосов
/ 26 марта 2019

У меня есть две таблицы, в одной я собираю данные о доставке по сумме и дате.Некоторые частоты доставки еженедельные, некоторые раз в две недели, а некоторые ежемесячно.Мне нужно перенести объем доставки за последнюю неделю на новый лист, но оставить ячейку пустой, если она находится за пределами 7-дневного окна.Затем через несколько недель перезапишите эту информацию и вставьте новую сумму в новый столбец, чтобы я мог собрать данные о средней доставке.Таким образом, у меня могут быть еженедельные данные, которые варьируются от "F3..Z3", но раз в две недели это будет только половина этого

Я написал код vba, чтобы определить окно доставки и перенести на новый лист, ноЯ не могу получить данные для копирования в новый столбец

Я пробовал оба эти варианта -

Range("B:B").Select
Selection.Copy
Range("F:F").End(xlToLeft).Offset(0, 1).Select
 Selection.PasteSpecial Paste:=xlPasteValues, operation:=xlNone, skipblanks:=True, Transpose:=False

, а также -

Dim LastRow As Long
LastRow = Sheets("01042019").Cells(Rows.Count, 1).End(xlUp).Offset(1).Row


Sheets("01042019").Range("B3").Copy
Sheets("01042019").Range("XFD3").End(xlToLeft).Offset(0, 1).PasteSpecial Paste:=xlPasteValuesAndNumberFormats

Можете ли выпожалуйста помогите?

...