germansalvia respondió:
El error es trapeable, es el nro 68, te paso un ejemplo: Private Sub Drive1_Change() On Error GoTo Herror Dir1.Path = Drive1.Drive Exit Sub Herror: If Err.Number = 68 Then MsgBox "no hay dispositivo" End If End Sub Te paso tambien un ejemplo mejor de...