XL 2016 addition de deux plages dans une seule

KTM à dit:

Bonjour chers tous
j'ai deux plage de données P1 et P2 de mêmes dimensions.
je souhaiterais un code qui va les additionner pour avoir le résultat dans une seule plage P3

Cliquez pour agrandir...

Private Sub Worksheet_Activate()
    [c7:f15].Formula = "=Plages!b4+Plages!g4"
    [c7:f15].Value = [c7:f15].Value    ' facultatif
End Sub

vgendron à dit:

bonjour

pourquoi un code alors qu'une simple formule suffit?
en pj, tu as les deux

Cliquez pour agrandir...

Jacky67 à dit:

Bonjour à tous
Si code vba obligatoire, alors à la sélection de la feuille résultat

VB:

Private Sub Worksheet_Activate()
    [c7:f15].Formula = "=Plages!b4+Plages!g4"
    [c7:f15].Value = [c7:f15].Value    ' facultatif
End Sub

Cliquez pour agrandir...