XL 2016 Besoin d'aide sur les macros

Abou Dinblan · 18 Mars 2023

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

job75 · 18 Mars 2023

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+

Abou Dinblan · 18 Mars 2023

As-tu un peu de temps pour que je te partage mon ecran ? en meme temps tu pourras voir mon fichier comment il se présente

ca m'aiderait fortement

job75 · 18 Mars 2023

J'ai donné une réponse, dites-nous si elle convient et sinon dites pourquoi.

Abou Dinblan · 19 Mars 2023

Moyennement je voulais pas rentrer dans le VBA. je trouve cette fonction complexe pour mes compétences actuelles

job75 · 19 Mars 2023

Pour insérer des lignes il faut du VBA et c'est bien ce que vous aviez essayé de faire.

Abou Dinblan · 20 Mars 2023

Je vous remercie, pour faire cela il me faudrait un peu plus m'experimenter et avoir quelqu'un qui peut m'accompagner dans cette démarche

XL 2016 Besoin d'aide sur les macros

Abou Dinblan

XLDnaute Junior

Pièces jointes

job75

XLDnaute Barbatruc

Pièces jointes

Abou Dinblan

XLDnaute Junior

job75

XLDnaute Barbatruc

Abou Dinblan

XLDnaute Junior

job75

XLDnaute Barbatruc

Abou Dinblan

XLDnaute Junior

Discussions similaires