I have the following macro that works as expected. It finds only the value of the variable 'response' in column S and copies the appropriate range from the found rows to column C of Sheet2 starting in row 9. Cell C8 of Sheet2 has a header in it.
Sub CopyData()
Application.ScreenUpdating =...