Do you wonder if your IT business is truly profitable or if you should raise your prices? Learn how to calculate your overhead burden using our free interactive tool and use it to determine the right price for your IT services. Start calculating Now!
What do I have to do to make my DLL able to be registered
I have written a DLL in VB (not using MS visual studio)
I intend to use these function in Excel VBA
the code compiles without a problem but I can't register it.
I get the following message the dll was loaded but the entry-point dllRegisterserver was not found.
is there something in the code that I need to add to make this work?
I intend to use these function in Excel VBA
the code compiles without a problem but I can't register it.
I get the following message the dll was loaded but the entry-point dllRegisterserver was not found.
is there something in the code that I need to add to make this work?
Do more with
EXPERT OFFICE® is a registered trademark of EXPERTS EXCHANGE®
Thank you John. I agree I wasted time following Kanti's links.
Marcoshadow: OK so I have what I think is a COM dll. how can I use the Dll via VBA?
Marcoshadow: OK so I have what I think is a COM dll. how can I use the Dll via VBA?
it is written in VB.
I have never done this before.
I used the editor "Microsoft visual Basic 2008 Express Edition"
I created a new project of type Class library and in it I add a module/class
the code looks like this:
Option Explicit On
Public Class Zakaut_calculations
Public ReadOnly Property Zakaut_Kids_Point(ByVal NumberOfKids As Integer) As Integer
Get
Return Calculate_Kids_Points(Numb
End Get
End Property
Public Function Calculate_Kids_Points(ByVa
If intNumkids > 0 Then
Select Case intNumkids
Case 1
Calculate_Kids_Points = 350
Case 2, 3, 4
Calculate_Kids_Points = (350 + ((intNumkids - 1) * 150))
Case Is > 4
Calculate_Kids_Points = (800 + ((intNumkids - 4) * 100))
Case Else
Calculate_Kids_Points = 0
End Select
Else
Calculate_Kids_Points = 0
End If
End Function
Public Sub New(ByVal NumberOfKids As Integer)
MsgBox("Class started/ended", vbOKOnly, " ")
End Sub
Protected Overrides Sub Finalize()
MsgBox("Class started/ended", vbOKOnly, " ")
MyBase.Finalize()
End Sub
End Class
I have never done this before.
I used the editor "Microsoft visual Basic 2008 Express Edition"
I created a new project of type Class library and in it I add a module/class
the code looks like this:
Option Explicit On
Public Class Zakaut_calculations
Public ReadOnly Property Zakaut_Kids_Point(ByVal NumberOfKids As Integer) As Integer
Get
Return Calculate_Kids_Points(Numb
End Get
End Property
Public Function Calculate_Kids_Points(ByVa
If intNumkids > 0 Then
Select Case intNumkids
Case 1
Calculate_Kids_Points = 350
Case 2, 3, 4
Calculate_Kids_Points = (350 + ((intNumkids - 1) * 150))
Case Is > 4
Calculate_Kids_Points = (800 + ((intNumkids - 4) * 100))
Case Else
Calculate_Kids_Points = 0
End Select
Else
Calculate_Kids_Points = 0
End If
End Function
Public Sub New(ByVal NumberOfKids As Integer)
MsgBox("Class started/ended", vbOKOnly, " ")
End Sub
Protected Overrides Sub Finalize()
MsgBox("Class started/ended", vbOKOnly, " ")
MyBase.Finalize()
End Sub
End Class
So your dll is written in vb.net, you have to use regasm.exe to register your assembly.
1. Open an elevated command prompt
2. Type the following command:
[path to regasm.exe] [space] [path to your dll] [space] [/tlb:] [desired name, you can use the dll name] [.tlb]
3. In the VBE add a reference to the tlb file
1. Open an elevated command prompt
2. Type the following command:
C:\Windows\Microsoft.NET\Framework\v4.0.30319\RegAsm.exe C:\Users\MacroShadow\Desktop\Zakaut.dll /tlb:Zakaut.tlb
[path to regasm.exe] [space] [path to your dll] [space] [/tlb:] [desired name, you can use the dll name] [.tlb]
3. In the VBE add a reference to the tlb file
Premium Content
You need an Expert Office subscription to comment.Start Free Trial