A voir également:
- Ajouter lignes vide
- Ajouter un compte gmail - Guide
- Ajouter un profil netflix payant - Guide
- Supprimer page vide word - Guide
- Ajouter un compte whatsapp - Guide
- Ajouter signature word - Guide
3 réponses
Normad
Messages postés
112
Date d'inscription
dimanche 6 juin 2010
Statut
Membre
Dernière intervention
10 juin 2015
37
23 févr. 2015 à 15:54
23 févr. 2015 à 15:54
Bonjour,
Dans le code de la feuille concernée (pas dans un module), écrire :
Chaque fois que vous quitterez une cellule de la colonne E, une ligne s'insère au-dessous.
Le code déprotège puis re-protège la feuille (sans mot de passe).
Pour une autre colonne, changez ColEnCours = "5" avec le numéro de colonne souhaité (1 = A , 2 = B, etc...)
Dans le code de la feuille concernée (pas dans un module), écrire :
Option Explicit
Private ColEnCours As Integer
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If ColEnCours = "5" Then
ActiveSheet.Unprotect
Target.EntireRow.Insert , CopyOrigin:=xlFormatFromLeftOrAbove
ActiveSheet.Protect
End If
ColEnCours = Target.Column
End Sub
Chaque fois que vous quitterez une cellule de la colonne E, une ligne s'insère au-dessous.
Le code déprotège puis re-protège la feuille (sans mot de passe).
Pour une autre colonne, changez ColEnCours = "5" avec le numéro de colonne souhaité (1 = A , 2 = B, etc...)
Le Pingou
Messages postés
12041
Date d'inscription
mercredi 11 août 2004
Statut
Contributeur
Dernière intervention
22 avril 2024
1 426
28 mai 2016 à 19:19
28 mai 2016 à 19:19
Bonjour ButteDulac,
Voir Ici !
Voir Ici !
27 mai 2016 à 21:34
1. La ligne s'insère plutôt « au-dessus » et non en-dessous, ce qui est peu commode.
2. Les cellules de la nouvelle ligne sont verrouillées (celles qui ne l'étaient pas dans la ligne d'origine).
Un peu d'aide, svp...