Range formula - urgent!

C

Carole O

Excel 2003, SR 1

In a previous post, I asked about do loops, and the reply was to use range
instead - i.e.
Range(Range("J3"), Cells(Cells(Rows.Count, 1).End(xlUp).Row,
11)).Formula = _
"=IF(B3=""Employee:"",F3,"""")"

I thought I had it working, but something changed. The J column has numbers
in it until the data in the rows end. The problem seems to be that the
formula doesn't get placed in the K column (11).

This is a learning process for me, I'm not quite understanding this, just
doing what I'm told!

TIA,
Carole
 
D

Dave Peterson

I think I'd do something like:

Dim LastRow as long
with worksheets("sheet999") '<-- change this
lastrow = .cells(.rows.count,"A").end(xlup).row
.range("K3:K" & lastrow).formula = "=IF(B3=""Employee:"",F3,"""")"
end with
 
J

Jim Cone

Range("J3", Cells(Cells(Rows.Count, 1).End(xlUp).Row, 11)).Formula = _
"=IF(B3=""Employee:"",F3,"""")"
--
Jim Cone
San Francisco, USA
http://www.realezsites.com/bus/primitivesoftware



"Carole O" <[email protected]>
wrote in message
Excel 2003, SR 1
In a previous post, I asked about do loops, and the reply was to use range
instead - i.e.
Range(Range("J3"), Cells(Cells(Rows.Count, 1).End(xlUp).Row,
11)).Formula = _
"=IF(B3=""Employee:"",F3,"""")"

I thought I had it working, but something changed. The J column has numbers
in it until the data in the rows end. The problem seems to be that the
formula doesn't get placed in the K column (11).

This is a learning process for me, I'm not quite understanding this, just
doing what I'm told!
TIA,
Carole
 
Top