Copier/coller du texte sans les cellules vides et avec condition [Résolu/Fermé]

Signaler
-
Messages postés
9865
Date d'inscription
mercredi 11 août 2004
Statut
Contributeur
Dernière intervention
19 février 2021
-
Bonjour,

J'aimerais en fait faire une synthèse d'une de mes feuilles excel. Pour cela, je voudrais copier les élèments de ma colonne "suggestions" de la feuille "saisie" pour les coller dans une autre feuille "comparaison services" sans copier les cellules vides. Sachant que j'aimerais mettre ces suggestion par services mais aussi en global, comment pourrais-je le faire ?

Il faut savoir que je ne suis plus douée avec VBA puisque ça fait plus de 3 ans que je ne l'utilise plus.

Merci d'avance de vos réponses.

17 réponses

Messages postés
9865
Date d'inscription
mercredi 11 août 2004
Statut
Contributeur
Dernière intervention
19 février 2021
1 126
Bonjour,
Pour les manque : [PeumoG <> Pneumog] et dito pour : [PeumoF <> PneumoF]. Une petite correction dans le code car la ligne d'origine des données (feuille [Comparaisons services]) est 80 et pas 79 :
Votre fichier : https://www.cjoint.com/?3CnqCQhSVvb

1
Merci

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

CCM 65492 internautes nous ont dit merci ce mois-ci

Ah super merci beaucoup.

J'aimerais juste savoir, si par exemple ma colonne d'abréviation (donc tout le reste du tableau) commence à partir de 113, comment changer la macro pour qu'elle puisse prendre en compte ces abréaviations ?
Messages postés
9865
Date d'inscription
mercredi 11 août 2004
Statut
Contributeur
Dernière intervention
19 février 2021
1 126
Bonjour,
Concerne : si maintenant ma colonne abréviation commence à la ligne 113 par exemple
Ceci n'existe pas, par contre si vous parlez de la ligne 80 des abréviations de la feuille [Comparaisons services]) alors c'est bon.
Donc si cette ligne est en 113 la première ligne de données est 114 et c'est la valeur à mettre dans le code ici :
' origine tableau [Comparaison services]
lide = 114 :.....

1
Merci

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

CCM 65492 internautes nous ont dit merci ce mois-ci

Messages postés
9865
Date d'inscription
mercredi 11 août 2004
Statut
Contributeur
Dernière intervention
19 février 2021
1 126
Bonjour,
Une possibilité, copier la colonne et la coller sur la nouvelle feuille et vous trier la colonne ce qui a pour effet d'avoir les cellules vide à la fin.

Mais j'ai une condition : les services.
Le tableau qui accueillera les suggestions se fera par service et en dernier il y aura le global. Si je trie, elle ne remplira toujours pas cette condition.

Merci de ton aide :).
Messages postés
9865
Date d'inscription
mercredi 11 août 2004
Statut
Contributeur
Dernière intervention
19 février 2021
1 126
Bonjour,
Oui bien sur.
Votre demande manque de clarté ce serait bien de réaliser manuellement un petit exemple et de mettre le fichier sur https://www.cjoint.com/ et de poster le lien.

J'ai créé un exemple représentatif de ce que je cherche à faire. Voici le lien :
http://cjoint.com/?3CkwiKIX93i

C'est dans la feuille "comparaison services" que j'aimerais que les suggestions soient placées automatiquement.

Merci de votre aide.
Messages postés
9865
Date d'inscription
mercredi 11 août 2004
Statut
Contributeur
Dernière intervention
19 février 2021
1 126
Bonjour,
J'ai un petit contre temps, ce sera en fin d'après-midi.
Pas de souci.

Merci pour tout.
Messages postés
9865
Date d'inscription
mercredi 11 août 2004
Statut
Contributeur
Dernière intervention
19 février 2021
1 126
Bonjour,
Une proposition : https://www.cjoint.com/?3Clqq4IGDuU
Note : le code tient compte du nombre de ligne de la liste feuille [Saisie].

Bonjour,

Je n'arrive pas à transposer la formule sur mon vrai fichier sachant que les cellules ne sont pas les mêmes. Comment faire ?
Doi-je vous renvoyer un fichier plus précis avec les mêmes cellules et tout ?
Messages postés
9865
Date d'inscription
mercredi 11 août 2004
Statut
Contributeur
Dernière intervention
19 février 2021
1 126
Bonjour,
La structure des 2 tables de votre fichier suffise ou à défaut le fichier...!
Salutations.
Le Pingou
Je n'arrive vraiment pas. En fait quand je le fais des chiffres apparaient au lieu des textes. Aussi j'aimerais qu'il commence à partir de la ligne 117 mais ça ne fonctionne pas quand je le change.

