On Sep 26, 9:56*pm, ryguy7272
wrote:
Name one sheet 'CopyFrom' and name another sheet 'CopyTo'. *
Run code...........

Sub Copyx()
Dim RngColF As Range
Dim i As Range
Dim Dest As Range
Sheets("CopyFrom").Select
Set RngColF = Range("C1", Range("C" & Rows.Count).End(xlUp))
With Sheets("CopyTo")
Set Dest = .Range("A1")
End With
For Each i In RngColF
If i.Value = "x" Then
i.EntireRow.Copy Dest
Set Dest = Dest.Offset(1)
End If
Next i
End Sub

HTH,
Ryan---

--
Ryan---
If this information was helpful, please indicate this by clicking ''Yes''..

"Mandy" wrote:
SORRY my request should be COLUMN C - not row c.
Thanks
Mandy

I need a macro or formula that says If COLUMN C = ADOTG , Then Copy
Entire
Row Into A New Sheet. (ADOTG is the name of the event). Can anyone help
this excel beginner?
Thanks Mandy

*** Sent via Developersdexhttp://www.developersdex.com***

Thank you Ryan - this was very helpful!