Serial Communications Using VBA-Excel Résolu

Question

Hi,

I'm working on VB 6.0 and Excel2007, i intend to send and receive data through serial port, for this purpose i installed MSCOMM32.OCX and registred it successefully, then I restarted my PC. But i still have a problem:When i try to draw a box on the worksheet ('Microsoft Communication Control' ) this message is shown:Impossible to insert an object !
Could someone help me resolve this problem??
Thank you so much :)

acive · Accepted Answer

Hi,
I guess this is a question of license check THIS PAGE

By the way, this is a french only forum (VBFrance) 

Cordialement


CF2i - Guadeloupe
Ingénierie Informatique

acive · Answer

Another nice explanation page:
THIS LINK

They say:
 This VB module is a collection of routines to perform serial port I/O without using the Microsoft Comm Control component.  This module uses the Windows API to perform the overlapped I/O operations necessary for serial communications.

See you


CF2i - Guadeloupe
Ingénierie Informatique

mimi09jn · Answer

salut,

J'ai bien enregistré le module MSCOMM32 avec cmd (tel est mentionné dans le lien suivant: http://www.excelforum.com/excel-programming-vba-macros/539481-tutorial-use-mscomm-with-a-serial-device.html), et j'ai reçu le message d'enregistrement réussi, mais ça marche toujours pas

acive · Answer

Ahh !... Pourquoi le début en anglais alors? C'est trop dur de taper en français?

Bon ce sujet à déjà été évoqué sur le forum
Si tu avais fait une recherche (ce que j'ai fait à ta place), tu aurais trouvé CETTE PAGE où Ucfoutu explique très clairement comment procéder.

Cordialement


CF2i - Guadeloupe
Ingénierie Informatique

mimi09jn · Answer

je me suis tellement habituée à taper en anglais dans mon projet c'est pour ça 
Merci pour ta réponse et tes recherches 
Mais comment devrais je procéder pour intervenir dans la base de registre et modifier la clé?
Merci..

acive · Answer

C'est pourtant clair, Ucfoutu a même trouvé une meilleur idée que d'aller fouiller avec regEdit:
(Bien entendu si tu travailles sur une session administrateur)

1) copie celà dans le bloc-notes : 

Windows Registry Editor Version 5.00

[HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Internet Explorer\ActiveX Compatibility\{648A5600-2C6E-101B-82B6-000000000014}]
"Compatibility Flags"=dword:00000000

enregistre sous toto.reg dans le répertoire de ton choix. 
va ensuite dans explorer et double-clique sur ce fichier puis réponds que tu es d'accord 

Et en suite tu pourras glisser ton MSComm dans tes feuilles.


Cordialement


CF2i - Guadeloupe
Ingénierie Informatique

ucfoutu · Answer

Bonjour,
Et si tu lisais attentivement mon message du vendredi 6 avril 2012 à 10:36:52 dans la conversation dont acive (que je salue) t'a donné le lien ? 


________________________
Réponse exacte ? => "REPONSE ACCEPTEE" facilitera les recherches.
Pas d'aide en ligne installée ? => ne comptez pas sur moi pour simplement répéter son contenu. Je n'interviendrai que si nécessité de la compléter.

ucfoutu · Answer

Ah ... croisés ... 

________________________
Réponse exacte ? => "REPONSE ACCEPTEE" facilitera les recherches.
Pas d'aide en ligne installée ? => ne comptez pas sur moi pour simplement répéter son contenu. Je n'interviendrai que si nécessité de la compléter.

acive · Answer

Bonjour Ucfoutu 

Mimi, tu veux une traduction en anglais? 


Cordialement


CF2i - Guadeloupe
Ingénierie Informatique

mimi09jn · Answer

Merci mais ça marche toujours pas même avec cette intervention dans la base de registre.
Vous êtes sures que cela a une relation avec internet explorer??
Merci

ucfoutu · Answer

Quel est ton OS ? 
As-tu lu la discussion de référence jusqu'au bout ? (elle parle également de cet aspect) !


________________________
Réponse exacte ? => "REPONSE ACCEPTEE" facilitera les recherches.
Pas d'aide en ligne installée ? => ne comptez pas sur moi pour simplement répéter son contenu. Je n'interviendrai que si nécessité de la compléter.

