Home |
Search |
Today's Posts |
#1
Posted to microsoft.public.excel.programming
|
|||
|
|||
Compile Error, Can'f Find Project or Library
I have this code in my executable: taskno = ActiveSheet.Range("c65536").End(xlUp).Value If taskno = Range("c1").Value Then taskno = Right(Year(Now()), 2) & "-" & Init & "-00" Else If Left(taskno, 2) < Right(Year(Now()), 2) Then taskno = Right(Year(Now()), 2) & "-" & Init & "-00" End If End If I have other areas in my code looking for "Mid", "Left", "Right" an changing text from mixed/lower case to UCase. In Excel 97 - this cod worked fine. Now I get the "Compile Error, Can't find Project o Library and the error stops on the "Right", "Mid", "Left" etc. I ge this error in Excel 2000 and 2002. I know I've run into this problem before, but for whatever reason, can't seem to get to the answer now. Basically, this code is to count a task number with a persons initial based on the year the task is generated in. The "result" would look like this: 03-TH-00 for the first task of th year, then the next task would be 03-TH-01 and so on. Ted Herrman ----------------------------------------------- ~~ Message posted from http://www.ExcelTip.com ~~View and post usenet messages directly from http://www.ExcelForum.com |
#2
Posted to microsoft.public.excel.programming
|
|||
|
|||
Compile Error, Can'f Find Project or Library
From a previous post by Tom Ogilvy,
In the VBE with this workbook as the Active Project, look in Tools References and see if you see any references marked as missing. If so, either browse for them or unselect them. HTH Paul -------------------------------------------------------------------------------------------------------------- Be advised to back up your WorkBook before attempting to make changes. -------------------------------------------------------------------------------------------------------------- I have this code in my executable: taskno = ActiveSheet.Range("c65536").End(xlUp).Value If taskno = Range("c1").Value Then taskno = Right(Year(Now()), 2) & "-" & Init & "-00" Else If Left(taskno, 2) < Right(Year(Now()), 2) Then taskno = Right(Year(Now()), 2) & "-" & Init & "-00" End If End If I have other areas in my code looking for "Mid", "Left", "Right" and changing text from mixed/lower case to UCase. In Excel 97 - this code worked fine. Now I get the "Compile Error, Can't find Project or Library and the error stops on the "Right", "Mid", "Left" etc. I get this error in Excel 2000 and 2002. I know I've run into this problem before, but for whatever reason, I can't seem to get to the answer now. Basically, this code is to count a task number with a persons initials based on the year the task is generated in. The "result" would look like this: 03-TH-00 for the first task of the year, then the next task would be 03-TH-01 and so on. Ted Herrmann ------------------------------------------------ ~~ Message posted from http://www.ExcelTip.com/ ~~View and post usenet messages directly from http://www.ExcelForum.com/ |
Reply |
Thread Tools | Search this Thread |
Display Modes | |
|
|
Similar Threads | ||||
Thread | Forum | |||
Compile error: Can't find project or library | New Users to Excel | |||
Can't Find Project or Library Error | Excel Discussion (Misc queries) | |||
can't find project or library - error | New Users to Excel | |||
help with this error-Compile error: cant find project or library | Excel Discussion (Misc queries) | |||
Compile Error! Can't find project or Library --- Help! | Excel Programming |