Microsoft 365 Macro pour ajouter des lignes copiées ?

Boostez vos compétences Excel avec notre communauté !

Rejoignez Excel Downloads, le rendez-vous des passionnés où l'entraide fait la force. Apprenez, échangez, progressez – et tout ça gratuitement ! 👉 Inscrivez-vous maintenant !

ENDELL

XLDnaute Nouveau
Bonjour, étant tout à fait nouveau (pas sur Excel mais sur VBA), j'ai besoin de faire un bouton avec une macro toute simple qui puisse me permettre de générer une ligne au dessus d'une autre, et en gardant la mise en forme si possible (pas forcément le contenu). Exemple dans le fichier ci-joint, j'aimerais que le fait d'appuyer sur le bouton 1 me permette de générer une ligne entre A1 et A2 qui aie la même mise en forme que A2 (ici un simple fusionner et centrer).

Je comprends un peu comment fonctionnent les macros et les formules, mais j'avoue qu'il ya des points sur lesquels je bloque, du coup si possible d'avoir une petite explication avec, ce serait pas de refus :/

Merci !
 

Pièces jointes

Oups!
La même commentée. 🙄
VB:
Sub Insère()
    L = ActiveCell.Row              ' "L" récupère la ligne qui est sélectionnée
    Rows(L).Copy                    ' On copie cette ligne
    Selection.Insert Shift:=xlDown  ' On l'insère au dessus
    Rows(L).ClearContents           ' On en efface le contenu ( mais pas le format )
    Cells(L, "A").Select            ' On sélectionne la cellule en colonne A ( par pur esthètique )
End Sub
 

Pièces jointes

- Navigue sans publicité
- Accède à Cléa, notre assistante IA experte Excel... et pas que...
- Profite de fonctionnalités exclusives
Ton soutien permet à Excel Downloads de rester 100% gratuit et de continuer à rassembler les passionnés d'Excel.
Je deviens Supporter XLD

Discussions similaires

Réponses
3
Affichages
489
Réponses
4
Affichages
939
Réponses
11
Affichages
2 K
Retour