convertir un fichier mcr en vba

Question

Bonjour,
j'ai creer un fichier mcr avec super macro.
Maintenant je voudrai incorporer cette macro dans un module sous excel.
mais je ne trouve pas de moyen de faire la convertion en vb.
Savez vous si il existe un soft ou autre me permettant de le faire.
sinon est ce que quelqu'un arrive a faire ca en vb :
Execute    http:\intranexconf.airfrance.fr
Pause    00:00:02
Type Special    TAB;
Type    afr310822
Type Special    TAB;
Type Special    ESPACE;

d'avance merci.

jrivet · Answer

Salut,

En VB je te conseillerais de regarder SendKey (pour Type et type Spécial) et ShellExecute ou Shell (pour Execute) et pour finir Sleep pour Pause

@+: Ju£i?n
Pensez: Réponse acceptée

airtache · Answer

bas j'ai deja essaille avec ca :

shell "explorer.exe http:\intranexconf.airfrance.fr",1
sendkeys "{tab}"
sendkeys "afr310822"
sendkeys "{tab}"
sendkeys "{space}"

mais ca marche pas ... :-(

Renfield · Answer

faut apprendre la patience.

tu tapes au clavier sans même attendre que l'application aies pu se charger
sans meme attendre que la page se soit chargée...

airtache · Answer

pit etre ..... 
mais j'ai pas reussi a faire fonctionner la fonction sleep ... :-/
qu'elle est la syntaxe ... ??

jrivet · Answer

Salut,
Effectivement il faut attendre un peu.

Private Declare Sub Sleep Lib "kernel32" (ByVal dwMilliseconds As Long)

Call Shell("explorer.exe http:\intranexconf.airfrance.fr", 1)
Call Sleep(2000) 'Pause    00:00:02
Call SendKeys("{TAB}")  'Type Special    TAB;
Call SendKeys("afr310822")  'Type afr310822
Call SendKeys("{TAB}")  'Type Special    TAB;
Call SendKeys(" ")  'Type Special    ESPACE;
, ----
[code.aspx?ID=41455 By Renfield]

Ou est ce que tu place ce code?? 

@+: Ju£i?n
Pensez: Réponse acceptée

airtache · Answer

dans un module sous excell
je veus que ca lance tout ca lors d'un appui sur un bouton ... :D

airtache · Answer

alors apres test ca marche presqque ... ;-)
j'ai mis l'element espace car ca valider la touche mais la ca ne marche pas ... 
ya pas uen autre fonction qui permet de valider une touche ... ??

jrivet · Answer

Salut,
La touche entrer si le bouton à le focus,non?

@+: Ju£i?n
Pensez: Réponse acceptée

airtache · Answer

bas c'est ce que j'ai essailler mais ca marche pas ... :-/

Renfield · Answer

{SPACE}

airtache · Answer

il ne reconnait pas space ....

Renfield · Answer

même avec les {} 

étrange... tu ne peux donc apparemment pas valider ton bouton via SendKeys :/

(en même temps, c'est aléatoire, le pilotage via SendKeys)

airtache · Answer

c'est ce que je vien de voir
car le texte mis en sendkey ici afr310822 est des fois taper 310822 ou AAAAffrrr3108
et autre donc c'est pas tres fiable .. mais c'est le seul moyen que j'ai trouver pour atteindre l'element que je veu modifier ...

Renfield · Answer

pas possible via des SendMessage ?

(regarde avec Spy++)

airtache · Answer

a ca je ne sai spas du tout je connai pas ... :-D

airtache · Answer

ou est ce que je peu trouver les source de tout ca ... ???

Renfield · Answer

télécharges Spy++ (a moins que tu n'aies Visual Studio)
et regardes si tu peux jouer avec ta fenetre

airtache · Answer

je n'ai pas visual studio 
et des que je cherche a dl spy++ il me rebalance sur la page crosoft et visual studio ..
t'aurai pas un lien pour dl spy++ direct .. ??

Renfield · Answer

similaire:
http://logiciel.codes-sources.com/logiciels/WinID-193.aspx

airtache · Answer

oki j'ai dl mais comment on s'en sert car je ne voi pas trop comment faire ... dsl ... :/

Convertir un fichier mcr en vba

20 réponses

Votre réponse

Discussions similaires