Copy row where cell is changed

Hello,

And (Spike) Thanks (again) for the code below

If Me.ComboBox2.ListIndex <> 0 Then
Sheets("FSM").Cells(Me.ComboBox1.ListIndex + 1, 3) = Me.ComboBox2.Value
Me.TextBox1.Value = Me.ComboBox2.Value
End If

So when with this code the cell value is changed in the combobox value.
How can I than select the row that is changed - copy it and paste the row in an other sheet?

.....;Hope this is understandably.

aisietie

Re: Copy row where cell is changed

Hello,

With the code below, the problem is partially solved.
But when multiple cells contains the combobox value, then the code finds the first cell that contains the value, and not the one that was changed.

Private Sub CommandButton1_Click()
    If Me.ComboBox2.ListIndex <> 0 Then
        Sheets("FSM").Cells(Me.ComboBox1.ListIndex + 1, 3) = Me.ComboBox2.Value
        Me.TextBox1.Value = Me.ComboBox2.Value
    End If
  Cells.Find(What:=Me.ComboBox2.Value).EntireRow.Copy
  Sheets("test").Activate
  ActiveSheet.Range("A65536").End(xlUp).Select
            Selection.Offset(1, 0).Select
            ActiveSheet.Paste
    Unload UserForm1
End Sub

What can I change to obtain what I want?

Thx in advance

aisietie

Re: Copy row where cell is changed

Thanks, that works fine.

aisietie