Try the following macro:

Sub temp()
Dim x As Long
Dim i As Long
Dim s As String
Sheets("Sheet1").Activate
x = Cells(65536, 1).End(xlUp).Row
For i = x To 1 Step -1
s = i & ":" & i + 2
Rows(s).Insert
Next i
End Sub

This assumes your sheet is called "Sheet1" -- otherwise change the code.
You can put this macro in a new module and just run it.

Art

"dhjacha" wrote:

Pleaseeee help me! I have a worksheet with rows from 1 till 1300 and i need
to add
a 3 rows in between each data row.
I mean if i have
1 Data
2 Data
3 Data
And I want
1 Data
2Blank
3Blank
4Blank
5 Data
6Blank
7Blank
8Blank
9 Data

How do I do, please I really need this and am to looser in excel, how can i
make this easy way.

Thanks so much