Ceci est une page optimisée pour les mobiles. Cliquez sur ce texte pour afficher la vraie page.

XL 2010 Copie d'une cellule selon critère

NikoD

XLDnaute Nouveau
Bonjour à tous,

J'ai passé ma journée à me casser les dents sur ce problème que je vais tenter d'expliquer le plus clairement possible.
Dans le fichier ci-joint, je désire faire la chose suivante:

si en B2 j'inscris 1, la case B14 (Poste1) s'inscris à la place, toujours en case B2. (avec la mise en forme, fond rouge)
si en B2 j'inscris 4, la case C15 (poste4) s'inscris à la place, toujours en case B2 (avec la mise en forme, fond bleu)
etc, etc

Voilà l'explication est, à mon avis, assez simple mais pour la mise en place je n'y arrive pas...

D'avance un grand merci aux personnes qui prendront le temps de m'aider
Nicolas
 

Pièces jointes

  • Copie de Calculateur de poste.xlsx
    12 KB · Affichages: 19

Iznogood1

XLDnaute Impliqué
Bonjour,

pas clair tes conditions.
voilà un squelette de code à adapter

Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Value = 1 Then
Application.EnableEvents = False
Target.Value = [B14].Value
Application.EnableEvents = True
End If
End Sub
 

NikoD

XLDnaute Nouveau
Bonjour Iznogoog, merci pour cette réponse rapide!
J'ai oublié de préciser que je suis utilisateur débutant d'excel et que donc ta solution ne me parle pas beaucoup...

J'espérai avoir justement été clair? qu'y-a-il que je puisse préciser?
Merci
Nicolas
 

Papou-net

XLDnaute Barbatruc
Bonjour NikoD, Iznogood1, le Forum,

Voici un exemple avec une macro événementielle appliquée à la plage B2:BA12.

Bonne soirée.

Cordialement.
 

Pièces jointes

  • Copie de Copie de Calculateur de poste.xlsm
    18.5 KB · Affichages: 19

Discussions similaires

Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…