Incrémentation de lignes sous cellule avec liste de choix

Vieupot

XLDnaute Occasionnel
Bonjour
Je ne connais pas le VBA et cherche un code qui pourrait faire comme demandé dans l'exemple ci joint
Merci par avance
 

Pièces jointes

  • macro ou code 001.xlsm
    13.8 KB · Affichages: 51

Calvus

XLDnaute Barbatruc
Bonsoir Vieupot, le forum,

Voici pour la 1ère partie de ton code, afin de copier les lignes.
VB:
Sub AjoutLigne()
Range("B" & Rows.Count).End(xlUp).CurrentRegion.Rows(1).Offset(1, 0).Copy Destination:=Range("B" & Rows.Count).End(xlUp).Rows(2)
Range("B" & Rows.Count).End(xlUp).CurrentRegion.Rows(2).Offset(1, 0).ClearContents
End Sub
Pour la suite, j'essaierai de regarder ce soir.

A+
 

libellule85

XLDnaute Accro
Bonsoir tous,
cathodique a raison, il faudrait que tu modifies ton titre pour que les excelliens connaissent ton problème
Je viens de regarder vite fait, déjà il faut que tu étendes ta liste de validation en sélectionnant B13, B14 et B15.
En C13 à C15 et en D13 à D15 utiliser RECHERCHEV
 
Dernière édition:

Discussions similaires

Statistiques des forums

Discussions
312 875
Messages
2 093 143
Membres
105 638
dernier inscrit
cordier