Discussion :

[Rikky13]

Bonjour,

Ne trouvant pas de solution à mon problème, je poste ce message en espérant qu’un petit génie va pouvoir m’aider..

J’ai écrit des macros utilisant les listview avec Excel 2010 sur un PC fonctionnant sous win7 64bits.
Le fichier mscomctl.ocx ce trouve dans le dossier SysWow64 de Windows. Tout fonctionne correctement sur cette machine.

Mon fichier doit également fonctionner sur Excel 2003 sur des machines fonctionnant avec Win XP 32 bits et la problème, car à chaque ouverture du fichier VBA me dit qu’il ne trouve pas Mscomctl.ocx, ce qui est normal vu qu’il est dans System32…

Pour que cela fonctionne je suis obligé d’aller chercher la référence (via le menu outil/références) à la main dans system32.

Comment faire pour que VBA trouve seul le fichier sur les deux systèmes ?

ou y a t'il un moyen de changer le fichier de place sur mon PC win7 64 bits ?

Merci

[eriiic]

Bonjour,

Comment faire pour que VBA trouve seul le fichier sur les deux systèmes ?
Normalement ça ne pose pas de problème.

ou y a t'il un moyen de changer le fichier de place sur mon PC win7 64 bits ?
Surtout pas, les bibliothèques 32 bits doivent être dans syswow64.

Le PC avec 2003 a l'air d'être victime du syndrome de la maj d'avril 2012.
Voir ici : http://support.microsoft.com/kb/2598039
En résumé : recherchez sur votre disque dur les fichiers dont l'extension est «*.exd*» et supprimez tous les fichiers .exd qui s'y trouvent.
Ces fichiers .exd seront automatiquement recréés à l'aide des nouveaux contrôles la prochaine fois que vous utiliserez VBA.

Si ça ne résous pas tu pourras toujours tenter une désinscrition/réinscription au registre de mscomctl.

eric

[Rikky13]

Bonjour et merci d'avoir répondu à ma question.

La solution me semble compliquée.. enlever les fichier exd sur des centaines de pc dont je ne suis pas l'administrateur me semble impossible.
toutefois, j'ai recherché ces fichiers sur un des pc dont je peux disposer et je n'en ai trouvé aucun

J'ai pas fini de galérer apparement il suffirait pourtant juste qu'il aille chercher le mscomctl.oxd dans mon dossier system32 sur mon PC Win7 64X car il est aussi..

[eriiic]

toutefois, j'ai recherché ces fichiers sur un des pc dont je peux disposer et je n'en ai trouvé aucun

C'est que ce contrôle (listview) n'a jamais été utilisé sur ce pc en vba.
Pour éliminer totalement cette piste fait quand même un test de ton fichier sur ce pc voir s'il a le même pb.
Et contrôle si ces pc ont bien toutes leurs mises à jour de faites...

il suffirait pourtant juste qu'il aille chercher le mscomctl.oxd dans mon dossier system32 sur mon PC Win7 64X car il est aussi..

Tu ne vas pas refaire windows, ces 2 répertoires ont leur rôle bien précis.
Sur système 64 bits :
system32 : pour les dll et ocx 64 bits
syswow64 : pour les dll et ocx 32 bits (pour émulation en 64 bits)
eric

[BenjGe]

normalement quand tu ajoutes ton contrôle tu as las possibilité d'ajouter de nouveaux contrôles à la liste. Avant d'insérer le list view qui t'intéresse va chercher le fichier mscomctl.ocx dans system 32. De mémoire devant la même situation c'est ce que j'avais fait.

[Rikky13]

Super cool pour les différentes explications merci !

Je ne vois pas trop la solution pour l'instant..
y a t'il moyen de référencer le fichier mscomctl.ocx du dossier system32, des pc sur XP 32 bits, via un fichier batch ou une programmation VB du style un petit EXE qui s'occupe de ca ?
J'ai déjà piloté Excel via Visual basic et exécuter des macros, mais je ne sais pas s'il est possible de simuler:
ALT F11 / outils / références et aller chercher le mscomctl.ocx dans system32..

Ca pourrait être un "pansement" à défaut d'une vraie solution ?

[eriiic]

Et si tu reconstruisais ton fichier sur 2003 pour voir ensuite si ça réagit correctement sur ces pc ?

eric

[Rikky13]

Oui ! çà sa fonctionne, si je vais sur un pc équipé de XP avec office 2003, que je vais rechercher le fichier mscomctl.oxc dans system32 puis que je créer à nouveau ma listeview (car elle a disparue) dans le formulaire, alors oui ça fonctionne partout ensuite.

Y sont compliqués les Cro$ofts quand même c'est vraiment pas cool

[eriiic]

Ben voilà, plus de problème alors...

Une question me vient : ton fichier sur 2010 tu l'avais bien fait en mode compatibilité et a été enregistré en type .xls ?
Parce que si c'est le pack de compatibilité 2003-2010 qui le traite à l'ouverture sur 2003 c'est sans doute plus ou moins normal.
eric

[Rikky13]

Salut,
Désolé du retard, c’est la course en ce moment..

Le problème est toujours présent dans la mesure où je voudrais bien que Windows ou Excel ce débrouille seul pour aller rechercher le mscomctl au bon endroit.
Dans l’immédiat, je code sur mon PC Win7 64X Excel 2010 puis une fois terminé je bascule sur un pc Win Xp32B Excel 2003 pour aller rechercher le mscomctl au bon endroit puis rajouter ma listeView car elle disparaît lors du transfert, je recompile et c’est bon.

Bref c’est pénible, ça me fait perdre du temps et parfois j’oublie la manip du coup le tel se met à sonner de partout : « Ça marche pas… ! » LOL jaune..

Sinon, oui j’enregistre en mode compatibilité 97-2000 en XLS.

Merci

[BenjGe]

si tu es le seul de ta boîte en office 64 tu devrai faire tes deve sur une machine virtuelle avec un office 32, ça te réduirait le problème.
Sinon il est possible d'ajouter des scontrôles dynamiquement en VBA (lors de l'exécution du code)

[BenjGe]

tiens en fouillant sur le net j'ai trouvé ça:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

ThisWorkbook.VBProject.references.addfromfile "C:\WINDOWS\System32\stdole2.tlb"

[Invité]

Salut,

Tu ne peux pas utiliser une synthaxe du style

Si Win 64, alors va chercher ici, sinon, va ici ?

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
#if Vba7 then 
'  Code is running in the new VBA7 editor 
     #if Win64 then 
     '  Code is running in 64-bit version of Microsoft Office 
     #else 
     '  Code is running in 32-bit version of Microsoft Office 
     #end if 
#else 
' Code is running in VBA version 6 or earlier 
#end if

[Rikky13]

Merci, ça semble interressant comme solution, je n'ai pas encore eu le temps de tester, mais je vais me pencher dessus

Sinon créer une machine virtuelle, je ne sais pas faire