Установка динамического диапазона для Fill Down

Gary L. спросил: 13 октября 2017 в 06:37 в: excel-vba

Я очень плохо знаком с использованием VBA в своих книгах Excel.

Я наткнулся на следующий фрагмент кода, который @Manhattan предоставил в качестве ответа на другой вопрос. Он идеально соответствует потребностям моей рабочей книги, но мне нужна помощь с настройкой динамического диапазона.

Сейчас я пытаюсь сделать так, чтобы код заполнял только те строки, которые совпадают со строками в столбце P (К какому столбцу относятся метки строк в сводной таблице, из которой приведенный ниже код извлекает данные), за исключением самой последней строки (которая всегда является "общими итогами")?

Sub FillDown()    Dim strFormulas(1 To 3) As Variant
    With ThisWorkbook.ActiveSheet
        strFormulas(1) = "=SUM($Q3:$S3)"
        strFormulas(2) = "=iferror(index(q3:s3,match($AE$2,$Q$2:$S$2,0)),0)"
        strFormulas(3) = "=$AD3-$AE3"        .Range("AD3:AF3").Formula = strFormulas
        .Range("AD3:AF150").FillDown
    End WithEnd Sub

TL; DR: как сделать так, чтобы этот код заполнял только те строки, которые соответствуют последней строке -1 в столбце P?

0 ответов