LinkBack Thread Tools Search this Thread Display Modes
Prev Previous Post   Next Post Next
  #1   Report Post  
Posted to microsoft.public.excel.programming
external usenet poster
 
Posts: 178
Default on error help

Still can't figure this out... assume that all variables are properly
declared. When I comment ( ' ) out the on-error part, the code
operates properly, and if there is an error it will highlight the
MkDir foldername part. But when I make the on error codes active
again, it will execute msgbox and exit sub parts whether or not an
error occurs... What am I doing wrong?

SaveFile = Workbooks("worklist_detail_format_custom.xls").She ets
("sheet1").Range("D20")
MyPath = SaveFile


'Add a slash at the end if the user forget it
If Right(MyPath, 1) < "\" Then
MyPath = MyPath & "\"
End If

'Create folder for the new files
foldername = MyPath & Format(Now, "mm-dd-yyyy") & "\"

On Error Resume Next
MsgBox "The 'Save To Directory' in Worklist Detail Format Does Not
Exist" _
& vbNewLine & "Or A File With Today's Date Already Exists In the
Directory", vbOKOnly
Exit Sub
On Error GoTo 0

MkDir foldername
 
Thread Tools Search this Thread
Search this Thread:

Advanced Search
Display Modes

Posting Rules

Smilies are On
[IMG] code is On
HTML code is Off
Trackbacks are On
Pingbacks are On
Refbacks are On


Similar Threads
Thread Thread Starter Forum Replies Last Post
Error when cell A1 is not active and xlInsideVertical border formatthrowing error 1004 [email protected] Excel Programming 7 August 7th 08 08:43 PM
Error handling error # 1004 Run-time error [email protected] Excel Programming 3 May 20th 08 02:23 PM
Error Handling - On Error GoTo doesn't trap error successfully David Excel Programming 9 February 16th 06 05:59 PM
Form Err.Raise error not trapped by entry procedure error handler [email protected] Excel Programming 1 February 8th 06 10:19 AM
Automation Error, Unknown Error. Error value - 440 Neo[_2_] Excel Programming 0 May 29th 04 05:26 AM


All times are GMT +1. The time now is 09:48 PM.

Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
Copyright ©2004-2025 ExcelBanter.
The comments are property of their posters.
 

About Us

"It's about Microsoft Excel"