Hi,
It is my program that opens a folder " My_Folder" in VBA.
But if there is an error, windows exploere showes the error not my program. why??
best wishes
-------------------------------------
Private Sub Show_Input()
Dim My_Folder As String
My_Folder = "A:ddd"
On Error GoTo Error_Show_Input:
Shell "c:windowsexplorer " + My_Folder, 1
On Error GoTo 0
Exit Sub
Error_Show_Input:
MsgBox "Progran can not open this folder." + Chr(13) + Chr(10) + "[" + Error(Err) + "]", vbOKOnly, "Error"
End Sub
It is my program that opens a folder " My_Folder" in VBA.
But if there is an error, windows exploere showes the error not my program. why??
best wishes
-------------------------------------
Private Sub Show_Input()
Dim My_Folder As String
My_Folder = "A:ddd"
On Error GoTo Error_Show_Input:
Shell "c:windowsexplorer " + My_Folder, 1
On Error GoTo 0
Exit Sub
Error_Show_Input:
MsgBox "Progran can not open this folder." + Chr(13) + Chr(10) + "[" + Error(Err) + "]", vbOKOnly, "Error"
End Sub