XL 2016 Déporter une entrée

robertduval · 17 Mai 2024

Bonsoir j'ai récupéré ce fichier dans un forum, peut être ici d 'ailleurs je ne m'en rappelle plus, je souhaiterais déporter l'entrée

des tirages mais ça ne fonctionne pas

Merci d'avance

Gégé-45550 · 18 Mai 2024

robertduval à dit:
Bonsoir j'ai récupéré ce fichier dans un forum, peut être ici d 'ailleurs je ne m'en rappelle plus, je souhaiterais déporter l'entrée

des tirages mais ça ne fonctionne pas

Merci d'avance

Bonsoir,
Voir PJ.
Cordialement,

Gégé-45550 · 18 Mai 2024

robertduval à dit:
Bonsoir j'ai récupéré ce fichier dans un forum, peut être ici d 'ailleurs je ne m'en rappelle plus, je souhaiterais déporter l'entrée

des tirages mais ça ne fonctionne pas

Merci d'avance

Bonsoir,
Voir PJ.
Cordialement,

job75 · 18 Mai 2024

Bonsoir robertduval, [Edit] Gégé-45550,

Essayez avec cette macro dans le code de la feuille "Stats" :

VB:

Private Sub Worksheet_Change(ByVal Target As Range)
If Intersect(Target, Range("C2")) Is Nothing Then Exit Sub
Range("C2").Select
Application.ScreenUpdating = False
With Sheets("Tirages")
    .Activate
    .Range("O2") = Range("C2")
End With
Me.Activate
End Sub

J'espère que c'est ce que vous voulez obtenir.

Bonne nuit.

robertduval · 18 Mai 2024

C'est ça merci beaucoup

XL 2016 Déporter une entrée

robertduval

XLDnaute Junior

Pièces jointes

Gégé-45550

Gégé-45550

XLDnaute Accro

Pièces jointes

job75

XLDnaute Barbatruc

Pièces jointes

robertduval

XLDnaute Junior

Discussions similaires