Listing (en A, 'Feuil2') à partir de commentaires Feuil1

[anthoYS]

Bonjour,

Voilà, je souhaite à partir de commentaires présent en 'Feuil1' en H, récapitulé, le nom simplement en enlevant Mlle ou M. ou Mme, et ce en A 'Feuil2'.

Voilà, en espérant avoir été clair.

Autre précision, je souhaite egalement en effet que si dans les commentaires certains noms soient récurents, qu'il n'apparaisse qu'une fois en A, dans l'ordre d'apparition (le premier nom par exemple en A2 'Feuil2' doit être "Xolo" etc.)

Merci par avance.

PS : La macro (si cette méthode est utilisé) doit faire le tour de H3 à H1000.

 

[camarchepas]

Re : Listing (en A, 'Feuil2') à partir de commentaires Feuil1

Bonjour,

Voici en VBA le traitement :

 

[anthoYS]

Re : Listing (en A, 'Feuil2') à partir de commentaires Feuil1

Re,

ok, merci camarchepas.

Mais je me répète je ne veut pas afficher "M." ou "Mme" etc.

@+

 

[camarchepas]

Re : Listing (en A, 'Feuil2') à partir de commentaires Feuil1

Re moi ,

Mes excuses M., Mme ou Mlle le Directeur ,

Voici ,

Une petite boisson rafraîchissante peut être ???

A votre service .....

🙂😀😉😛

 

[alexga78]

Re : Listing (en A, 'Feuil2') à partir de commentaires Feuil1

Bonjour anthoYs, camarchepas, le forum,

un code vba beaucoup plus modeste que celui de camarchepas.
bon dimanche à tous

 

[anthoYS]

Re : Listing (en A, 'Feuil2') à partir de commentaires Feuil1

Merci alexga78,

En outre,

ça marche camarchepas !

 

[anthoYS]

Re : Listing (en A, 'Feuil2') à partir de commentaires Feuil1

Bonjour alexga78, camarchepas,

autre soucis, j'ai voulu l'adapter à mon fichier mais ça ne marche pas !

Erreur d'execution '1004' : impossible de modifier une cellule fusionné.

Voici les captures d'écrans (fichier avec onglets et bouton de commande onglet 'Mnst' 'feuil1' et 'Ind', 'feuil2' puis celle du débogage) :

 

[camarchepas]

Re : Listing (en A, 'Feuil2') à partir de commentaires Feuil1

Bonjour,

Effectivement dans la solution proposée par alexga78, une copie provisoire est faite en A2 , et je suppose que tu doit avoir un cellule fusionnée a cet endroit.

J'ai repris ma version, j'ai corrigé le bog de doublons qui est apparu après la suppression des entete de genre.

J'ai ajouté un tri ( c'est toujours plus pratique pour retrouver ses petits )

 

[anthoYS]

Re : Listing (en A, 'Feuil2') à partir de commentaires Feuil1

Re,

Merci camarchepas, mais ton bouton 4 "Extrait commentaires" devient bouton 5 renommée "noms".
Or quand je souhaite exécuté, le clic devient impossible dessus donc aucun effet...

Que ce passe t-il?

 

[anthoYS]

Re : Listing (en A, 'Feuil2') à partir de commentaires Feuil1

Re,

J'ai associé le clic à la macro, mais lors du clic voilà le message d'erreur :

 

[camarchepas]

Re : Listing (en A, 'Feuil2') à partir de commentaires Feuil1

Bonjour,

Tu fais clic droit sur le bouton, affecter macro et la tu choisi la procédure "magique"

 

[anthoYS]

Re : Listing (en A, 'Feuil2') à partir de commentaires Feuil1

Re ;

C'est ce que j'ai fait, voilà le résultat :

 

[JCGL]

Re : Listing (en A, 'Feuil2') à partir de commentaires Feuil1

Bonjour à tous,

Peux-tu essayer en enlevant la partie :

, _
        DataOption1:=xlSortNormal

A+ à tous

 

[anthoYS]

Re : Listing (en A, 'Feuil2') à partir de commentaires Feuil1

Oui.

Voilà le résultat :

 

[JCGL]

Re : Listing (en A, 'Feuil2') à partir de commentaires Feuil1

Bonjour à tous,

Dépose ton fichier anonymisé

A+ à tous