XL 2016 Supprimer Item dans Listbox

Scorpio

XLDnaute Impliqué
Bonjour à tous,
J'ai ce petit soucis dans ce classeur, de supprimer le premier Item (DC) de la liste se trouvant dans la Listbox du USF, mais je n'arrive pas.
Est-ce je pourrais s'il vous plaît vous demander un petit coup de pouce.
Merci beaucoup et A+++++
 

Pièces jointes

  • AjouterSupprimerItemV1.xlsm
    26 KB · Affichages: 21

Jacky67

XLDnaute Barbatruc
Bonjour à tous,
J'ai ce petit soucis dans ce classeur, de supprimer le premier Item (DC) de la liste se trouvant dans la Listbox du USF, mais je n'arrive pas.
Est-ce je pourrais s'il vous plaît vous demander un petit coup de pouce.
Merci beaucoup et A+++++

Bonjour,
Afficher la feuille 'collabo' par clic droit sur un nom d'onglet==>afficher
Supprimer la ligne 2
Masquer la feuille 'collabo' (facultatif)

*For i = 3 To fc.Range("A" & Rows.Count).End(xlUp).Row
C'est cette ligne de code qui empêche la suppression de l'item 1
Modifier par
For i=2 To.........

**Hello Pierrejean
***Quelques modif. en PJ
 

Pièces jointes

  • AjouterSupprimerItemV1.xlsm
    29.7 KB · Affichages: 29
Dernière édition:

pierrejean

XLDnaute Barbatruc
Bonjour Scorpio
Salut Jacky
une autre facon de proceder
ListBox1.List = fc.Range("A3:A" & fc.Range("A" & Rows.Count).End(xlUp).Row).Value
au lieu de
ListBox1.List = fc.Range("A2:A" & fc.Range("A" & Rows.Count).End(xlUp).Row).Value

Ne modifie pas la feuille collabo (Oh le vilain mot !!!!)
 

Pièces jointes

  • AjouterSupprimerItemV1.xlsm
    23.7 KB · Affichages: 32

Statistiques des forums

Discussions
312 163
Messages
2 085 860
Membres
103 006
dernier inscrit
blkevin