Finalement j'ai réussi toute seul pour le calcul pondéré
Merci quand même !!
Petite question sur ce code :
If Target.Count = 1 And Target.Column = 2 Then 'colonne 2 car colonne B
If LCase(Target.Value) = "affaire" Then 'nom de la case affaire
'ligne active
maligne = Target.Row
Rows(maligne + 2 & ":" & maligne + 10).Insert Shift:=xlDown, CopyOrigin:=xlFormatFromLeftOrAbove 'copier tableau, compter ligne par rapport à celle de référence (avec affaire)
Rows(maligne + 11 & ":" & maligne + 19).Copy Destination:=Range("A" & maligne + 2)
'décale sélection d'une ligne
Range(Target.Address).Offset(1, 0).Select
End If
J'aimerai que le cadre que je copie colle (donc le premier) se colle en dessous de celui ci et pas eu dessus.
Comme ça mon cadre référent sera toujours la premier.
J'espere que tu comprend !
Et de plus j'ai remarqué un petit problème pck le but final est que je vais devoir masquer tout le bloc (qui sera vide) ça sera le bloc référence mais le problème c'est que actuellement, quand je masque tout mon bloc, et que j'appui sur insérer bloc, ça ne marche pas, as-tu une solution stp ?
Merci pour ton aide