Discussion :

[Invité]

Bonjours tout le monde,

Je suis nouveau sur le forum.

Je voudrai m'initier à l'OPENGL sur Excel bien que je sois novice en terme de VBA (j'ai commencé il y a 2 mois environ), je connais bien Excel (Tableur) en lui-même et j'ai assez vite appris le VBA (à un niveau de novice j'entends).

J'ai donc regardé "l'excellent" article dispo sur ce site même intitulé :
Découvrez OpenGL 1.1 en VB6/VBA

Seulement voilà, je bloque dès le début.
"Impossible de charger la librairie freeglut"

Pas moyen de charger freeglut.dll
Enfaite, je ne sais pas où placer cette dll

J'ai bien remplacé le "CurrentProject.Path" par "ThisWorkBook.Path", mais rien n'y fait.

Donc, où faut il placer cette dll pour que le VBA l'a trouve ?

Merci.


P.S.: Je précise que je suis en x64 et que j'ai bien remplacé les "Declare" par "Declare PtrSafe" qui est nécessaire en x64.

J'ai une petite question subsidiaire:

Peut-on faire appel à DirectX sous Excel VBA ?

[eriiic]

Bonjour,

quand tu parles de x64 tu parles de windows ou d'excel ?
Pour excel il faut installer la version 32 bits même si tu as windows 64 bits.
Excel 64 bits est réservée à des besoins bien spécifiques : bases de données énormes et à plein d'incompatibilités.
Par exemple impossible d'utiliser les contrôles classiques qui ont des ocx souvent en 32 bits.
Ton problème rejoint sans doute ces restrictions si tu as installé cette version.

eric

[Invité]

Bonjour,
Merci pour cette réponse.

Il s'agit de Excel 2013 64 bit. On ne peux pas préciser la version lors de la création du message, ce qui est dommage puisque il y a XL-2010-x64 et XL-2013-x64 en plus des autres versions.

Donc, il y aurai de forte chance pour que ça provienne du 64 bit ?

Si je saute l'étape du chargement de freeglut.dll, j'ai:
erreur 48
Fichier introuvable: freeglut'

Dans l'article, il est dit qu'en mettant freeglut dans un certain répertoire (Lequel ?), il n'est pas nécessaire de charger freeglut.

Enfaite, je ne sais pas de quel répertoire ils parlent lorsqu'ils disent:

Placez la librarie freeglut.dll dans le même répertoire que l'application Office ou le projet VB6.

ou

Notez qu'on a placé la librairie freeglut.dll dans le même répertoire que l'application.
Pour appeler les fonctions de cette librairie, il faut donc d'abord la charger.

Si on avait placé cette librairie dans le répertoire système de Windows, il n'aurait pas été nécessaire de la charger.

[BlueMonkey]

Bonjour,

Dans l'article, il est dit qu'en mettant freeglut dans un certain répertoire (Lequel ?), il n'est pas nécessaire de charger freeglut.

Enfaite, je ne sais pas de quel répertoire ils parlent lorsqu'ils disent:

Il est possible que les appels à la DLL échoue du fait que la version Excel est une version 64 bits.
Mais pour l'instant, le problème est que l'application ne trouve pas la DLL.

Pour information, sur tout système Windows (ce qui suit est vrai pour Excel, mais aussi pour tous les exécutables)
les DLL sont d'abords cherchées dans le dossier où se trouve l'application lancée (donc ici dans le dossier où se trouve Excel),
puis dans un des dossiers du PATH.

A vérifier, mais pour un XL2013 64 bits :
- le dossier où se trouve Excel doit être %programfiles%\Microsoft Office\Office16
- pour voir les dossiers du PATH, tu peux faire :
touches <Windows> + <R>
tape echo %path% puis <Entrer>

Donc :
- soit tu modifie la variable d'environnement PATH pour y ajouter ton propre dossier de travail,
(voir le Panneau de configuration Système -> Paramètres avancés -> Variables d'environnement)
- soit tu copie la DLL dans un dossier couramment utilisé C:\Windows\System32.

Chacune de ces méthodes doit fonctionner pour que VBA trouve la DLL.

A+

P.S. Un p'tit conseil pour avoir plus de chance d'avoir une réponse sur le forum :
un message à 0 réponses à plus de chance d'être vu. Donc vas-y molo sur les <UP>

[eriiic]

Bonjour,

sans rien retirer à ce qu'à dit BlueMonkey au sujet des path, je te conseille fortement de désinstaller office 64 bits et d'installer office 32 bits. Tu as 2 packs différents, il faut télécharger le bon.
A lire : http://technet.microsoft.com/fr-fr/l.../ee681792.aspx

eric

[Invité]

Merci beaucoup beaucoup pour vos réponse.

Enfaite rien ne marchait, j'avais mis freeglut.dll dans casiment tous les répertoires, et après beaucoup d'acharnement et de recherche, j'ai téléchargé 2 autres versions de freeglut, et à l'instant même, sans même y croire vraiment, j'ai réussi à avoir une fenêtre qui s'ouvre, mais uniquement en ayant lancé la Macro en hométant la 1ère ligne de code (chargement de freeglut). Je ne sais pas encore pourquoi ça à marché. J'ai fait comme conseillé dans le fichier d'aide de freeglut, placé 2 répertoire dans
C:\Program Files\Common Files\MinGW
C:\Program Files\Common Files\MSVC
en mettant le lib et le include donné avec freeglut, mais c'est lorsque j'ai mis le freeglut x64 dans le SysWOW que ça à marché. Marché entre guillemet pour l'instant, mais ce qui comptais pour moi était d'avoir au minimum une fenêtre qui s'ouvre.


La 1ère étape du code sinon ne fonctionne pas, il faut passer directement à la 2ème ligne (' Initialisation de la librairie).


P.S.: La fenêtre est apparu 1 seul fois, je l'ai fermé, puis ne veux plus réapparaitre, mais il n'y a plus d'erreur de code sur la 2ème ligne (' Initialisation de la librairie), puis 3ème, mais aucune fen^tre ne s'ouvre, même en fermant le fichier Excel, puis en le réouvrant ensuite.

Je vais creuser un peu plus.

@eriiic,

Non, le 64 bit est très bien. et j'ai des simulations personnelles futurs, qui lorsque je commencerai à bien me servir du VBA, dépasseront les 2 Go permis par le x86. L'une de mes simu me prends déjà 700 Mo en RAM alors que je souhaiterai ajouter 4 à 16 fois plus de données dans mes feuilles de calculs.

Mais merci du conseil cela dit.

Bon, j'ai supprimé la dll en version x64 du SysWOW64, et ça marchait encore, puis je l'ai supprimer du Systeme32 et ça ne marche plus. Donc ça venait de la version de la dll. Celle qu'il faut est la version 2.8.1 issu du freeglut 2.8.1 MinGW Package situé dans le répertoire:
freeglut-MinGW-2.8.1-1.mp\freeglut\bin\x64
qu'il faut ensuite mettre dans le C:\Windows\System32


P.S.:
Finalement, j'ai essayé avec l'autre version (freeglut 2.8.1 MSVC Package), et voici ce que j'ai:

Elle marche même après l'avoir fermé. Je vais creuser pour la suite des événements.

A+