Selecting a strip of values in a column

Hey guys,
Please look at the attachment to see my table.
I'm trying to write some code to iterate through the columns and select all the rows that have the info and paste by values later. I hardcoded the row values now but number of rows can change in the future. However, the new rows will be added between the "Dev't" and "Other" rows.

So I want m program to count the number of rows between "Dev't" and "Other" and copy all the contents in between.

here's the code I have so far:

   iLastCol = ws.Cells(27, Columns.count).End(xlToLeft).Column

   For i = 2 To iLastCol

       If Cells(27, i) <= Date Then
           range(Cells(28, i), Cells(41, i)).Copy
           range(Cells(28, i), Cells(41, i)).PasteSpecial xlPasteValues
           
       End If

   Next i