Could someone help me with the below script. The range is MyRange, however I cant seem to get the script to
enter the formula in the cell using the range.
ActiveCell.Formula = "=Countif(" & MyRange &
This is the problem line.
I get a type mismatch error at this point.
The reason I'm using MyRange is because the range changes in size.
Here is a Code snipit: Thanks for helping,
Dim MyRange As Range
Dim Lastrow As Long
On Error GoTo 0
Lastrow = Range("I2").End(xlDown).Row
Set MyRange = Range("I2:I" & Lastrow&)
ActiveCell.Formula = "=Countif(" & MyRange & ",""=Above"")"