Ajout d'une ligne automatiquement à la fin d'un tableau
Fermé
bassmart
Messages postés
281
Date d'inscription
jeudi 19 février 2015
Statut
Membre
Dernière intervention
19 décembre 2023
-
25 févr. 2015 à 19:51
bassmart Messages postés 281 Date d'inscription jeudi 19 février 2015 Statut Membre Dernière intervention 19 décembre 2023 - 26 févr. 2015 à 15:16
bassmart Messages postés 281 Date d'inscription jeudi 19 février 2015 Statut Membre Dernière intervention 19 décembre 2023 - 26 févr. 2015 à 15:16
A voir également:
- Ajout d'une ligne automatiquement à la fin d'un tableau
- Tableau croisé dynamique - Guide
- Aller à la ligne excel - Guide
- Tableau ascii - Guide
- Comment faire un tableau - Guide
- Le fichier contient un tableau présentant un extrait des livres les plus prêtés à paris en 2016. filtrez le tableau pour ne faire apparaître que les bandes dessinées ado. puis filtrez le tableau pour ne faire apparaître que celles dont l'auteur est zep. quel est le titre de la bande dessinée ado de zep qui a été la plus prêtée d'après ce tableau ? ✓ - Forum Windows 10
1 réponse
bassmart
Messages postés
281
Date d'inscription
jeudi 19 février 2015
Statut
Membre
Dernière intervention
19 décembre 2023
1
25 févr. 2015 à 22:11
25 févr. 2015 à 22:11
J'ai trouvé un autre code, mais il m'ajoute aussi des lignes entre mes valeurs.
Private Sub worksheet_activate() Dim lig As Long Application.ScreenUpdating = False For lig = ActiveSheet.Cells(Columns(2).Cells.Count, 2).End(xlUp).Row To 2 Step -1 If Cells(lig, 2).Value <> Cells(lig + 1, 2).Value _ And Cells(lig + 1, 2).Value <> "" _ And Cells(lig, 2).Value <> "" Then Rows(lig + 1).Insert End If Next lig Range("b8").Select End Sub
26 févr. 2015 à 15:16
Après plusieurs recherches, voici que ce j'ai trouvé! La macro, ajoute une ligne au bon endroit, c'est-à-dire à la fin de mon tableau, mais elle le fait à chaque fois que j'ouvre la feuille.
Je veux qu'il ajoute une ligne seulement lorsque qu'il me reste une seul ligne vide!
Merci pour votre aide!