I could use a hand with this one.

[The_Rookie]

Ok I have code here that will move the text that is highlighted in yellow in any cell in row C from worksheet A to the same postion in worksheet B.

Dim aColor As Integer
    Dim aCell As Range
    Dim aWorksheet As Worksheet
    Dim bWorksheet As Worksheet
    Set aWorksheet = Worksheets("DATA")
    Set bWorksheet = Worksheets("NegativeFMs")
    
    r1 = 2
    c1 = 1
    a1 = 1
    b1 = 1
    ' get color of  field C
    ' if it is yellow the copy to another workbook
    Do While aWorksheet.Cells(r1, c1 + 2) <> ""
        Set aCell = aWorksheet.Cells(r1, c1 + 2)
        aColor = aCell.Interior.ColorIndex
        If aColor = 6 Then
            bWorksheet.Cells(a1, b1).Value = "'" & aWorksheet.Cells(r1, c1 + 2).Value
            a1 = a1 + 1
        End If
        r1 = r1 + 1
    Loop
End Sub

But what i want to do is instead of moving the text of the yellow cell in row C to worksheet b, I want to move the whole row of any text in any cell thats bold in worksheet a to worksheet b

Example:
Worksheet A
A B C D E F G
N N Y N N N N
T T T S S T T

Workshhet B
A B C D E F G
N N Y N N N N

I hope this makes sense. This would really help me out ALOT, If not thanks for taking a look at it.