Resize itself does nothing. It expands the reference

Range("A1")
refers to A1
Range("A1").Value = 3
puts 3 in A1

Range("A1").Resize(1,3)
refers to A1:C1
Range("A1").Resize(1,3).Value = 3
puts 3 in A1, B1, C1

application.Countif(Range("A1").Resize(1,3),3)
is equivalent to

Application.Countif(Range("A1:C1"),3)

--
Regards,
Tom Ogilvy


"hotherps " wrote in message
...
I guess I did not realize that Resize would work for this also. I
thought that Resize would actually place values in all of the cells,
not just count them.

I used it before in a situation where I needed to complete a row
because the value fell short due to some other criteria and when I used
Resize I thought it just forced the value in the remaining cells.

Sorry for the similar post


---
Message posted from http://www.ExcelForum.com/