Home |
Search |
Today's Posts |
#4
![]()
Posted to microsoft.public.excel.programming
|
|||
|
|||
![]()
I read through that and will try to make things clearer.
My OS is XP Pro, Excel is 2003 The VBA project helps prep daily agri-business data (unique identifiers, names, addresses, count of product) from 14 corporations (with 9 input styles) to give it all the same format so that it can be further standardized and loaded to a web enabled tracking database. It currently consists of ~2100 lines of code (and notes) and 5 userforms, 3 that are non modal single button "break" forms for user input on the data sheets and 2 radio button forms for selecting which corporation datasets to work on. The error I am getting occurs at the line to show the last (and newest to this project) radio button form: '.... this is the last 15 or so lines of the 2nd to last sub cdir = CurDir ChDrive "T" ChDir "T:\Groups\PAM\Meat Juice Lab\Meatjuice main mjjohn\Producer Files" Do fname = Application.GetSaveAsFilename("save as 0 'alldate'", _ fileFilter:="Excel Files (*.xls), *.xls") If fname < False Then If Dir(fname) < "" Then fname = False End If End If Loop Until fname < False ActiveWorkbook.SaveAs Filename:=fname ActiveWorkbook.Close ChDrive cdir ChDir cdir PP15_01_03TypeFile_form.Show ' ERROR HERE with the original error msg End Sub I found this morning if I set a breakpoint on one of the last few lines in this sub I can step through and get the form. Otherwise it errors. Thanks again for any help. On Nov 12, 5:09*pm, JLGWhiz wrote: You should read this and then repost. http://www.cpearson.com/excel/HintsA...roupUsers.aspx Without code to analyze, any answer would be a guess. |
Thread Tools | Search this Thread |
Display Modes | |
|
|
![]() |
||||
Thread | Forum | |||
Is there an easy Copy/Paste of a Userform ? (Entire Userform Including tx & cbx's) | Excel Programming | |||
Excel Throwing Circular Errors When No Errors Exist | Excel Worksheet Functions | |||
Loading Userform Errors 1004 | Excel Programming | |||
Looping procedure calls userform; how to exit loop (via userform button)? | Excel Programming | |||
Unresolved Errors in IF Statements - Errors do not show in results | Excel Worksheet Functions |