acive · Answer

Bon... moi j'ai testé, ça fonctionne bien, je suis sur Windows 7 32 bits et je suis administrateur.
 
Ahhh... je viens de comprendre (je pense)
Tu dis:
Vous êtes sures que cela a une relation avec internet 
-Ca veut dire que ton fichier toto s'ouvre avec IE
-Ce qui veux dire que tu as mal nommé toto qui lui doit avoir l&#8217;extension ".reg"


Cordialement


CF2i - Guadeloupe
Ingénierie Informatique

acive · Answer

Télécharge-le ICI tu le décompresses et tu double-cliques dessus.

Tu auras des messages d'avertissement, c'est normal car il accède à la base de registre.

A lire également les avertissements de sécurité cités dans la discussion de UCfoutu en 2012.



Cordialement


CF2i - Guadeloupe
Ingénierie Informatique

mimi09jn · Answer

Mon OS c'est le WindowsXP 32 bits, avec la session administrateur, le fichier ne s'est pas ouvert avec Internet Explorer(j'ai dit ça parce que j'ai lu HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Internet Explorer dans le contenu du fichier à exécuter), j'ai bien reçu le message d'avertissement et j'ai redémarré mon PC par la suite mais ça marche toujours pas

mimi09jn · Answer

et dans le fichier je trouve:HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Internet Explorer\ActiveX Compatibility
Mais moi comme je l'ai dit au début de la discussion j'utilise MSCOMM pour communiquer à travers le port série et non pas ActiveX..

acive · Answer

Bonjour,
Le MSCOMM32.OCX est une librairie ActiveX.
As-tu le composant MSComm dans la boite à outils?

Si oui:

1) Qu'as-tu comme message quand tu essayes de l'insérer sur une feuille (tableur excel)?

2) Qu'as-tu comme message quand tu essayes de l'insérer sur un UserForm?


Cordialement


CF2i - Guadeloupe
Ingénierie Informatique

mimi09jn · Answer

OK merci pour l'info 
Oui je l'ai dans la barre à outils, je fais: Développeur->insérer->controle AcitevX->Autres Controles->Microsoft Communications Control, version 6.0.
Le message que je reçois lorsque j'essaie de l'insérer sur une feuille c'est: Impossible d'insérer un objet!

mimi09jn · Answer

Lorsque j'ai rajouté MSCOMM32.OCX, je l'ai mis au début sous system puis je l'ai enregistré et redémarré mon PC mais ça n'a pas marché, je l'ai installé alors sous system32 mais toujours les mêmes résultats

acive · Answer

C'est que ta base de registre n'a pas été modifiée.

Alors je ne sais pas si sur XP 32 c'est la même, j'ai un xp ici mais rien d'installé dessus...
Tu tapes:
-Démarrer
-Executer
-regedit + entrée
-sur l'onglet de gauche:
  - HKEY_LOCAL_MACHINE
  - SOFTWARE
  - Microsoft
  - Internet Explorer
  - ActiveX Compatibility
  - As-tu le registre :{648A5600-2C6E-101B-82B6-000000000014} ??


Cordialement


CF2i - Guadeloupe
Ingénierie Informatique

mimi09jn · Answer

OUi je l'ai..

acive · Answer

Clique dessus, sur l'onglet de droite double-clique sur "Comptability Flags"

Qu'as tu comme valeur?


Cordialement


CF2i - Guadeloupe
Ingénierie Informatique

mimi09jn · Answer

J'ai:
par défaut: non défini
compatibility flag:0x00000000

acive · Answer

Ton registre a bien été modifié...

L'identificateur de classe {648A5600-2C6E-101B-82B6-000000000014} concerne le Contrôle chargeur ATL MSCOMM32.OCX corrigé dans la Mise à jour cumulative pour Microsoft Visual Basic 6.0 Service Pack 6 (KB957924)

As-tu VB6 installé sur le PC?
Ou tu as installé uniquement la librairie MsComm32?

Cordialement


CF2i - Guadeloupe
Ingénierie Informatique

mimi09jn · Answer

j'ai uniquement installé MSCOMM32, j'utilise le VBA que j'ouvre depuis Excel (Développeur->Visual Basic)

acive · Answer

Essaye d'installer celui-ci:

