Copier cellule après mise à jour Fermé

Question

Bonsoir,

Dans la colonne D d’une feuille de calcul « Inscription », j’ai un menu déroulant avec des noms&prenoms qui s’étend de D24 à D43.

Toujours, sur la feuille « Inscription » sur la plage de E24 :H43, les cellules se mettent à jour en fonction du nom&prenom de la colonne D (classique)

Je cherche à copier la valeur après mise à jour de la colonne D et de la copier (seulement la valeur) dans la feuille « Paramètre » dans la cellule « R3 »

De préférence avec VBA "SelectionChange(ByVal Target As Range" si c'est possible

Merci à vous, cordialement

Le Pingou · Answer

Bonjour,

Merci de préciser ou se trouve la liste déroulante dans le but de proposer un code réaliste sur événement (SelectionChange....).!

xavier62000 · Answer

Bonsoir

La liste déroulante se trouve dans la colonne D de D24 à D43

Bien à toi

Le Pingou · Answer

Bonjour,

Merci, proposition cette après-midi.

Le Pingou · Answer

Bonjour,

Le code à copier dans le module de la feuille (Inscription):

Private Sub Worksheet_Change(ByVal Target As Range)
If Not Intersect(Target, Target.Worksheet.Range("D24:D43")) Is Nothing Then
    Sheets("Paramètre").Range("R3") = Target.Value
End If
End Sub

Copier cellule après mise à jour

4 réponses

Discussions similaires

Newsletters