Discussion :

[Invité]

Bonjour, je viens vers vous parce que j'ai un petit soucis, j'ai creer un bouton qui ajoute une ligne sauf que celui ci ne copie pas les formule du haut:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
Sub Ajouter_Un_Acte_Cliquer() 'Ajoute acte SUIVI PA
 Plage = Selection.Address
   Range(Plage).Offset(Range(Plage).Rows.Count, 0).EntireRow.Insert Shift:=xlDown
 ' Selection.EntireRow.Copy
  '  Selection.EntireRow.Insert Shift:=xlDown
   ' Selection.Offset(1, 0).EntireRow.ClearContents
 
End Sub

Merci de m'élairer sur le problème

Cordialement

[Menhir]

celui ci ne copie pas les formule du haut:

Ton code ne fait qu'insérer une ligne vierge, sans copie.
Donc, à moins que cette ligne soit dans un tableau structuré (et dans ce cas, tu aurais dû le préciser), rien ne sera copié, excepté peut-être le format.

Autre détail, ça :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
Plage = Selection.Address
Range(Plage)....

C'est un peu comme appeler quelqu'un au téléphone pour lui demander son numéro.

Essaye ça

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
Sub Ajouter_Un_Acte_Cliquer()
   Selection.EntireRow.Copy
   Selection.EntireRow.Insert
End Sub

[Invité]

J'adore ton exemple mdr !

Déja le code que tu m'a donné fonctionne largement mieux qu'avant ce qui est logique. mais j'ai petit problème c'est qu'il copie la derniere mise en forme chose que je veux egaleement mais sans la bordure "=" je sais pas si tu vois ce que je veux dire :

[Invité]

Si tu veux voici un exemple plus lisible entre en haut ou je vois 3 lignes "égal" en bordure pour 2 lignes ajouté et en bas sans lignes ajoutés du tout

[Menhir]

sans la bordure "=" je sais pas si tu vois ce que je veux dire

Non, je ne vois pas.

Par contre, j'ai l'impression que tes lignes contiennent des fusions de cellules.
Si c'est le cas, je préfère ne pas m'en mêler : la fusion, ça rend déjà très compliqué Excel en lui-même. Mais dès qu'on doit les traiter avec des macros, c'est encore pire.