XL 2016 Besoin d'aide sur les macros

Abou Dinblan

XLDnaute Junior
Bonjour a tous, voila je vais vous mettre mon fichier en piece jointe.

Quand je fais ma macro, la ligne se rajoute mais j'aimerai aussi que le montant final soit ajouté a une formule existante

Dans l'exemple du fichier joint, si je choisis une prime et que je clique sur ok ca va m'ajouter la ligne de prime et me lajouter au total brut (jusqu'e là tout va bien)
et si je choisis une deuxieme prime et que je clique sur ok ca me rajoute une autre ligne Mais dans les montants ca me mets des erreurs..

Merci de m'aider
 

Pièces jointes

  • EXemple forum macro.xlsm
    18.7 KB · Affichages: 5

job75

XLDnaute Barbatruc
Bonsoir Abou Dinblan,

Regardez bien le fichier joint et la macro du bouton OK :
VB:
Sub Prime()
Dim c As Range
Set c = [B:B].Find("Total", , xlValues, xlPart)
With c.Resize(, 5)
    .Insert xlDown
    .Rows(0).FormulaR1C1 = Array([K16], "", [M16], [O16], "=RC[-1]*RC[-2]")
End With
End Sub
A+
 

Pièces jointes

  • Ajout(1).xlsm
    21.9 KB · Affichages: 2

Discussions similaires

T
  • Résolu(e)
Microsoft 365 pb effacement macro
Réponses
8
Affichages
427
Themax
T

Statistiques des forums

Discussions
315 094
Messages
2 116 154
Membres
112 670
dernier inscrit
Flow87