MACRO: Ajout d'une ligne avec mise en forme particulière

Résolu
TeddyGalere Messages postés 77 Statut Membre -  
TeddyGalere Messages postés 77 Statut Membre -
Bonjour,

J'ai un tableau (avec une mise en forme pariculière) que je remplis via un userform.

Je souhaiterai cependant savoir comment faire pour insérer une nouvelle ligne, dès que la dernière ligne du tableau est rempli...
A voir également:

2 réponses

f894009 Messages postés 17413 Statut Membre 1 715
 
Bonjour,

Vous ajoutez ces lignes comment, et si vous montriez le tableau "qui a une mise en forme particuliere"!!!!!!
0
TeddyGalere Messages postés 77 Statut Membre
 
Bah justement je ne sais pas comment les ajouter a la fin.
et rien de bien méchant, juste un remplissage de couleur suivant la colonne...
Mais ca serait plus sur comment ajouter une ligne automatiquement...
0
f894009 Messages postés 17413 Statut Membre 1 715 > TeddyGalere Messages postés 77 Statut Membre
 
Re,

Tout a fait Thierry, mais a quoi ressemble le tableau ??????????????????????
0
TeddyGalere Messages postés 77 Statut Membre
 
8 colonnes orange pale
9 violet pale
et 6 bleu turquoise pale !!!!
0
f894009 Messages postés 17413 Statut Membre 1 715 > TeddyGalere Messages postés 77 Statut Membre
 
Re,

ex: copier/coller des cellules derniere ligne sur ligne suivante avec effacement du contenu
adaptez la euille et collonnes
Sub ajout_ligne()
    With Worksheets("feuil1")
        derlig = Range("A" & Rows.Count).End(xlUp).Row
        ligsuiv = derlig + 1
        .Range("A" & derlig & ":H" & derlig).Copy Range("A" & ligsuiv)
        .Range("A" & ligsuiv & ":H" & ligsuiv).ClearContents
    End With
End Sub
0
TeddyGalere Messages postés 77 Statut Membre > f894009 Messages postés 17413 Statut Membre
 
Merci pour la réponse...
Par contre je n'arrive pas a insérer la macro dans celle déjà existante...
Ca me met un message d'erreur en mode débogage... :'(

Si tu peux jeter un oeil ;)

http://www.cjoint.com/c/FCvnWOy2v1C
0
eriiic Messages postés 25847 Statut Contributeur 7 279
 
Bonjour,

ou bien convertir la plage en Tableau (Insertion / Tableau).
L'ajout d'une donnée sur une nouvelle ligne copiera formules et mises en forme.
eric
0
TeddyGalere Messages postés 77 Statut Membre
 
Salut Eriiic !!!

Merci pour ta réponse, mais je ne comprend pas son sens/utilité ;)
0
eriiic Messages postés 25847 Statut Contributeur 7 279
 
Il faut tester pour comprendre...
Sélectionne ta plage de données avec les titres, va dans Insertion et clique sur Tableau, ensuite commence une saisie sur la ligne suivante.
Fait une saisie en A4 sur ce fichier : https://www.cjoint.com/c/FCvpILux68Y
0
TeddyGalere Messages postés 77 Statut Membre
 
Merci bien pour ta réponse Eric...
En effet, tout aussi efficace et bien plus simple :)
Merci beaucoup !!
0