Excel VBA質問箱 IV

当質問箱は、有志のボランティア精神のおかげで成り立っています。
問題が解決したら、必ずお礼をしましょうね。
本サイトの基本方針をまとめました。こちらをご一読ください。

投稿種別の選択が必要です。ご注意ください。
迷惑投稿防止のため、URLの入力を制限しています。ご了承ください。


	新規投稿 ┃ツリー表示 ┃一覧表示 ┃トピック表示 ┃検索 ┃設定 ┃過去ログ ┃ホーム

47517 / 76732

←次へ　｜　前へ→


	【34170】Re:EXCELデータを外部プログラムへ

Blue - 06/1/27(金) 16:39 -


	引用なし

	パスワード

とりあえず
> DLLIMPORT double
> ll_double_square (double *);
ですので、
> Declare Function dll_double_square Lib "cdll.dll" _
>　　(Dim d(0 To 4) As Double) As Double
ではなく
Private Declare Function dll_double_square Lib "cdll.dll" (ByRef d As Double) As Double
と宣言してください。
# そもそも Dim は使えない。

VBAであれば、
Sub test()
　　Dim d(0 To 4) As Double
　　Dim r As Double
　　
　　d(0) = 1.3
　　d(1) = 3.9
　　d(2) = 5.2
　　d(3) = 10.3
　　d(4) = -0.5
　　
　　r = dll_double_square(d(0))
End Sub

とすれば使用できます。

> =dll_double_square(B10:B14)
のように
ワークシート関数として使用できるかはワカリマセン。

1 hits

▼

【34168】EXCELデータを外部プログラムへ 稲葉 06/1/27(金) 16:12