Sub a()
For x = 5 To 10
Range("D" & x).Formula = _
"=COUNTIF(PEN!$G:$G,$B" & x & "&""CO"")"
Next x

End Sub

Also, note that I use a comma instead of a semicolon. When you use Formula,
you should enter the formula using US English conventions.

--
Regards,
Tom Ogilvy


"s80NL" wrote:

>
> If got this piece of code:
>
> For x = 5 To 10
> Range("D" & x).Formula = "=COUNTIF(PEN!$G:$G;$B" & x & " &
> \"CO\")"
> Next x
>
> Should result in:
> =COUNTIF(PEN!$G:$G;$B5 & "CO") in cell D5
> ...
> =COUNTIF(PEN!$G:$G;$B10 & "CO") in cell D10
>
> But it doesn't do the trick... someone who knows how to make it work?!
> Thanks in advance!!
>
> Steven
>
>
> --
> s80NL
>
>
> ------------------------------------------------------------------------
> s80NL's Profile: http://www.excelforum.com/member.php...o&userid=36374
> View this thread: http://www.excelforum.com/showthread...hreadid=572699
>
>