Ceci est une page optimisée pour les mobiles. Cliquez sur ce texte pour afficher la vraie page.

Microsoft 365 Ajout item listview

  • Initiateur de la discussion Initiateur de la discussion merim
  • Date de début Date de début

Boostez vos compétences Excel avec notre communauté !

Rejoignez Excel Downloads, le rendez-vous des passionnés où l'entraide fait la force. Apprenez, échangez, progressez – et tout ça gratuitement ! 👉 Inscrivez-vous maintenant !

merim

XLDnaute Nouveau
Hello,

je souhaite que le item ajouté se mette en 1ere ligne dans la listview et non en derniere ligne.
Est ce que c'est possible?

Merci d'avance pour votre aide
 
Salut surchat,

je te remercie pour la réponse.
c'est presque tout à fait ca dont j'ai besoin.
En réalité j'ajoute des ligne via un formulaire avec le code suivant.


If MsgBox("Voulez vous valider cet enregistrement?", vbYesNo, "MS©2019") = vbYes Then

Lr = f.Range("K" & Rows.Count).End(xlUp).Row + 1

f.Range("B" & Lr).Value = Me.ComboBox2.Value
f.Range("C" & Lr).Value = Me.txtheure.Value
f.Range("D" & Lr).Value = Me.ComboBox13.Value
f.Range("E" & Lr).Value = Me.txtPlaques.Value
f.Range("F" & Lr).Value = Me.cobAupresde.Value
f.Range("G" & Lr).Value = Me.txtDescription.Value
f.Range("H" & Lr).Value = Me.txtRemarque.Value
f.Range("I" & Lr).Value = Me.txtContact.Value
f.Range("J" & Lr).Value = Me.cobConcérné.Value
f.Range("K" & Lr).Value = Me.cobStatut.Value
f.Range("L" & Lr).Value = Me.cobRealisepar.Value
f.Range("M" & Lr).Value = Me.TextBox7.Value
f.Range("N" & Lr).Value = Me.ComboBox10.Value


mais je souhaite qu'il rajoute une ligne comme avec ton exemple et pas qu'il rajoute une ligne à la fin
Tu as une idée de comment faire??

Merci d'avance
 
Salut Merim,
Malheureusement pas (au moment de l'ajout dans le formulaire)

Est-ce qu'un tri a posteriori ferait l'affaire? Celui-ci peut être systematiser par unevmacro
bonne journée
 
- Navigue sans publicité
- Accède à Cléa, notre assistante IA experte Excel... et pas que...
- Profite de fonctionnalités exclusives
Ton soutien permet à Excel Downloads de rester 100% gratuit et de continuer à rassembler les passionnés d'Excel.
Je deviens Supporter XLD

Discussions similaires

Réponses
5
Affichages
429
  • Question Question
Microsoft 365 Tableau
Réponses
5
Affichages
148
Réponses
4
Affichages
193
Réponses
38
Affichages
1 K
Réponses
3
Affichages
212
Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…