Change the line
toIf iexit = vbYes Then
and remove the End If after the Next ctlIf iexit <> vbYes Then Exit Sub
Change the line
toIf iexit = vbYes Then
and remove the End If after the Next ctlIf iexit <> vbYes Then Exit Sub
Semper in excretia sumus; solum profundum variat.