Discussion :

[Redphoeniiix]

Bonjour tout le monde,

Alors je suis une novice en Google Sheet (et excel d'ailleurs) donc je vais essayer d'être la plus claire possible...

Mon fichier contient plusieurs onglets : "Processus" et "Actions à mener".

Dans "Processus", l'une des colonnes contient une mise en forme conditionnelle (jaune si "oui", rose si "à voir", pas de mise en forme si "non").
J'aimerais que, lorsque les cases de cette colonne contiennent "Oui" ou "à voir", certaines données de la ligne correspondante se copient automatiquement dans l'onglet "Actions à mener".
MAIS EN PLUS (oui parce que ce n'est déjà pas assez compliqué comme ça), la colonne B par exemple de la première feuille ne correspond pas forcément à la colonne B de la seconde.

Désolée si je n'ai pas été très claire, je peux vous joindre des impr. écran du fameux tableau si besoin...

Je vous remercie d'avance, et encore désolée

Léonie

[Menhir]

J'aimerais que, lorsque les cases de cette colonne contiennent "Oui" ou "à voir", certaines données de la ligne correspondante se copient automatiquement dans l'onglet "Actions à mener".

A quelle moment cette action doit-elle avoir lieu ? Lors de la saisie du "Oui" ? Par déclenchement par un bouton qui scrute toutes les lignes ayant "Oui" ? Doit-on copier toutes les lignes contenant "Oui" ou simplement celle qui n'ont pas encore été copiées ?

Quelles données sources doivent être copiées ?
A quelle position de la destination doivent-elles être copiées ?

Il faudrait que tu sois plus précises sur ton processus.

Désolée si je n'ai pas été très claire, je peux vous joindre des impr. écran du fameux tableau si besoin...

Ce serait mieux, en effet, pour illustrer les réponses aux questions ci-dessus.

[BENNASR]

bonjour,
Ecrire "Oui" ou "à voir" dans la colonne B de la feuille (Processus) copier la ligne dans la feuille Actions à mener
essayez avec

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Column = 2 Then
If UCase(Target.Value) = "OUI" Or Target.Value = "à voir" Then
Range("A" & Target.Row).Resize(1, 2).Copy
ActiveSheet.Paste Destination:=Worksheets("Actions à mener").Range("A" & Rows.Count).End(xlUp).Offset(1, 0)
Application.CutCopyMode = False
End If
End If
End Sub

[Redphoeniiix]

Tout d'abord, merci pour vos réponses!

Menhir, effectivement je souhaiterais que les valeurs se copient immédiatement, dès la saisie de "Oui" ou "À voir" (sachant que je vais surement essayer de trouver une formule pour que ces valeurs apparaissent seules). Il faudrait copier uniquement les lignes qui n'ont pas encore été copiées.
J'ai mis une ébauche de tableau en copie (sachant que le vrai tableau est sur Google).

Par exemple, si l'on prend le premier contrat du tableau, j'aimerais que :
- A3 de "Processus" soit copiée dans A3 de "Actions"
- B3 de "Processus" soit copiée dans B3 de "Actions"
- C3 de "Processus" soit copiée dans D3 de "Actions"
- E3 de "Processus" soit copiée dans E3 de "Actions"
- F3 de "Processus" soit copiée dans F3 de "Actions"

Je suis consciente que mon tableau est (très) mal fait pour intégrer des macros, je ne sais pas si je demande l'impossible ou non... Sinon j'essaierai de faire un tableau plus simple...

[Menhir]

Menhir, effectivement je souhaiterais que les valeurs se copient immédiatement, dès la saisie de "Oui" ou "À voir" (sachant que je vais surement essayer de trouver une formule pour que ces valeurs apparaissent seules).

Attention, ce n'est pas du tout la même chose.
Une saisie dans une cellule peut être repérée par une macro évènementielle Worksheet_Change.
Mais ce sera totalement sans effet si la valeur est modifiée par une formule, une copie ou... autre (puisque tu ne précises pas ce qui va faire cette modification à l'avenir).

Il faudrait copier uniquement les lignes qui n'ont pas encore été copiées.

Comment peut-on savoir qu'une ligne a déjà été copiée ?
Est-ce qu'il y a un éléments de la ligne qui est modifié lors de la copie ?
Est-il possible de repérer dans la destination (et par quels éléments) les lignes qui ont déjà été copiées ?

J'ai mis une ébauche de tableau en copie (sachant que le vrai tableau est sur Google).

Pour info, plusieurs participants à ce forum (moi compris) n'ouvrent pas les fichiers joints, entre autre pour les raisons exposées ici :
https://www.developpez.net/forums/d8...s-discussions/

Par exemple,

On ne peut pas construire un code sur un exemple.
Il faut des règles qui couvrent l'ensemble des cas possibles.

- A3 de "Processus" soit copiée dans A3 de "Actions"
- B3 de "Processus" soit copiée dans B3 de "Actions"
- C3 de "Processus" soit copiée dans D3 de "Actions"
- E3 de "Processus" soit copiée dans E3 de "Actions"
- F3 de "Processus" soit copiée dans F3 de "Actions"

Tu peux faire ce transfert soit par copie avec la propriété Copy affectée au Range désignant tes données sources.
https://msdn.microsoft.com/fr-fr/lib...0(v=office.15)

Soit le transférer directement par valeur.
Par exemple pour le A3 :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

Worksheets("Actions").Range("A3") = Worksheets("Processus").Range("A3")