Copie d'une liste déroulante

Bonjour, j'ai une cellule (liste de choix). Je voudrai qu'à chaquefois que je fais une sélection dans la liste, le résultat s'affiche automatiquement dans une autre cellule.

Exemple : liste de choix, "les mois de l'année", je sélectionne "janvier" . je voudrai voir janvier automatiquement copié dans une autre cellule.

J'ai un début de code dans un module, je vous le livre

Sub Macro3()

' Macro3 Macro

Range("C1").Select

Selection.Copy

Range("D75").Select

Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _

:=False, Transpose:=False

End Sub

Par avance merci pour l'aide

Salut le forum

Pourrais-tu préciser comme est obtenu ta liste de choix ?

Si Liste de Validation en B5, code à copier dans le module de la feuille

Private Sub Worksheet_Change(ByVal Target As Range)
  If Not Application.Intersect(Target, Range("B5")) Is Nothing And Target.Count = 1 Then
    Target.Copy Range("A10")
  End If
End Sub

Mytå

La liste est est sur la feuil2 de mon classeur. j'ai fais validation de données / liste / plage (en feuill2)


Ouah trop fort Myta !!!

J'ai parfois l'impression de voir un tour de magie, pour le néophite que je suis c'est très vite impressionnant. Merci encor, je vais voir le code de plus près histoire de me sortir de mon ignorance.

Re le forum

Réponse dans mon message précédent

Mytå

Rechercher des sujets similaires à "copie liste deroulante"