Aqui está o código que está me causando problemas:
Dim lastRow As Long
With Worksheets("Rent Roll")
lastRow = Worksheets("Summary").Range("NUM_UNITS").Value
.Range("A1:A" & lastRow + 25).EntireRow.Hidden = False
.Range("A" & lastRow + 26 & ":A526").EntireRow.Hidden = True
.Range("S3").Formula = "=COUNTIF(""J26:J"" & lastRow + 25,""A"")"
Especificamente, é a última linha do código. Você não pode usar o número armazenado do lastRow ao alterar uma fórmula de células?
Tags microsoft-excel vba