[VBA/ DLL C] Passage d'un paramètre

Résolu/Fermé

HOLU - 24 déc. 2009 à 20:52
Darkantas Messages postés 6 Date d'inscription lundi 28 mai 2012 Statut Membre Dernière intervention 4 juin 2012 - 29 mai 2012 à 15:04

Bonjour,

J'ai construit une méthode C dans une dl, et je l'appelle depuis Microsoft Visual Basic (dans Excel) en lui passant un paramètre, mais celui ci n'est pas transmis jusqu'à la fonction C.

Voici mon code :

Fichier dllmain.c :

#include "dll.h"
#include <stdlib.h>
#include <stdio.h>

void __stdcall ecriture(int t)
{
  FILE * fich = fopen("fichier_test.txt", "w");
  fprintf(fich,"%d\n",t);
  fclose(fich);
 
}

Fichier dll.h :

#include <stdio.h>
#include <string.h>
#include <windows.h>

#define export __declspec(dllexport) /* définit la macro EXPORT  */

export void __stdcall ecriture(int t);

Code vba depuis Excel :

Declare Sub ecriture Lib "Projet_test.dll" (t As Integer)

Sub test()

Call ecriture(5)

End Sub

Résultat : Le fichier est bien créé, mais la valeur dedans est "1308054" !
Comment ça se fait?

Merci pour votre aide.

A voir également:

[VBA/ DLL C] Passage d'un paramètre
Remettre parametre usine pc - Guide
Passage qwerty azerty - Guide
Parametre windows - Guide
Changer parametre dns - Guide
Xinput1_3.dll - Forum Windows

2 réponses

Réponse 1 / 2

le père
24 déc. 2009 à 22:30

Bonjour

pas sûr mais je crois que c'est
Declare Sub ecriture Lib "Projet_test.dll" (ByVal t As Integer)

HOLU
24 déc. 2009 à 22:58

En fait vous avez raison, c'etait en partie le ByVal qu'il fallait ajouter, Il faut aussi mettre Long au lieu d'Integer!

Donc il faut mettre :

Declare Sub ecriture Lib "Projet_test.dll" (ByVal t As Long)

Merci beaucoup vous deux !

Darkantas Messages postés 6 Date d'inscription lundi 28 mai 2012 Statut Membre Dernière intervention 4 juin 2012
29 mai 2012 à 15:04

C'est pas grâce au ByVal, en VBA et en C tous les types de variables ne font pas la même taille, il est donc nécessaire de s'aligner sur un seul et unique modèle.
Il existe également une option dans Visual qui permet d'aligner les structures sous le format 4 octets. Je vous conseille de le mettre pour éviter tout futurs problèmes.

Réponse 2 / 2

HOLU
24 déc. 2009 à 22:33

Bonsoir,
ça ne change rien.
Merci à vous

Discussions similaires

XINPUT1_3.dll manquant (missing)

Bonjour,
J'ai installé Need For Speed, tout c'est bien passé mais au moment de le lancer j'ai ce message d'erreur : Impossible de démarrer le programme car il manque XINPUT1_3.dll sur votre ordinateur. Essayez ce réinstaller le programme pour corriger ce problème.
Comment remédier à ce problème ?

Merci d'avance
Maxirugue

Configuration: Windows / Chrome 30.0.1599.101

"L'indice n'appartient à la sélection" + VBA

Bonjour,
Nous avons un problème dans la programmation de notre VBA. Voici notre programme:

Sub Bloucle1Bull()
Dim a, k As Integer

k = 2
Do While Worksheets("formulaire").Cells(2, 2) Worksheets("formulaire").Cells(k, 4)
k = k + 1
Loop

a = 2
Do While Worksheets("formulaire").Cells(k + 1, 4) Worksheets("BDD Call").Cells(a, 1) Or (Worksheets("BDD Call").Cells(a, 4) = (Worksheets("Bullspread").Cells(2, 3) + 100)) Or Worksheets("BDD Call").Cells(a, 7) Worksheets("bullspread").Cells(2, 7)
a = a + 1
Loop

''''''''''''on recopie la ligne du premier call trouvé pour le jour 2 ...

Probleme d'installation jeu pc (il manquerait " XINPUT1_3.dll)

Bonjour, pour commencer j'ai téléchargé grave a utorrent et daemon tools un jeu que je cherche depuis des moooooois (Alice Madness Returns). J'ai suivie a la lettre les indications de tutos sur youtube, et au moment de lancer le jeu un message s'affiche '' Impossible de démarrer le programme car il manque XINPUT1_3.dll sur votre ordinateur. Essayez de réinstaller le programme pour corriger ce problème."
J'ai réinstaller, mais toujours rien. Et a un moment le jeu me demandais une "clé de lancement" avec Oracle il me semble ou quelque chose comme ca..
Je suis preneuse de conseils (si possible sans que mon ordi risque quoi que ce soit), parce que je vais craqueeeeeeeeer !!

Xinput1_3.dll

Bonjour,
j'ai essayé d'installer un jeu qui ne fonctionne pas, car il me manque le fichier Xinput1_3.dll. Je l'ai téléchargé, mais je ne peux pas le mettre dans le dossier système, car je n'ai pas les droits d'administrateur (windows 7). Existe-t-il un autre moyen, soit de bypass les droits admin ou bien d'une façon moins obscure, de régler le problème?

Merci d'avance

Problème avec XINPUT1_3.dll

Bonjour, Je vous demande de l’aide, car quand j’ai voulu lancer plusieurs jeux sur mon PC, il m’affiche un code erreur, tel que «Impossible d'exécuter le code, car XINPUT1_3.dlI est introuvable. La réinstallation du programme peut corriger ce problème.» cordialement, Monsieur Sineux