Hi everyone,

My name is Dora. I'm a fairly new user of excel vba. i've been working on creating this userform where 15 engineers get to enter information in a shared workbook. The userform is set up to automatically enter value in designated cells based on column headers...

The purpose of my thread this morning is to find out how, when one of my users select an entry from a combobox, "Release for fabrication", for excel to automatically copy the entire row (once values are entered into the cells), and paste it in the next blank row.

I tried doing this as a workbook_beforeclose event, but it's not working. it keeps giving me a bunch of errors and i don't know how to fix the code. Please see below. Any help would be greatly appreciated.
Private Sub Workbook_BeforeClose(Cancel As Boolean)

Set wb = Worksheets("ORDERS")

With wb
Dim val As Integer
val = UsedRange.Rows.Count
For i = 1 To val Step 1
If Cells(i, 3).Value = "Release for Fabrication" Then
Rows(i).EntireRow.Copy Destination:=Worksheets("ORDERS").Range("A65536").End(xlUp).Offset(1, 0)
End If
Next
End With

End Sub