ExcelBanter

ExcelBanter (https://www.excelbanter.com/)
-   Excel Programming (https://www.excelbanter.com/excel-programming/)
-   -   Create Class Module using late binding (https://www.excelbanter.com/excel-programming/355999-create-class-module-using-late-binding.html)

Mariano B.

Create Class Module using late binding
 
I have a code that creates a new workbook that has some macros within. One of
the is an event handler (I want some stuff to happen everytime a Pivot-Table
is updated).
I did it using early binding and it worked for me nut not to most of the
users. So I tried to switch to late binding.
I only need to know how to create a new class module.
Here is an example of what i did:

Sub Test1()
Dim module As Object
Set module = ThisWorkbook.VBProject.VBComponents.Add(1)
module.Name = "hola"
module.CodeModule.AddFromString ("'TESTING")


ThisWorkbook.VBProject.VBComponents.Item("ThisWork book").CodeModule.AddFromString ("'Just to see it works")
End Sub


Does anybody know how to get it done?
Thanks


--
Mariano

RB Smissaert

Create Class Module using late binding
 
Most things you need to know about programming the VBE are he
http://www.cpearson.com/excel/vbe.htm

RBS

"Mariano B." wrote in message
...
I have a code that creates a new workbook that has some macros within. One
of
the is an event handler (I want some stuff to happen everytime a
Pivot-Table
is updated).
I did it using early binding and it worked for me nut not to most of the
users. So I tried to switch to late binding.
I only need to know how to create a new class module.
Here is an example of what i did:

Sub Test1()
Dim module As Object
Set module = ThisWorkbook.VBProject.VBComponents.Add(1)
module.Name = "hola"
module.CodeModule.AddFromString ("'TESTING")


ThisWorkbook.VBProject.VBComponents.Item("ThisWork book").CodeModule.AddFromString
("'Just to see it works")
End Sub


Does anybody know how to get it done?
Thanks


--
Mariano



Mariano.

Create Class Module using late binding
 

Thanks, I saw that page (in fact, it helped me create the first version of
my app), but it doesn't say anything about class modules .

Greetings

--
Mariano Beguerisse


"RB Smissaert" wrote:

Most things you need to know about programming the VBE are he
http://www.cpearson.com/excel/vbe.htm

RBS



Mariano.

Create Class Module using late binding
 
Got it, all I hat to do is create a class module somewhere else and export it
as a .cls file and then import it on the new workbook like this:

Sub Test1()
Dim clsName As String

clsName = "C:\SRC\XMedios\PvtUpdt.cls"

ThisWorkbook.VBProject.VBComponents.Import fname

End Sub


Chip Pearson seems to be the answer to everything.
Thanks!


--
Mariano Beguerisse


"RB Smissaert" wrote:

Most things you need to know about programming the VBE are he
http://www.cpearson.com/excel/vbe.htm

RBS




All times are GMT +1. The time now is 01:42 PM.

Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
ExcelBanter.com