Excel VBA to copy rows with a specific criteria

I have an excel sheet in the below format. I would like to search for the project code and copy all the rows into a new sheet until the next project code. Can anyone please help how this can be done in VBA