You were doing pretty good until you got to this:

".......but
the rows also contain the letters "F" "G" "H" and I dont want the macro
pasting row 1 into any of those other rows that contain any other
letters.....

For i = 1 To 6000
If Cells(i, 1) = "D" Then
Range("A1").EntireRow.Copy Range("A" & i)
End If
Next

This snippet will walk down column A for 6000 rows and find every cell with
"D" in it, copy row 1 and paste it to the row where "D" was found, but it
overwrites whatever is in the row that is pasted to.

If that is not what you want, you need to be specific about what you want to
copy and where you want to put it.

"Ian Durst" wrote:

Hey guys I have a very limited knowledge in visual basic and i need some
help..........I would like some sort of macro that will take the data in
an entire row that I specify and copy that row and paste that exact row
and format into each row below it that contains a certain value in a
column............for example:

I have an excel sheet and in row 1 I have a lot of data, I need to be
able to search all of the data in the rows below it for the letter "D"
and every cell in the A colomn that has the letter "D" I need to paste
the data from Row 1 into that any row below it containing "D".......but
the rows also contain the letters "F" "G" "H" and I dont want the macro
pasting row 1 into any of those other rows that contain any other
letters.....there is around 6000 rows in all and I really do not want to
do each individually by hand and my visual basic skills are slim to
none.....hope you guys can help...........thanx

*** Sent via Developersdex http://www.developersdex.com ***