Динамический Конфиф в vba - PullRequest
0 голосов
/ 08 октября 2019

Попытка создать динамическое ранжирование на основе того, что находится в ячейке F2 +1. Я знаю, что я, вероятно, упускаю что-то глупое / незначительное, может кто-нибудь, пожалуйста, помогите мне?

Sub Formula1()


Dim lastRow As Integer
Dim wsLOB As Worksheet, wsClient As Worksheet

Set wsLOB = ThisWorkbook.Sheets("P&C LOB Data")
Set wsClient = ThisWorkbook.Sheets("All P&C Client Data")

For i = 2 To lastrow1
    If wsClient.Cells(i, 6) = "" Then
        wsClient.Cells(i, 5) = ""
    Else
        wsClient.Cells(i, 5) = Application.WorksheetFunction.CountIf(Range("F:F"), "<=" & Cells("f2"))
    End If
Next i

End sub
...