|
使用環境は以下です。
Excel2000
Microsoft Visual Basic .NET
.NET Framework1.1
以下の手順を踏んでVBAからDLLを利用できません。
どなたか何が不足しているのかご教授をよろしく
願います。
手順1)
VB.NETで、プロジェクト名をCOM2NETtestとし、
下記のソースを作り、ビルドして
C:\COM2NETtest\bin直下にCOM2NETtest.dllを
作成しました。
Public Class NETclass
Public Function GetValue(ByVal data As String) As String
Return "このデータは、" & data
End Function
Public Function GetDate() As Date
Return Now
End Function
End Class
手順2)
デスクトップにExcelファイルを作成し、VBEを起動し、
ThisWorkBookに下記のコードを書きました。
Option Explicit
Private Declare Function GetValue Lib "C:\COM2NETtest\bin\COM2NETtest.dll" (ByVal data As String) As String
Public Sub showmsg()
MsgBox GetValue("AAAA")
End Sub
手順3)
コンパイルした後、showmsgメソッドにステップを置いて
実行したら、以下のエラーメッセージが出ます。
[エントリGetValueがDLLファイル
C:\COM2NETtest\bin\COM2NETtest.dll内に見つかりません。]
|
|