ajouter une ligne automatiquement en recopiant les formules et la validation des données.

blancolie · 25 Avril 2020

Bonjour le forum.

J'ai récupérer ce code VBA mais je connais rien en VBA.

VB:

Sub insertionLigne()
    With ActiveCell
        .EntireRow.Insert xlShiftDown 'Insert une ligne au dessus
        .EntireRow.Copy ' Copie la ligne active
        With .Offset(-1).EntireRow 'Passe les formats et formules à la ligne insérée
            .PasteSpecial xlPasteFormats
            .PasteSpecial xlPasteFormulas
        End With
        Application.CutCopyMode = False
    End With
End Sub

Le soucis de ce code : il est fait pour être lancer manuellement, recopie bien les formules et les validations de données (liste déroulante) par contre me supprime mes listes déroulantes de la ligne au dessus.

Ce que je voudrais, c'est le rajout de ligne se fasse automatiquement quand la première cellule (code) soit rempli (cellule A3 dans l'onglet Zone de saisie) tout en recopiant les formules et liste déroulante mais je veux que cela me laisse les liste déroulante active au dessus.

merci à vous

Jacky67 · 25 Avril 2020

Bonjour,
Une solution simple, consiste à passer en tableau structuré
Il y a alors possibilité de faire cela sans vba (clic droit insérer etc...)
En Vba

VB:

Sub Ajout_ligne()
    With [tableau2]
        .ListObject.ListRows.Add (1)
    End With
End Sub

blancolie · 25 Avril 2020

Bonjour et merci

j'ai essaye les tableaux structuré mais toutes mes formules ne sont pas récopié dans ce fichier la.

le codage que vous m'avez mis en avant , c'est à rajouté de celui qui est existant ?

merci en tout cas.

blancolie · 25 Avril 2020

j'ai regardé votre travail, dc je vois que vous rajouter la ligne au dessus . il n 'y a pas la possibilité de faire l'inverse ? et je vois qu'il faut cliquer sur un bouton ? ce n'est pas possible que cela se fasse automatiquement si la cellule code est rempli ?

Cordialement

sur celui la je n'ai enleve le codage

Jacky67 · 25 Avril 2020

blancolie à dit:
j'ai regardé votre travail, dc je vois que vous rajouter la ligne au dessus . il n 'y a pas la possibilité de faire l'inverse ? et je vois qu'il faut cliquer sur un bouton ? ce n'est pas possible que cela se fasse automatiquement si la cellule code est rempli ?

Cordialement

sur celui la je n'ai enleve le codage

Re..
Dans cette version, une ligne est ajoutée si la cellule colonne 1 précédente est renseignée et uniquement si la sélection se fait dans la ligne suivante du tableau

blancolie · 25 Avril 2020

bonsoir, je te remercie,
j'ai ouvert mais quand je rentre une donnée, la deuxième ligne ne se crée pas ? comment fait on pour la faire apparaitre ?

merci pour ton travail

Jacky67 · 25 Avril 2020

Re.
Je ne comprends pas ce que tu veux dire.
Je n'éprouve aucune difficulté à saisir les cellules de la ligne si je clique sous le première ligne vide du tableau.
Ou alors on ne parle pas de la même chose

blancolie · 25 Avril 2020

En ouvrant ton fichier ,quand je clique sur la cellule A4 juste en dessous de celle ou est inscrit ach01 (cellule A3), je n 'ai pas ma liste déroulante. dans la cellule B4, j ai bien une de mes formules mais ds les autres à cotés, je n 'ai rien.

logiquement si on se comprends bien, quand je rentre 1 donnée , logiquement , 1 deuxieme ligne doit apparaitre avec les listes déroulantes et formules ?

Jacky67 · 25 Avril 2020

Re..
Chez moi, j'ai bien les listes déroulantes en colonne A et en colonne C

blancolie · 25 Avril 2020

La version d'excel peut y être pour quelque chose ? je suis sous office365 et sous mac ? car je n'ai vraiment pas cet image que tu me montres `. je n'ai rien du tout

Jacky67 · 25 Avril 2020

Sans doute
Sous Mac je ne serais d'aucun secours
Une chose à vérifier
La désactivation des objets dans les options avancées d'Excel

blancolie · 25 Avril 2020

apparemment, ils sont désactivés

Jacky67 · 25 Avril 2020

blancolie à dit:
apparemment, ils sont désactivés

RE..
Ben….. active et testes

blancolie · 25 Avril 2020

le 1er post que j'ai poste avec le codage vba, vous voyez ? par contre la cela marche mais la c'est manuelle et quand je clique sur macro, j'ai un nom de macro qui apparait.
alors que quand c'est ta macro , ds la fenêtre macro, je n'ai pas de nom.

mais apres je ne vois pas ou est le problème, car je connais pas le vba

blancolie · 25 Avril 2020

cela ne change rien

ajouter une ligne automatiquement en recopiant les formules et la validation des données.

blancolie

XLDnaute Impliqué

Pièces jointes

Jacky67

XLDnaute Barbatruc

Pièces jointes

blancolie

XLDnaute Impliqué

blancolie

XLDnaute Impliqué

Pièces jointes

Jacky67

XLDnaute Barbatruc

Pièces jointes

blancolie

XLDnaute Impliqué

Jacky67

XLDnaute Barbatruc

blancolie

XLDnaute Impliqué

Jacky67

XLDnaute Barbatruc

blancolie

XLDnaute Impliqué

Jacky67

XLDnaute Barbatruc

blancolie

XLDnaute Impliqué

Jacky67

XLDnaute Barbatruc

blancolie

XLDnaute Impliqué

blancolie

XLDnaute Impliqué

Discussions similaires