XL 2010 Copie d'une cellule selon critère

[NikoD]

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

 

[Iznogood1]

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]

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]

Bonjour NikoD, Iznogood1, le Forum,

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

Bonne soirée.

Cordialement.

 

[NikoD]

Bonjour à tous,

Un grand merci à vous deux pour votre aide, mention spéciale à papou-net qui a trouvé la solution parfaite à mon problème!
bonne journée à tout le monde!
Nicolas