XL 2016 VBA Insertion de lignes vides : decalage premiere ligne

  • Initiateur de la discussion Initiateur de la discussion Armand11
  • Date de début Date de début

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 !

Armand11

XLDnaute Occasionnel
Bonjour à toute la communauté EXCEL-DOWNLOAD,
Tout d'abord j'espère que tout le monde se porte bien.

Ma question:

a.J'ai appliqué une fonction VBA pour pouvoir insérer une ligne vide à chaque fois. Seulement dans mon cas je n'arrive pas à enlever la ligne 2 de mon tableau à blanc. Ca devrait commencer à partir de la ligne 3 ..
b. Par contre pour pouvoir insérer une ligne: j'ai créé la colonne H (NUMEROTATION apo) en incrémentant en "dur" un "1" en cellule H3 (ou plutôt H2 avant de lancer la MACRO) pour pouvoir à l'origine incrémenter un numéro de ligne unique (dans mon exemple de 1 à 57
c. ensuite après application de la MACRO : de la colonne I, J, K , L M et N j'applique des formules Excel Classques pour préparer mon écriture.

Merci d'avance pour votre aide, je mets à disposition mon fichier avec la Macro.
Merci encore

Armand
 

Pièces jointes

Bonjour Armand,
J n'ai pas bien compris, vous voulez commencer en ligne 3;
Alors pourquoi ne pas insérer une ligne avant de commencer ?
VB:
Sub InsereLigne()
 Dim DATA As Worksheet
 Dim i As Integer
 'bon on va travailler sur la feuille
 'active au moment du lancement
 Set DATA = ActiveSheet
 DATA.Cells(3, 1).EntireRow.Insert Shift:=xlShiftDown    ' Insertion ligne'
 DATA.Range("A3:N3").Interior.Color = xlNone             ' Sans couleur'
 i = 3                                                                              ' indice commence en 3
 While DATA.Cells(i, 8) <> ""
.......
 
- 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

  • Question Question
XL pour MAC Insertion ligne
Réponses
8
Affichages
524
Retour