Autofill Dynamic Range (empty row in between groups)

Hi guys,

I'm looking to autofill a dynamic range that has empty rows in between groups. I've attached a sample data for better understanding - i'm trying to autofill column D that has dynamic starting cells. The code below uses D2 as a dynamic range but this only fills up group A (I need group B, C, D (dynamic range) to be autofilled as well. I've been searching for a couple of days now but couldn't find something specific to solve my challenge.

Please Login or Register  to view this content.

TIA!

Holy mackerel, thanks AlphaFrog!

Works great with numbers in Column C. I was hoping to reapply the same vba on another column with text values and changed xlNumbers to xlTextValues as seen below but what it did was autofill the first group with the header instead of the first value in Column D. Am I missing something?

Please Login or Register  to view this content.

Thanks again!