Recopie d'une ligne entière si "X" contenu dans la colonne C

Fermé

etna - 8 déc. 2021 à 15:39
yg_be Messages postés 23358 Date d'inscription lundi 9 juin 2008 Statut Contributeur Dernière intervention 28 novembre 2024 - 8 déc. 2021 à 17:42

Bonjour,

J'aimerais un peu (beaucoup) d'aide pour la création d'une macro.
Je précise je n'ai jamais utilisé VBA et j'ai peu de temps pour rendre le dit document terminé.

Il faudrait que lorsque qu'il y a écrit "X" dans la colonne C de la feuille 1 alors que ça copie toute la ligne associé dans la feuille 2, puis si c'est écrit "Y" dans la colonne C de la feuille 1 ça copie dans la feuille 3, et ainsi de suite avec beaucoup de variantes différentes présentes dans la colonne C. Autant de variantes que de feuilles à créer.

Merci beaucoup pour votre aide !!!

A voir également:

Recopie d'une ligne entière si "X" contenu dans la colonne C
Déplacer une colonne excel - Guide
Aller à la ligne dans une cellule excel - Guide
Formule somme excel colonne - Guide
Trier colonne excel - Guide
Colonne word - Guide

2 réponses

Réponse 1 / 2

yg_be Messages postés 23358 Date d'inscription lundi 9 juin 2008 Statut Contributeur Dernière intervention 28 novembre 2024 Ambassadeur 1 555
8 déc. 2021 à 15:54

bonjour,
comment faire la correspondance entre les valeurs en colonne C et les noms des feuilles de destination?
où copier dans les feuilles de destination?
"peu de temps", c'est quoi? quand est-ce trop tard?

etna
8 déc. 2021 à 16:00

En gros il faut vraiment que si dans ma colonne C j'ai "X" alors la ligne de A à Q se copie dans l'onglet qui s'appellera "X" également.
La ligne doit juste se copier et conserver sa place initiale dans la feuille de départ

J'ai peu de temps du genre 2h aujourd'hui et 4h lundi matin seulement

yg_be Messages postés 23358 Date d'inscription lundi 9 juin 2008 Statut Contributeur Dernière intervention 28 novembre 2024 1 555 > etna
8 déc. 2021 à 16:44

Donc si tu as la macro demain, c'est bon?

etna > yg_be Messages postés 23358 Date d'inscription lundi 9 juin 2008 Statut Contributeur Dernière intervention 28 novembre 2024
8 déc. 2021 à 16:57

Yes !!!
Je la traiterais dès mon retour au travail lundi matin mais ce serait vraiment top du top

yg_be Messages postés 23358 Date d'inscription lundi 9 juin 2008 Statut Contributeur Dernière intervention 28 novembre 2024 1 555 > etna
8 déc. 2021 à 17:11

toutes les valeurs en colonne C ont une feuille du même nom?
on peut se servir d'une colonne toujours remplie pour décider de s'arreter dès qu'elle est vide?

yg_be Messages postés 23358 Date d'inscription lundi 9 juin 2008 Statut Contributeur Dernière intervention 28 novembre 2024 1 555 > yg_be Messages postés 23358 Date d'inscription lundi 9 juin 2008 Statut Contributeur Dernière intervention 28 novembre 2024
8 déc. 2021 à 17:16

les feuilles de destination existent, ou sont à créer?

Réponse 2 / 2

yg_be Messages postés 23358 Date d'inscription lundi 9 juin 2008 Statut Contributeur Dernière intervention 28 novembre 2024 Ambassadeur 1 555
8 déc. 2021 à 17:42

ceci copie, s'arrete dès que la colonne C est vide, et suppose que les feuilles de destination existent:

Sub etna()
Dim nomdest As Range, fdep As Worksheet
Set fdep = Sheets("dep")
Set nomdest = fdep.[c1]
Do While nomdest <> ""
    nomdest.EntireRow.Copy (Sheets(nomdest.Value).Cells(nomdest.Row, 1))
    Set nomdest = nomdest.Offset(1)
Loop
End Sub

Discussions similaires

Dimensions L x l x H : comment lire ces infos ?

Que veut dire "correspondant occupé" lors d'un appel ?