У меня проблемы с двухшаговой проблемой.
Первая часть - установка диапазона постоянно меняющихся данных. Я пытался классифицировать заявки на листе с данными, которые ежедневно добавляются на тот же лист, поэтому последняя активная ячейка постоянно меняется. Например, моя проблема с конкретной строкой кода заключается в следующем.
Columns(“D:D”).Select
Selection.End(xlDown).Select
ActiveCell.Offset(1).Select
ActiveCell.Offset(0, 91).Select
Range(Selection, Selection.End(xlDown)).Select
Selection.Copy
Columns(“D:D”).Select
Selection.End(xlDown).Select
ActiveCell.Offset(1).Select
ActiveSheet.Paste
ActiveSheet.Range("$A$1:$EE$3000”).AutoFilter Field:=22, Criteria1:= Array( _
"DUPLICATE PAID/CAPTURED CLAIM:MORE CURRENT REFILL EXISTS", _
"REFILL TOO SOON:CLAIM ALREADY PROCESSED FOR STORE, RX, DOS", _
"REFILL TOO SOON:DISPENSED TOO SOON"), Operator:=xlFilterValues
Columns(“A:A”).Select
Selection.End(xlDown).Select
Selection.Copy
ActiveCell.Offset(1).Select
ActiveSheet.Paste
Но теперь я понимаю, что установка конечного диапазона в значение $ EE $ 2007 не работает. Столбец EE всегда останется неизменным, однако строка изменится.
Вторая часть связана с фильтрацией. Есть около 56 различных категорий в отдельном столбце, V, который затем помечается ключевым словом в столбце А. Я достиг степени фильтрации и копирования из следующей ячейки вверх, но у меня есть проблема с вставкой этого ключевого слова в следующую, следующую пустую ячейку, и в последнюю активную строку, что опять-таки происходит в столбце А. Выше это то, что у меня есть.
И вот где я застреваю. Я новичок во всем этом, и я надеюсь узнать, есть ли лучший способ сделать это.
Мне удалось перейти ко второй части, изменив диапазон с $ EE $ 2007 на $ EE $ 3000, что привело к тому, что мои данные пошли дальше, но это возможно.
Заранее спасибо.