http://www.microsoft.com/fr-fr/download/confirmation.aspx?id=10019


Cordialement


CF2i - Guadeloupe
Ingénierie Informatique

mimi09jn · Answer

Je l'ai installé mais toujours le même problème 
A la page suivante:
http://www.excelforum.com/excel-programming-vba-macros/539481-tutorial-use-mscomm-with-a-serial-device.html
c'est noté que je devrai peut être mettre à jour le MSCOMM32 avec une clé:

Then you may need to update the registry with this key -

[HKEY_CLASSES_ROOT\Licenses\4250E830-6AC2-11cf-8ADB-00AA00C00905]
@ = "kjljvjjjoquqmjjjvpqqkqmqykypoqjquoun"

Par analogie avec ce que j'ai fait pour le fichier toto,que devrai je mettre dans le fichier texte pour faire cet enregistrement?
ça pourrait résoudre le problème..
Merci

acive · Answer

Oui j'ai vu ça aussi mais il faut être sur de ce qu'on "bidouille" dans la base de registres car ton windows risque de ne plus démarrer si l'on fait n'importe quoi...

Maintenant que tu l'as réinstallé mscomm double-clique encore une fois sur toto.reg
Il a surement remis la sécurité.

Cordialement


CF2i - Guadeloupe
Ingénierie Informatique

mimi09jn · Answer

Merci pour ta patience active 
Je l'ai fait et redémarré mais ça marche toujours pas 
Je sais plus quoi faire

acive · Answer

Vérifie quand-même si tu as:
-HKEY_CLASSES_ROOT
-Licenses
-4250E830-6AC2-11cf-8ADB-00AA00C00905] 

et si tu as ça: "kjljvjjjoquqmjjjvpqqkqmqykypoqjquoun" 


Cordialement


CF2i - Guadeloupe
Ingénierie Informatique

mimi09jn · Answer

Effectivement je l'ai pas, comment pourrai je l'ajouter?
Merci

acive · Answer

Hé bien... j'imagine que ça a marché chez moi parce que j'ai installé VB6 qui a installé les licences sur la machine...

Et on revient à ma toute première réponse (en anglais), qui apparemment était la bonne piste finalement.

Regarde dans CETTE PAGE lis les commentaires tout en bas, télécharge VB6CLI.EXE et exécute-le.

Apparemment ça devrait fonctionner...

Cordialement


CF2i - Guadeloupe
Ingénierie Informatique

mimi09jn · Answer

Merci infiniment active   
ça marche parfaitement maintenant 
Merci encore une fois pour ta patience

acive · Answer

Dis-donc... et dire que la réponse était la toute première et que nous sommes maintenant à 4 pages de "papotage" !!!

A +

Cordialement


CF2i - Guadeloupe
Ingénierie Informatique

mimi09jn · Answer

Ouii tout à fait ...

ucfoutu · Answer

Non, acive, cela n'a pas été inutile du tout.
Cet outil date de 2004. Or, il se trouve que des mises à jour de Office ont conduit à la modification de la BDR (en traison de failles de sécurité).
Dans son cas : il n'avait pas VB6 et cet outil lui a permis d'enregistrer convenablement cet ocx. Mais il n'aurait pu l'utiliser depuis MsOffice sans avoir fait l'intervention que tu lui as fait faire dans la BDR.
Rien ne dit d'ailleurs qu'il ne soit un jour ou l'autre conduit à recommencer cette opération (celle que tu lui as fait faire plus haut dans la BDR) à l'occasion d'une nouvelle mise à jour de Office. 


________________________
Réponse exacte ? => "REPONSE ACCEPTEE" facilitera les recherches.
Pas d'aide en ligne installée ? => ne comptez pas sur moi pour simplement répéter son contenu. Je n'interviendrai que si nécessité de la compléter.

acive · Answer

Bonjour ucfoutu,
Merci de m'avoir laissé "galérer" tout seul 
(je plaisante)

Oui je pense que dans son cas les deux étaient nécessaires :
1) La modif de la BDR que tu expliques dans ton post de 2012.
    Et oui à chaque mise à jour de office ce sera nécessaire.

2) L'installation de la licence du composant.

Nous ne sommes jamais affectées par la licence puisque nous installons VB6 et par conséquence les licences des divers composants.

