VBA to convert Quarterly data to monthly
<p>I have Quarterly data witch needs to be converted in to monthly i.e. copy A1 and paste it in to B1,B2 and B3. Than A2 in to B4, B5 and B6. So basicaly 4 quarter readings in to 12 monthly readings. 4 cells in to 12. It's about to convert GDP quarterly readings in to 12 months format for for analytical purposes.</p>

<p>I was able to do this</p>

<pre><code>Sub quarter_to_month()
'
' quarter_to_month Macro
'

'
    Sheets("Real GDP %change anu").Select
    Range("B8").Select
    Selection.Copy
    Sheets("quarter to month").Select
    Range("A" &amp; Rows.Count).End(xlUp).Offset(1).Select
    ActiveSheet.Paste
    Range("A" &amp; Rows.Count).End(xlUp).Offset(1).Select
    ActiveSheet.Paste
    Range("A" &amp; Rows.Count).End(xlUp).Offset(1).Select
    ActiveSheet.Paste
End Sub
</code></pre>

<p>but now it probably needs do while loop to get all the results from the quarterly column.
I'm not sure how to do this. Please any suggestions.</p>