Visual Basic - no me deja trabajar este erro!

error 75 en tiempo de ejecucion

error de acceso a ruto o archivo

Private Sub mnuSave_Click()
With dlgCommonDialog

.DialogTitle = "Guardar"
.CancelError = False
.Filter = "Página HTML (*.html,*.htm)|*.html, *.htm"
.ShowSave
End With
Open dlgCommonDialog.FileName For Output As #1
Print #1, rtfText.Text
Close #1

End Sub

fijense en eso codigo, si colocas cancelar sin guardar sale ese error, como lo soluciono??

gracias!

www.nicolasrivera.tk

Puedes utilizar lo siguiente para salvar el error
Private Sub mnuSave_Click()
With dlgCommonDialog
On error Goto Errores
.DialogTitle = "Guardar"
.CancelError = False
.Filter = "Página HTML (*.html,*.htm)|*.html, *.htm"
.ShowSave
End With
Open dlgCommonDialog.FileName For Output As #1
Print #1, rtfText.Text
Close #1

Errores :
If Err.Number =75 Then exit sub

End Sub
Es una manera charra de hacerlo

hola, gracias, pero me sale "etiqueta no definioda" para con On Error GoTo errores

que hago?

ya funciono, gracias, gracias!!!