Hello - I have a range of values in one tab called "Debt" and I want to tranpose the data into rows starting in cell C2 on my "Statatest" tab. However, I would like to paste the data on every fifth row. I cannot figure out how to do this my current code only pastes and transposes to one row. In all, I have five worksheets with data I want to copy and transpose to the Statatest tab. Any thoughts are greatly appreciated?

As you can see from the code I am a VBA novice...

Here is my code:

Sub test()
Sheets("Statatest").Select
Columns("C:C").Select
Range(Selection, Selection.End(xlToRight)).Select
Range(Selection, Selection.End(xlToRight)).Select
Selection.ClearContents
Range("C1").Select
Sheets("Data").Select
Sheets("Statatest").Select
Sheets("Statatest").Move After:=Sheets(5)
Sheets("Productivity").Select
Range("B6:B1000").Select
Range("B6").Activate
Selection.Copy
Sheets("Statatest").Select
Range("C1").Select
Selection.PasteSpecial Paste:=xlPasteAll, Operation:=xlNone, SkipBlanks:= _
False, transpose:=True
Sheets("Debt").Select
Range("AE10").Select
Range(Selection, Selection.End(xlDown)).Select
Range(Selection, Selection.End(xlToRight)).Select
Application.CutCopyMode = False
Selection.Copy
Sheets("Statatest").Select
Sheets("Statatest").Select
Range("C2").Select
Selection.PasteSpecial Paste:=xlPasteAll, Operation:=xlNone, SkipBlanks:= _
False, transpose:=

End Sub