Correction d'une macro [Résolu/Fermé]

Signaler
Messages postés
611
Date d'inscription
lundi 29 décembre 2014
Statut
Membre
Dernière intervention
17 janvier 2020
 -
Messages postés
611
Date d'inscription
lundi 29 décembre 2014
Statut
Membre
Dernière intervention
17 janvier 2020
 -
Bonjour mes amis,

Bonne année à vous tous,

J'ai une macro qui exporte les données dans le fichier "Agenda" sur une autre feuil "export agenda"

mais j'ai fait une mauvaise manipulation et je recois ce msg : 

'exportation infos
Private Sub CommandButton2_Click()
    With Worksheets("Agenda Export")
        .Range("A2:C50").ClearContents
        .Range("A2").Resize(UBound(TInfos, 2) + 1, UBound(TInfos, 1)) = Application.Transpose(TInfos)
    End With
    a = Sheets("Agenda Export").Cells(Rows.Count, "A").End(xlUp).Row
    For b = 2 To a
        Set rn = Sheets("Agenda").Cells.Find(What:=Sheets("Agenda Export").Cells(b, "A").Value, After:=Range("A1"), LookIn:= _
        xlValues, LookAt:=xlPart, SearchOrder:=xlByRows, SearchDirection:=xlNext, MatchCase:=False)
        Sheets("Agenda Export").Cells(b, "A") = "=Hyperlink(" & """" & "#Agenda!" & rn.Offset(0, 1).Address & """" & "," & """" & Sheets("Agenda Export").Cells(b, "A").Value & """" & ")"
    Next
End Sub



EDIT : correction des balises de code

Merci infiniment.



Configuration: Windows / Firefox 52.0
Afficher la suite

2 réponses

Réponse 1 / 2
Messages postés
1823
Date d'inscription
vendredi 5 septembre 2008
Statut
Contributeur
Dernière intervention
24 avril 2020
 592
Bonjour,

La variable TInfos qui est "public" donc visible de tous les modules est déclarée deux fois dans le module Mtax et dans le module Module5.

Il suffit de supprimer l'une des deux déclaration
1
Merci
Merci

Quelques mots de remerciements seront grandement appréciés. Ajouter un commentaire

CCM 63550 internautes nous ont dit merci ce mois-ci

Signaler
Messages postés
611
Date d'inscription
lundi 29 décembre 2014
Statut
Membre
Dernière intervention
17 janvier 2020
comment puis-je faire ça? supprimer manuellement? sans ajouter ou modifier qlq chose??
Signaler
Messages postés
1823
Date d'inscription
vendredi 5 septembre 2008
Statut
Contributeur
Dernière intervention
24 avril 2020
 592 >
Messages postés
611
Date d'inscription
lundi 29 décembre 2014
Statut
Membre
Dernière intervention
17 janvier 2020
Bonjour,

Oui tout simplement en mettant en commentaire (en mettant une apostrophe devant) l'une des deux déclarations.
Par exemple dans le module MTax remplacer : 
Public TInfos()

par 
'Public TInfos()


puis tester.

PS : Au temps pour moi, mes excuses à yg_be qui avait déjà répondu. Je n'avais pas déroulé tous les posts !
Signaler
Messages postés
611
Date d'inscription
lundi 29 décembre 2014
Statut
Membre
Dernière intervention
17 janvier 2020
 >
Messages postés
1823
Date d'inscription
vendredi 5 septembre 2008
Statut
Contributeur
Dernière intervention
24 avril 2020
Merci à vous !
Réponse 2 / 2
Messages postés
13889
Date d'inscription
lundi 9 juin 2008
Statut
Contributeur
Dernière intervention
15 janvier 2021
 781
bonjour, msg=?
Afficher les 8 commentaires
Signaler
Messages postés
13889
Date d'inscription
lundi 9 juin 2008
Statut
Contributeur
Dernière intervention
15 janvier 2021
 781 >
Messages postés
611
Date d'inscription
lundi 29 décembre 2014
Statut
Membre
Dernière intervention
17 janvier 2020
peux-tu partager ton fichier?
Signaler
Messages postés
611
Date d'inscription
lundi 29 décembre 2014
Statut
Membre
Dernière intervention
17 janvier 2020
 >
Messages postés
13889
Date d'inscription
lundi 9 juin 2008
Statut
Contributeur
Dernière intervention
15 janvier 2021
Voila Mr,
Merci

https://www.cjoint.com/c/JAelsshlY65
Signaler
Messages postés
13889
Date d'inscription
lundi 9 juin 2008
Statut
Contributeur
Dernière intervention
15 janvier 2021
 781 >
Messages postés
611
Date d'inscription
lundi 29 décembre 2014
Statut
Membre
Dernière intervention
17 janvier 2020
Tu as déclaré deux fois 
Public TInfos()
, une fois dans le module Mtax, une fois dans le module Module5.
Tu dois donc décider soit de supprimer une des deux déclarations, soit de nommer différemment les deux variables. Si tu choisis la deuxième méthode, je te suggère de changer les deux noms, de façon à ne pas oublier de vérifier toutes les utilisations.
Par ailleurs, je recommande d'ajouter 
option explicit
au début de chacun de tes modules.
Signaler
Messages postés
611
Date d'inscription
lundi 29 décembre 2014
Statut
Membre
Dernière intervention
17 janvier 2020
 >
Messages postés
611
Date d'inscription
lundi 29 décembre 2014
Statut
Membre
Dernière intervention
17 janvier 2020
Mr yg_be.
que est ce que vous pensez?
Signaler
Messages postés
13889
Date d'inscription
lundi 9 juin 2008
Statut
Contributeur
Dernière intervention
15 janvier 2021
 781 >
Messages postés
611
Date d'inscription
lundi 29 décembre 2014
Statut
Membre
Dernière intervention
17 janvier 2020
as-tu lu ma réponse en #9: https://forums.commentcamarche.net/forum/affich-36389677-correction-d-une-macro#9?
Posez votre question