Hata mesajından sonra userform açılsın

[ildizim]

aşağıdaki gibi bir file açma kodum var. şu anda eğer dosya açma işlemi çalıştırılır fakat sonra cancel'la sonra vazgecilirse msgbox'la uyarı verdirip
kullanıcıya endi tıklatıyorum buna ilaveden. hata mesajından sonra userform1'in otomatik çalışmasını istiyorum.
buraya ialve birşeyler yapılabilirmi?

not: bugün kafanızı cok ağrıttıp kusura bakmayın.

Function ismail()
Dim filetoopen
filetoopen = Application.GetOpenFilename("All Files (*.*),*.*")
ismail = filetoopen
If ismail <> "False" Then
Else
MsgBox "İşlemden vazgeçtiniz,bundan sonraki mesajda End tuşuna basınız."
End If
End Function

 

[htsumer]

MsgBox'tan sonra
UserForm1.Show

 

[ildizim]

olmuyor başka bir şeyler lazım çünkü Function ismail() komutunu

Workbooks.OpenText Filename:=ismail, Origin:=857, _
StartRow:=1, DataType:=xlFixedWidth, FieldInfo:=Array(Array(0, 2), Array(89 _
, 1)), TrailingMinusNumbers:=True
ActiveCell.SpecialCells(xlLastCell).Select

gibi dosya açmada kullanıyorum. o yüzden buralarda takılıyor.