Recopie d'une ligne entière si "X" contenu dans la colonne C
etna
-
yg_be Messages postés 23541 Date d'inscription Statut Contributeur Dernière intervention -
yg_be Messages postés 23541 Date d'inscription Statut Contributeur Dernière intervention -
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 !!!
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
- Site x - Guide
- Sites X : Pornhub, YouPorn et Redtube sont de nouveau accessibles en France - Guide
- Trier une colonne excel - Guide
- Partager photos en ligne - Guide
2 réponses
yg_be
Messages postés
23541
Date d'inscription
Statut
Contributeur
Dernière intervention
Ambassadeur
1 584
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?
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?
yg_be
Messages postés
23541
Date d'inscription
Statut
Contributeur
Dernière intervention
Ambassadeur
1 584
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
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
Je la traiterais dès mon retour au travail lundi matin mais ce serait vraiment top du top
on peut se servir d'une colonne toujours remplie pour décider de s'arreter dès qu'elle est vide?