Copying partial rows with matching criteria using VBA

I am trying to copy data from rows when the value in column B matches a certain, specified value. Currently, I have the below formula that successfully copies all of the matching rows into the destination sheet.

Please Login or Register  to view this content.

However, I do not need to copy the values in the first columns of the source data, so I attempted to adjust the formula to account for that:

Please Login or Register  to view this content.

Unfortunately, when I run this formula, all of the matching rows seem to copy properly but they overwrite on the same row of the destination sheet rather than properly moving down a row for each entry as the first formula does. How can I fix the second formula so that it works in the same manner as the first one?

Perfect. Thanks so much!