Importing components modules error ???? F!,F1,F1

HarryS

Board Regular
Joined
May 2, 2008
Messages
212
I have been using code like
.......................................
LL = 0
On Error Resume Next
LL = Len(wVbProj.VBComponents(CompName).Name)
If LL = 0 Then
wVbProj.VBComponents.Import (Foundfn)
End If
......................................
to import Foundfn ( found file name ) into wVbProject...
IF the CompName is nothing
test.cls imports great when component test is not there
If test is there then testa.cls imports as test1 module
then
testb.cls imports as test2 module


In general if class module abcd exists then any file like
abcd???.cls imports as abcn1,abcd,2,abcd3 ect

F1,F1,F1 Please
 

Excel Facts

Save Often
If you start asking yourself if now is a good time to save your Excel workbook, the answer is Yes
Sorry about that I was trying to name class modules other than tha name of the class object...Bad cas of gross stupidy... Sorry about that
 
Upvote 0

Forum statistics

Threads
1,215,054
Messages
6,122,897
Members
449,097
Latest member
dbomb1414

We've detected that you are using an adblocker.

We have a great community of people providing Excel help here, but the hosting costs are enormous. You can help keep this site running by allowing ads on MrExcel.com.
Allow Ads at MrExcel

Which adblocker are you using?

Disable AdBlock

Follow these easy steps to disable AdBlock

1)Click on the icon in the browser’s toolbar.
2)Click on the icon in the browser’s toolbar.
2)Click on the "Pause on this site" option.
Go back

Disable AdBlock Plus

Follow these easy steps to disable AdBlock Plus

1)Click on the icon in the browser’s toolbar.
2)Click on the toggle to disable it for "mrexcel.com".
Go back

Disable uBlock Origin

Follow these easy steps to disable uBlock Origin

1)Click on the icon in the browser’s toolbar.
2)Click on the "Power" button.
3)Click on the "Refresh" button.
Go back

Disable uBlock

Follow these easy steps to disable uBlock

1)Click on the icon in the browser’s toolbar.
2)Click on the "Power" button.
3)Click on the "Refresh" button.
Go back
Back
Top