Testing for blank cells within Copy / Paste Array

I'm still feeling my way around VBA arrays so please forgive what is quick likely a silly question.

I'm trying to streamline a template to consolidate survey questions in which responders can enter multiple answers for the same question (Example: List all of the pets in your household and what foods they eat) so the information can then be fed into a pivot table.

(I've attached an example of my current template with fake data)

I've managed to get everything copy/pasted by pasting entry by entry but I'm at the stage where I'm trying to speed it up.

in my original code I tested the first cell in each 'entry range' as a trigger to exit the For/next loop but I'm having difficulty finding the equivalent if I write the results to an array and then paste in one go.

Ideally I'd like to be able to copy data even if the responder didn't enter information in the first field (as this can relate to people's names and as such they sometimes omit their titles) so I'm trying to test the range.

The code I've got is as below and my thought was to do an If Else loop to check for all of the Entry data fields being blank (first 2 columns are unique identifers which are used in the pivots) and if so, write over those particular entries. I'm sure that there's a better way though.

I'd be very grateful for any assistance anyone was able to offer.

Please Login or Register  to view this content.