Copier une cellule sur une autre feuille si condition

Boostez vos compétences Excel avec notre communauté !

Rejoignez Excel Downloads, le rendez-vous des passionnés où l'entraide fait la force. Apprenez, échangez, progressez – et tout ça gratuitement ! 👉 Inscrivez-vous maintenant !

cloquiom

XLDnaute Nouveau
Bonjour,

Je cherche une manière de copier certaines cellules si la valeur = oui et ne rien copier si la valeur = non.
Ma difficulté réside dans le fait que je voudrais que la valeur se copie automatiquement sur une autre feuille du fichier excel.

ci-joint le tableau pour que vous compreniez mieux et avec un peu plus d'explication 😀

D'avance je vous remercie !!!
 

Pièces jointes

Bonjour à toutes et à tous,

Bienvenue sur XLD, cloquiom.

Supprimer les formules présentes en colonne a de l'onglet destinataire et placer le code ci-après dans le module de l'onglet de saisie.
Code:
Option Explicit
Private Sub Worksheet_Change(ByVal c As Range)
    If c.Column <> 11 Or c.Count > 1 Or c.Row < 6 Then Exit Sub
    If c = "oui" Then c.Offset(, -9).Resize(, 5).Copy Destination:=Sheets("Adresses envoi"). _
      Range("a" & Rows.Count).End(xlUp)(2): c.Offset(1, 0).Select
End Sub
A bientôt 🙂
 
Bonjour DoubleZero.

Merci beaucoup pour votre aide.Ca marche !! jajaja 😀

Cependant étant vraiment novice dans tous ce qui touchent à excel, j'ai encore un petit souci. Lorsque je change et écrit "non", la ligne reste tout de même écrite sous l'onglet Adresse envoi. est-il possible de mettre une variable "si" qui effacerait la ligne si s'est écrit autre chose que oui ou si s'est écrit "non"?


Merci d'avance ¨!! Excellente journée 😀
 

Pièces jointes

Dernière édition:
- Navigue sans publicité
- Accède à Cléa, notre assistante IA experte Excel... et pas que...
- Profite de fonctionnalités exclusives
Ton soutien permet à Excel Downloads de rester 100% gratuit et de continuer à rassembler les passionnés d'Excel.
Je deviens Supporter XLD

Discussions similaires

Réponses
3
Affichages
155
Retour