Button click, cut and paste into another spreadsheet data that was filtered

Hi

Try a syntax like

If MsgBox("Favor conferir o número da ordem!" & "-" & Me.TextBox1.Value, vbOKCancel, "Atenção...!") = vbOK Then
    'do your thing
  Else
    Exit Sub
  End If

rylo