I have a variable cell location I am finding using the following:

'Find 'Released' Header Row
Dim CrntF As Range
Set CrntF = Range("F49")

Do Until ActiveCell = "RELEASED"
On Error Resume Next

CrntF.Select
Set CrntF = ActiveCell.Offset(1, 0)
Loop

'Move down to 1st project, and over to Title
CrntF.Offset(1, 8).Select

This selects the correct starting cell, but I need to copy this cell & the
next 19 cells below it.

I hope this is simple. Thanks in advance for any help.