VBA - Insert 3 cols after each occupied cell.

[fxken]

I need to start a C1 then go across row 1 and insert 3 columns after each occupied cell.
Thanks
F

 

[Rick Rothstein]

I need to start a C1 then go across row 1 and insert 3 columns after each occupied cell.
Thanks
F

Will there be any blanks in Row 1 starting at C1 and going across to the last data value?

 

[fxken]

Thanks Rick.

No blank cells in row 1 up to last data cell, but number of occupied cells in row 1 can vary.
F