J'espère que ce post puisse servir à pas mal de monde...


Cordialement


CF2i - Guadeloupe
Ingénierie Informatique

ucfoutu · Answer

Je ne t'ai pas laissé "galérer" seul, acive. J'ai voulu que quelqu'un d'autre que moi enfonce le clou.
Mais j'étais là et surveillais. Sois-en certain. 
Amitiés.

________________________
Réponse exacte ? => "REPONSE ACCEPTEE" facilitera les recherches.
Pas d'aide en ligne installée ? => ne comptez pas sur moi pour simplement répéter son contenu. Je n'interviendrai que si nécessité de la compléter.

ucfoutu · Answer

Tiens ===>> tu vas comprendre ces mots d'un ancien chasseur à un moins vieux (disons plus jeune, c'est mieux)  chasseur (en plongée) : tu connais surement ce qu'est la technique de l'agachon. 


________________________
Réponse exacte ? => "REPONSE ACCEPTEE" facilitera les recherches.
Pas d'aide en ligne installée ? => ne comptez pas sur moi pour simplement répéter son contenu. Je n'interviendrai que si nécessité de la compléter.

acive · Answer

Oui,
mais ici la salinité de l'eau est beaucoup plus élevée, ce qui nous fait remonter à la surface très rapidement, à moins d'avoir une ceinture de plomb (que je n'utilise jamais).

D'autre part nous avons souvent des surprises  inattendues comme des barracudas de 2 mètres pas très contents, en passant par les requins, murènes et raies plus grandes que toi... 
J'ai pas trop envie de les attendre tranquillement !!!



Cordialement


CF2i - Guadeloupe
Ingénierie Informatique

ucfoutu · Answer

Ah ! les bécunes ... (c'est ainsi que je les appelle). Mais bon ===>> miam miam également.
Le plomb ? pourquoi ? Le titane ne pollue pas.
Pour ce qui est des murènes : n'entre jamais dans une cavité en t'aidant des deux mains ! . Ne la "tire jamais" non plus (flêche tordue).
Pour ce qui est des raies : Ne te méfie que des pastenagues (je les appelais mountches) et de celles qui n'en sont pas (des squalidés telles la violon et la torpille). Carresse toutes les autres.
Tu as oublié ce qui est terrifiant, bien que tout petit : le poulpe à anneau bleu (Blue Ring Octopus). Celui-là ne pardonne pas . Le poisson-Pierre (stone fish) également (ah ! ce salopard !)
Et tout ce qui paraissait inoffensif mais peut se "venger" pendant des semaines (ah .. la gratte ...)
Sois prudent.

________________________
Réponse exacte ? => "REPONSE ACCEPTEE" facilitera les recherches.
Pas d'aide en ligne installée ? => ne comptez pas sur moi pour simplement répéter son contenu. Je n'interviendrai que si nécessité de la compléter.

MarcPL · Answer

Ce poulpe et le poisson-pierre (même mort il reste venimeux !) font parti des "12 monstres d'Australie"
accompagnés du cône, un coquillage habité, de la méduse boîte, du crocodile marin
(un français y a eu droit cette semaine mais s'en est sorti),
et autres requins, serpents & araignées &#8230;

___________________________________________________________________________________________________________________
Comme la vitesse de la lumière est supérieure à celle du son, certains ont l'air brillant avant d'avoir l'air con !

mimi09jn · Answer

Bonjour à tous,

J'ai réussi à installer correctement le composant MSCOMM32.OCX sur mon PC XP après avoir exécuté les deux fichiers http://www.vbfrance.com/code.aspx?ID=23175
Mais là on a changé de OS et maintenant j'ai le Windows7 32 bits, j'ai bien enregistré le composant MSCOMM et exécuté les deux fichiers mais lorsque j'essaie d'insérer le composant dans une feuille Excel j'ai toujours le message "impossible d'insérer un objet"!!
Pourriez-vous SVP m'aider résoudre ce problème parce que je me trouve vraiment bloquée dans mon projet 
Merci infiniment

mimi09jn · Answer

Rebonjour,

SVP quelqu'un pour m'aider??
Je bloque vraiment  
Merci d'avance..

Serial Communications Using VBA-Excel

43 réponses

Votre réponse

Discussions similaires