Appels Macros avec MsgBoxPerso | ||
---|---|---|
Inscription: 23/03/2012
Messages:
22
Système d'exploitation: PC Version Excel utilisée: 2010 - 32bits |
Posté le : 04-05-2013 11h12
Bonjour Didier, le Forum
Suite au tuto sur la MsgBoxPerso, je suis entrain de réalisé un fichier de traduction de mots de Français en Anglais et vice-versa. J'essaie d'appeler les deux macros (Trad_F_A - Trad_A_F) et j'ai un message d'erreur Objet Requis. Tu voudrais bien jeter un coup d'oeil et les adapter s'il te plaît? Merci infiniment A bientôt Jacky - coupdepouce.mabulle.com
|
|
|
Re: Appels Macros avec MsgBoxPerso | ||
---|---|---|
Inscription: 18/05/2006
De Saône-et-Loire (71)
Messages:
1539
Système d'exploitation: PC Version Excel utilisée: 97, 2000, 2002, 2003, 2007, 2010, 2013, 2016 et 365 |
Posté le : 04-05-2013 11h46
Bonjour Jacky, le Forum,
Dans quel contexte obtiens-tu ce message d'erreur ? Détaille nous exactement ce que tu fais comme manipulations pour qu'on puisse reproduire cette situation d'erreur... Quelle version Excel 2010 utilises-tu ? (32 ou 64bits) Cordialement, Didier_mDF
Le Webmaster La réponse vous satisfait ? Merci de revenir solder le sujet en [résolu], voir ce lien |
|
|
Re: Appels Macros avec MsgBoxPerso | ||
---|---|---|
Inscription: 23/03/2012
Messages:
22
Système d'exploitation: PC Version Excel utilisée: 2010 - 32bits |
Posté le : 04-05-2013 15h29
Re Didier,
désolé du retard, j'ai dû m'absenter. J'utilise Office 2010 32bits. En ce qui concerne l'erreur, c'est en insérant ces lignes: If vRet = 1 Then n = n + 1 vRet = MsgBoxPerso("Voulez-vous traduire ce mot ? C'est à partir d'ici, que je souhaite pouvoir sélectionner un mot et que la macro excécute la traduction. If vbOK = True then Call Trad_F_A oubien If Vret <> "" Then Call Trad_F_A If vRet = 2 Then n = n + 1 Reste du code... En souhaitant que ce soit plus compréhensible. A+ Jacky - coupdepouce.mabulle.com
|
|
|
Re: Appels Macros avec MsgBoxPerso | ||
---|---|---|
Inscription: 18/05/2006
De Saône-et-Loire (71)
Messages:
1539
Système d'exploitation: PC Version Excel utilisée: 97, 2000, 2002, 2003, 2007, 2010, 2013, 2016 et 365 |
Posté le : 04-05-2013 19h37
Re, Option Explicit Avec "BDD 1" pour l'une et "BDD 2" pour l'autre. DANS UN MODULE DE CODE STANDARD (ex : Module1) : Option Explicit En espérant que ça te convienne... Cordialement, Didier_mDF
Le Webmaster La réponse vous satisfait ? Merci de revenir solder le sujet en [résolu], voir ce lien |
|
|
Re: Appels Macros avec MsgBoxPerso | ||
---|---|---|
Inscription: 23/03/2012
Messages:
22
Système d'exploitation: PC Version Excel utilisée: 2010 - 32bits |
Posté le : 04-05-2013 20h32
Re Didier,
bien sûr que tu as raison. Mais moi aussi je trouvais trop simpliste et sans vie, le faite de cliquer sur le mot et le faire apparaître dans une cellule ou mettre une MsgBox standard. Et si VBA existe c'est bien le faite aussi de créer quelque chose de différent. Par exemple, j'ai vu un jour que tu avais créé une fonction pour inserer ' : ' dans une textbox pour avoir le format heure. Pourquoi compliquer les choses quand on peux faire simple. TextBox1.Value = Replace(TextBox1.Value, ".", ":") . Je ne sais pas si tu vois ce que je veux dire dans tous les cas, super travail sur le fichier. Merci mille fois. Amicalement Jacky - loup solitaire. Jacky - coupdepouce.mabulle.com
|
|
|