ajouter des lignes avec une macro

  • Initiateur de la discussion Initiateur de la discussion GUIGUI12
  • 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 !

G

GUIGUI12

Guest
hello,

Avertissement : je n'y connais rien en macro, mais j'apprends vite !!

J'ai une liste de noms du personnel avec différents éléments pour chaque personne.
Je souhaite avoir la possibilité de rajouter des noms dans cette liste lorsqu'il y a une embauche par exemple.
Dans l'idéal avoir un petit bouton sur ma feuille "Ajouter nouvelle personne".

Suis sûr que c'est possible !🙄
 

Pièces jointes

Re : ajouter des lignes avec une macro

Bonjour GUIGUI12, Robert,
La même mais insertion en tête de tableau (brut de l'enregistreur 😉 )
Cordialement

Merci beaucoup !

Est-ce possible de créée une macro qui ouvrirait un formulaire "nouveaux employés" avec des renseignements à saisir selon les champs demandés (nom, prénom...), puis que cela créé une nouvelle ligne au bon endroit dans le tableau (classement alphabétique).
On ne le voit pas dans mon tableau mais j'ai de nombreuses colonnes avec des formules et il faudrait que les nouvelles lignes aient les formules.

ca se corse !😱
 
Re : ajouter des lignes avec une macro

Salut !

Un essai en pièce jointe, tu séléctionne la ligne à laquelle tu veux insérer ta nouvelle ligne et tu clique sur le bouton; ça recopie textuellement la ligne du dessous.

De la, ta plus qu'a modifier les cellules que tu souhaite...

La macro :

Code:
Sub Insère()

ActiveCell.EntireRow.Insert
Rows(ActiveCell.Row + 1).Copy Rows(ActiveCell.Row)
On Error Resume Next
Rows(ActiveCell.Row).SpecialCells(xltypeconstants, 23).ClearContents

End Sub

A+ !

jo1177
 

Pièces jointes

- 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

Réponses
0
Affichages
188
Réponses
4
Affichages
586
Retour