je voudrais ajouter un N/A lors de l'ajout de lignes, dans les colonnes D, F, G, H, J et O.
Ces colonnes contiennent des listes déroulantes. Pour éviter un bug vous devez ajouter la valeur "N/A" dans chacune des listes. Dans votre fichier posté seule la colonne D contient cette valeur.
Ensuite, la fin du code "Ajouteruneligne" juste avant la ligne Set manouvelleligne... vous avez un END WITH.
Pour la colonne D, mettez cette ligne de code juste avant le END WITH
.Range(1, 4) = "N/A" 'colonne D
Pour la colonne F, ajoutez la même ligne et remplacez le 4 par 6
Ainsi de suite pour les autres colonnes