Copier données sous conditions
Lou
-
michel_m Messages postés 18903 Statut Contributeur -
michel_m Messages postés 18903 Statut Contributeur -
Bonjour,
J'ai 2 tableaux sur ma feuil1.
Le 2ième tableau est un résumé du 1er tableau.
J'aimerai que si dans mon 1er tableau il y un "ü" en colonne A et un "COM" en colonne H alors ca recopie la valeur de la colonne C (de la même ligne) dans mon 2ième tableau en colonne M.
Range tableau 1: A3:H112
Range tableau 2: M3:O11
Merci d'avance.
J'ai 2 tableaux sur ma feuil1.
Le 2ième tableau est un résumé du 1er tableau.
J'aimerai que si dans mon 1er tableau il y un "ü" en colonne A et un "COM" en colonne H alors ca recopie la valeur de la colonne C (de la même ligne) dans mon 2ième tableau en colonne M.
Range tableau 1: A3:H112
Range tableau 2: M3:O11
Merci d'avance.
A voir également:
- Copier données sous conditions
- Fuite données maif - Guide
- Comment copier une vidéo youtube - Guide
- Super copier - Télécharger - Gestion de fichiers
- Trier des données excel - Guide
- Supprimer les données de navigation - Guide
2 réponses
Bonjour
il existe la fonction LIKE pour ton souci
attention sensible la cassei tu écris Com tu as perdu
si tu veux l'insensibilité à la casse
Michel
il existe la fonction LIKE pour ton souci
If Range("A2") Like "*" & "ü" & "*" _
And Range("H2") Like "*" & "COM" & "*" Then
MsgBox "gagné"
Else
MsgBox "perdu"
End If
attention sensible la cassei tu écris Com tu as perdu
si tu veux l'insensibilité à la casse
If Ucase(Range("A2")) Like "*" & "Ü" & "*" _
And Ucase(Range("H2")) Like "*" & "COM".... etc
Michel
Lou
Merci pour ta réponse mais je voudrais copier la valeur de la colonne C dans mon 2ieme tableau si et seulement si il y a un "ü" dans la colonne A et un "Com" dans la colonne H de la mémé ligne. Je ne souhaite pas faire apparaître un message Box.
Voila ce que j'aimerai coder en VBA:
Private Sub Worksheet_Change(ByVal Target As Range)
'Si on ne saisi pas "ü" dans la colonne A ca ne fait rien
'Si on saisi pas "Off Com" dans la colonne H ca ne fait rien
'Recuperation de la valeur en colonne C ou on a saisi "ü"
'Copier la valeur
'Coller la valeur dans la colonne H à la partir de la ligne 4
End Sub
Private Sub Worksheet_Change(ByVal Target As Range)
'Si on ne saisi pas "ü" dans la colonne A ca ne fait rien
'Si on saisi pas "Off Com" dans la colonne H ca ne fait rien
'Recuperation de la valeur en colonne C ou on a saisi "ü"
'Copier la valeur
'Coller la valeur dans la colonne H à la partir de la ligne 4
End Sub