Désolé de vous importuner autant mais je n'utilise plus VBA depuis plus de 5 ans.
Messages postés
9865
Date d'inscription
mercredi 11 août 2004
Statut
Contributeur
Dernière intervention
19 février 2021
1 126
Bonjour,
Eh bien faites se que j'ai proposé dans le message.
Salutations.
Le Pingou
C'est à dire ?
Messages postés
9865
Date d'inscription
mercredi 11 août 2004
Statut
Contributeur
Dernière intervention
19 février 2021
1 126
Bonjour,
La structure des 2 tables de votre fichier suffise ou à défaut le fichier...! sur https://www.cjoint.com/ et poster le lien.

Oh pardon !!!!

Voici le lien : http://cjoint.com/?3CmnZnYEqxK

Milles merci
Messages postés
9865
Date d'inscription
mercredi 11 août 2004
Statut
Contributeur
Dernière intervention
19 février 2021
1 126
Bonjour,
Merci pour le fichier.
Pour la feuille [Saisie] il s'agit bien des colonnes [A H] pour service et [AK] pour les suggestions Oui / Non ?
Je n'ai pas trouvé mon code dans votre fichier...... !

Messages postés
9865
Date d'inscription
mercredi 11 août 2004
Statut
Contributeur
Dernière intervention
19 février 2021
1 126
Bonjour,
Contrôler si c'est correct : https://www.cjoint.com/?3CmpBBwupO3

Désolé de ne pas vous avoir répondu mais c'est bien ça.
Oui j'avais enlever votre code, désolé.
Le dernier que vous m'avez envoyé est bien. C'est ce que je voulais. Malheureusement mes services sont écrits en abrégé et pas entier comme dans votre fichier et ça fausse la macro. C'est de ma faute j'aurais du mettre des exemples à l'interieur. Je vous renvoie un exemple et avec les services en abrégé. Voici le lien : http://cjoint.com/?3Cmqd36NJZP

Merci beaucoup.
Messages postés
9865
Date d'inscription
mercredi 11 août 2004
Statut
Contributeur
Dernière intervention
19 février 2021
1 126
Bonjour,
Merci, mais le fichier joint est identique au premier.
Ou se trouve la liste des services en abrégé ....... ?
Il est aussi possible de remplacer les titres de colonne de la ligne 78, feuille [Comparaisons services] par les abrégés .... ?
Est-ce que cela fonctionne .... ?

Ca marche en fait, quand je mets les abrégés dans la ligne 78 mais certains services ne sont pas pris en compte dans la macro.
Messages postés
9865
Date d'inscription
mercredi 11 août 2004
Statut
Contributeur
Dernière intervention
19 février 2021
1 126
Bonjour,
S'ils ne sont pas pris par la macro (une suggestion doit exister) c'est que les chaîne ne sont pas les même.
Si vous ne trouvez pas, me mettre le fichier avec l'exemple qui pose problème.
Salutations.
Le Pingou
Voici le lien avec le fichier qui pose problème : http://cjoint.com/?3Cnp3ezwwcO
Effectivement il y a des bugs. Des suggestions partent dans d'autres cellules au lieu des cellules qui leurs sont associées.
Oh pardon !!!! Je me suis trompée de fichier.

La liste des services en abrégés sont soit dans la saisie (où il y a des exemples) dans la colonne service soit dans "comparaison services" au niveau du tableau des suggestion sous la colonne des services.
Malheureusement j'avais essayé de mettre les abréviations à la place des services mais ça ne marchait pas malgré tout.
Voici le fichier que je voulais vous envoyer hier : http://cjoint.com/?3CnncaPjIug

Merci à vous.
Messages postés
9865
Date d'inscription
mercredi 11 août 2004
Statut
Contributeur
Dernière intervention
19 février 2021
1 126
Bonjour,
Eh bien je ne trouve pas la colonne d'abréviation.... ! Merci de le préciser.. !
Merci de mettre vos messages à la suite .....[Répondre au sujet] ....!

Salutations.
Le Pingou
Merci pour tout. Le dernier fichier que vous m'avez envoyé est parfait. C'est exactement ce que je voulais.

Mais j'avais juste une question supplémentaire : si maintenant ma colonne abréviation commence à la ligne 113 par exemple, comment dois-je modifier la macro pour qu'elle prenne en compte ce changement ?
Bonjour,

Merci pour tout. J'ai réussi grâce à vous à modifier tout ça. Je suis très satisfaite. Je n'hésiterais pas à revenir, c'est sûr :).

GRAND MERCI !!!!
Messages postés
9865
Date d'inscription
mercredi 11 août 2004
Statut
Contributeur
Dernière intervention
19 février 2021
1 126
Merci, de rien.
Content pour vous.