Excel How To Repeat multiple values based on a Cell Value X Times Skipping the Zeroes

Question

I\'ve already managed to get the values to repeat x times as a Cell is appointing:

Sub CopyData() 
Dim Rng As Range
Dim InputRng As Range, OutRng As Range
xTitleI