J'ai deja pose cette question sur le forum delphi
Pourquoi je ne peux pas appeler cette function sous vba
AppelCode:
1
2
3
4
5
6
7
8
9 library Test; function Test(X:integer):integer ; stdcall ; begin result:=X; end; exports Test ; begin end.
Code:
1
2
3
4
5
6
7 Option Explicit Private Declare Function Test Lib "Test" (X As Long) As Long Sub oprt_1() Dim nums As Long nums = 1200 MsgBox Test(nums) End Sub