vba filtre automatique

[duplaly]

Bonjour
une dernière question. le filtre fonctionne très bien et je vous en remercie.
Une petite difficulté que j'ai est la suivante:
lorsque j'applique le filtre et je sélectionne la ligne recherchée pour la modifier, le programme me rajoute une nouvelle ligne.
Pouvez-vous le fixer pour moi.
Merci.

 

[Guest]

Re : vba filtre automatique

Bonjour,

Tu crées une variable en haut de module (ex: LigneEdite As Long) qui contiendra le numéro de la ligne éditée dans les textBox

Dans la procédure de chargement de la listview tu mets le numéro de ligne de la feuille excel
dans la paramètre Key de ton ListItem:

.ListItems.Add , Cstr(i) , Sheets("Données").Cells(i, 1)

Avant de charger tes textBox:

LigneEdite= Clng(.SelectedItem.Key)

Avant d'enregistrer tes TextBox dans les cellules

With Sheets("Données")
 If LigneEdit> 0 Then dll = LigneEdit Else dl1 = rng + 7

Et après enregistrement des textBox:

LigneEdite=0

P.S. j'ai pas bien regardé à quoi correspond 'dl1' et rng

A+

[Edit] tu aurais du faire remonter ton ancien fil plutôt que d'en ouvrir un autre

 

[duplaly]

Re : vba filtre automatique

Merci
Je ne suis bon en vba. Peux-tu insérer ces commandes dans le fichier joint pour moi.

 

[Guest]

Re : vba filtre automatique

Re,

Non

A+