If nr = "" Then
MsgBox "fel"
End If

så ser if-satsen ut..jag vill att den avbryter om nr = "" och börjar om

If nr = "" Then
MsgBox "fel"
Exit Sub
' eller Exit Function om det står i en Function
End If

Förmodligen kommer nr från en TextBox, då kan du göra så här

If nr = "" Then
MsgBox "Nr. får ej vara tomt"
Text1.Text SetFocus 'aktuell TextBox
Exit Sub
' eller Exit Function om det står i en Function
End If

Ett exempel hur jag löst ett liknande problem

Private Sub txtKurs_KeyPress(KeyAscii As Integer)
Select Case KeyAscii
Case 8, 13, 48 To 57 ' tillåt bara Siffror Enter och BackSpace
If KeyAscii = 13 Then
If txtKurs.Text <> "" Then _
Call KompassKurs(CLng(txtKurs.Text))
End If
Case Else
KeyAscii = 0
End Select
End Sub

Vad är det för kod du vill avbryta? Skulle underlätta oss om du visad i vilket sammanhang din kod körs eller om du lägger in hela din rutin.

Löste det själv efter några försök :) är ny inom vb :)

exit sub använde jag mig