VBA filldown with dynamic range

[sjk1193]

	a	b	c
1	1 on LTD. <tbody> </tbody>	31354	Q1
2	2 on LTD. <tbody> </tbody>	425	Q1
3	31 on LTD. <tbody> </tbody>	452	Q1
4	51 on LTD. <tbody> </tbody>	76	Q1
5	8 on LTD. <tbody> </tbody>	456786	Q1
6	65 on LTD. <tbody> </tbody>	475	Q3
7	68 on LTD. <tbody> </tbody>	98
8	989 on LTD. <tbody> </tbody>	475453
9	6584 on LTD. <tbody> </tbody>	4534
10	56 on LTD. <tbody> </tbody>	86876

<tbody>
</tbody>

I' trying to fill down column C based on that last value in that column and then stop when column B has no more values. So far I have the code below that fills down all of column C with "Q1".

Dim lastRow As Long
With Sheet5
lastRow = .Cells(Rows.Count, "A").End(xlUp).Row
.Range("C1:C" & lastRow).FillDown
End With



Then i paste more values though and now need it to fill down the values with "Q3" . I think I need to replace the "C1:C" so that it is dynamic and now selects the value in C6

<colgroup><col><col span="2"><col><col></colgroup><tbody></tbody>

 

[Fluff]

How about

With Sheet5
   .Range(.Range("C" & Rows.Count).End(xlUp), .Range("B" & Rows.Count).End(xlUp).Offset(, 1)).Filldown
End With

 

[Joe4]

Is this what you are looking for?

    Dim firstRow As Long
    Dim lastRow As Long
    
    With Sheet5
        firstRow = .Cells(Rows.Count, "C").End(xlUp).Row
        lastRow = .Cells(Rows.Count, "A").End(xlUp).Row
        .Range("C" & firstRow & ":C" & lastRow).FillDown
    End With