Ceci est une page optimisée pour les mobiles. Cliquez sur ce texte pour afficher la vraie page.

Quelle macro pour insérer une ligne après la dernière ligne?

Créer une discussion
  • Initiateur de la discussion Initiateur de la discussion ludo2179
  • 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 !

S'inscrire
L

ludo2179

Guest
Bonjour à tous,

Depuis deux jours, je m'arrache les cheveux pour trouver la bonne macro pour insérer une ligne, respectant la mise en forme, en dessous de la dernière ligne utilisée.

En cherchant sur le forum, j'ai réussi à créer un userform et en copier le contenu dans le tableau. Mais j'aimerais qu'en plus, en appuyant sur le bouton "ajouter" du userform, une ligne s'insère.

Sur ce point, je n'arrive pas à trouver la solution. La ligne s'ajoute soit au dessus de celle remplie grâce au userform soit au dessus du tableau...

Merci d'avance à celles ou ceux qui se pencheront sur le problème.
 

Pièces jointes

Trier par date Trier par votes
Re : Quelle macro pour insérer une ligne après la dernière ligne?

Bonjour Ludo et bienvenu, bonjour le forum,

Peut-ête comme ça :
Code: 
Private Sub Valider_click()
Dim ligne As Long

With Sheets("recours")
    ligne = .Cells(Application.Rows.Count, 1).End(xlUp).Row + 1
    .Rows(ligne).Insert shift:=xlShiftDown
    .Cells(ligne, 1) = Me.TextBox1
    .Cells(ligne, 2) = Me.TextBox2
    .Cells(ligne, 3) = Me.ComboBox1
    .Cells(ligne, 4) = Me.TextBox3
    .Cells(ligne, 5) = Me.TextBox4
    .Cells(ligne, 6) = Me.TextBox5
End With
Unload Me
End Sub
 
Vote positif 0 Vote négatif
Re : Quelle macro pour insérer une ligne après la dernière ligne?

Bonjour,

pas ouvert ton fichier, mais essaye peut être ceci, la dernière ligne est déterminée à partir de la colonne A, à adapter à ton projet :
Code: 
Range("A65536").End(xlUp).EntireRow(2).Insert

bon après midi
@+

Edition :bonjour Robert🙂
 
Vote positif 0 Vote négatif
Re : Quelle macro pour insérer une ligne après la dernière ligne?

Super! En ajoutant deux lignes supplémentaires au tableau vierge, ça fonctionne parfaitement, en gardant la mise en forme.
Sinon, sans cet ajout, la mise en forme n'est pas repectée.

Pour garder un tableau sans ligne vide, je les ai tout simplement masquées.

Merci pour la solution!
 
Vote positif 0 Vote négatif
Identifiez-vous ou inscrivez-vous pour participer.
Rejoins nos membres "Supporter XLD" et booste ton expérience Excel !
- 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
Assurez vous de marquer un message comme solution pour une meilleure transparence.

Discussions similaires

M
  • Question Question
Microsoft 365 Chercher dernière valeur d'une ligne mais avec une particularité
Réponses
4
Affichages
345
Marie.
M
  • Résolu(e)
XL 2016 copier la même ligne sur la dernière ligne vierge d'un tableau
Réponses
8
Affichages
303
eastwick
  • Résolu(e)
XL 2021 tri par lignes
2
Réponses
19
Affichages
1 K
rastafouette
W
  • Question Question
Autres Inserer automatiquement une ligne avec même mise en forme après avoir valider mes données
Réponses
11
Affichages
506
walki
W
R
  • Question Question
XL pour MAC ajouter une ligne au-dessus
Réponses
2
Affichages
152
rtlv17
R
F
  • Question Question
Microsoft 365 macro-formule pour recopier une ligne automatiquement à chaque changement de nom
Réponses
5
Affichages
370
Cousinhub
M
  • Résolu(e)
XL 2021 VBA Ajouter ligne tableau + autres cellules hors tableau
Réponses
3
Affichages
246
sylvanu
  • Résolu(e)
Microsoft 365 récupérer la dernière ligne de chaque anomalie déclarée
Réponses
3
Affichages
174
natorp
M
  • Résolu(e)
Microsoft 365 $ Macro pour copier un exemple et$.....
Réponses
9
Affichages
516
sousou
M
  • Résolu(e)
XL 2021 Verrouillage de cellules après exécution d'une macro
2
Réponses
23
Affichages
1 K
MATLEA
M
T
  • Question Question
XL 2019 tableau , cellule protégé et ligne vide
Réponses
2
Affichages
262
sylvanu
  • Question Question
XL 2019 Ajout d'un bouton DELETE sur mon USF
2 3
Réponses
43
Affichages
2 K
Phil Du59
D
  • Résolu(e)
Microsoft 365 VBA Déplacement de la cellule active dans une ligne sélectionnée
Réponses
11
Affichages
535
danielco
D
M
  • Résolu(e)
XL 2019 saisie sur la première ligne vide depuis un formulaire
Réponses
8
Affichages
435
Mimi1952
M
C
  • Résolu(e)
XL 2016 Macro permettant d'automatiser le tri d'un tableau Excel et de différencier les lignes
Réponses
5
Affichages
249
Chris1263
C
P
  • Résolu(e)
XL 2019 Tri sur une ligne dans un tableau.
Réponses
4
Affichages
366
Paulle
P
S
  • Résolu(e)
XL 2016 Avis / Aide réécriture code
2 3
Réponses
38
Affichages
1 K
safranien
S
A
  • Question Question
Microsoft 365 créer un lien vers une cellule dont la ligne est fluctuante
Réponses
3
Affichages
340
AtTheOne
P
  • Question Question
XL 2016 Macro VBA remplissage tableau de synthèse % déchet ligne de production
Réponses
4
Affichages
428
vgendron
N
  • Résolu(e)
XL 2019 Macro pour copier ligne avec case à cocher liée
Réponses
12
Affichages
556
Phil69970
Menu
Connexion
S'inscrire
Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…