Insertion ligne avec formules copiées

8decompte-bs-as.zip (505.49 Ko)
Bonjour
je voudrais lorsque j’insère une ligne les formules soient copiées sur toutes la ligne.
Par exemple si j’insère une ligne après la ligne 17 dans l’onglet Janvier , je voudrais que les formules de la ligne 17 soient copiées automatiquement dans la nouvelle ligne et adaptées à cette nouvelle ligne

Bonjour,

Je n'ai pas ouvert votre fichier qui semble bien lourd, mais,
Vous utilisez O365, pourquoi vous n'utilisez pas des Tableaux Structurés, toutes les formules suivent

A+

Bonsoir,

Voici une idée de code, mais tous les cas "de protection" ne sont pas pris en compte comme par exemple l'ajout "en première ligne" !
Private Sub Worksheet_Change(ByVal Target As Range)
    If Target.Cells(1, 1) = "" And Target.Row > 17 Then
        Target.Cells(1, 1).Offset(-1).Resize(1, 52).Copy Destination:=Target.Cells(1, 1)
        Target.Cells(1, 1).Resize(1, 52).SpecialCells(xlCellTypeConstants) = ""
    End If
End Sub

@ bientôt

LouReeD

Merci de bien vouloir m'aider , mais comment entrer un code dans Excel?

Rechercher des sujets similaires à "insertion ligne formules copiees"