Re : Masquer des lignes + incrémenter une valeur dans une cellule
Bonjour,
J’ ai essayé d’appliquer ta macro sur d’autre feuilles en insérant des tableaux dans la feuille modèle avec des formules à l’intérieur des cellules. Je voulais qu’en fonction de la valeur donné dans la feuille pool, cellule K14, il crée les lignes du tableaux d’amortissement (sur une autre feuille appelée RN en fonction du nombre de participants (qu’on a renseigné dans la feuille pool, cellule K14) puis que le bas de page « TOTAL_RN » s’insère à la fin juste après les lignes construites..et que en plus on copie les noms des destinataires dans le tableau d’amortissement…mais rien ne se passe =( ou bien ça bug =( je suis coincé avec le For
If Target > 0 Then
Dim i As Integer, c As Range, total As Range, a As Range, b As Range, tableau As Range
Set tableau=sheets(« Modeles »).Range(« TABLEAURN »)
Set total=sheets(« Modeles »).Range(« TOTAL_RN »)
Set a=sheets(“pool”).Range(“B18”)
Set b= sheets(“pool”).Range(“B18”).copy sheets(“RN”).Range(“B16”)
Set c=sheets(‘RN’).Range(“B16”)
For I = 1 to target.value
Tableau.copy c
…..
Next i
With total
End With
End If
Merci de votre aide