Discussion :

[Capitaine Nox]

Bonjour,

je suis tout à fait néophyte dans le monde de VBA mais cela m'intéresse. Un jour je m'y intéresserai vraiment, promis !

En attendant, j'aurai besoin d'un esprit génial afin de me montrer la lumière.

J'ai un tableau de suivi sur excel, auquel je rajoute régulièrement des lignes. J'aurai voulu savoir s'il était possible de rajouter automatiquement une nouvelle ligne à la fin de ce tableau, dès que l'avant dernière est remplie ? De plus, la première colonne possède une formule à laquelle est liée une mise en forme conditionnelle. Est-ce que cette manipulation est possible ?

Cela relève plus du gadget que de la réelle nécessité mais c'est aussi un des intérêt de VBA, non ?

Merci d'avance pour vos réponses. Si vous avez besoin de plus d'informations (ce dont je ne doute pas), j'essayerai de vous répondre rapidement.

[joe.levrai]

Bonjour,

converti ta plage de cellules en un vrai tableau "structuré" via le menu INSERTION>>TABLEAU

Dès que tu écriras dans la première ligne située en dessous du tableau, elle sera automatiquement intégrée au tableau (le redimensionnement est automatique).
Et si une colonne porte une formule, cette formule est automatiquement reportée sur la nouvelle ligne

[Menhir]

J'ai un tableau de suivi sur excel, auquel je rajoute régulièrement des lignes. J'aurai voulu savoir s'il était possible de rajouter automatiquement une nouvelle ligne à la fin de ce tableau, dès que l'avant dernière est remplie ? De plus, la première colonne possède une formule à laquelle est liée une mise en forme conditionnelle.

Dans une macro évènementielle Worksheet_Change, tu vérifies si la ligne dans laquelle a été saisie la valeur est égale à la dernière moins 1.
https://msdn.microsoft.com/fr-fr/lib.../ff839775.aspx
Pour savoir quelle est la dernière, utilise la propriété End de Range.
https://msdn.microsoft.com/fr-fr/lib.../ff839539.aspx

Si c'est le cas, tu copies la dernière ligne et tu la colles au même endroit par un Insert.
https://msdn.microsoft.com/fr-fr/lib.../ff837760.aspx
https://msdn.microsoft.com/fr-fr/lib.../ff840310.aspx

[Capitaine Nox]

Merci à vous, je vais voir ce que ça donne ^^