My goal is to copy entire rows from one sheet (Estimate) to their respective categories in another sheet (Labor), based on values in Column C.
The code that I have now is preliminary and is currently only moving "FRA" items, as I plan to add the other categories when I get the code working.
The problem is that I cannot figure out how to get items to paste into specific rows on the destination sheet (Labor).
Here are screen shots of each sheet and a copy of my current code.
The code that I have now is preliminary and is currently only moving "FRA" items, as I plan to add the other categories when I get the code working.
The problem is that I cannot figure out how to get items to paste into specific rows on the destination sheet (Labor).
Here are screen shots of each sheet and a copy of my current code.
VBA Code:
Sub CopyRows()
Dim bottomL As Integer
Dim x As Integer
bottomL = Sheets("Estimate").Range("C" & Rows.Count).End(xlUp).Row: x = 1
Dim c As Range
For Each c In Sheets("Estimate").Range("C1:C" & bottomL)
If c.Value = "FRA" Then
c.EntireRow.Copy Worksheets("Labor").Range("A" & x)
x = x + 1
End If
Next c
End Sub