ListView et feuille protégée.

[Hulk]

Hello Forum 🙂

Questions :

Apparemment une ListView n'affiche plus rien si la feuille est protégée ?

Possible de contourner ce problème ?

Merci pour vos réponses !

 

[fhoest]

Re : ListView et feuille protégée.

bonjour,
oui ,je pense qu'il faut désactiver la protection et la remettre après le remplissage de la listview
sheets("aaa").unprotect(password)
sheets("aaa").protect(password,etc...)
A+

 

[Hulk]

Re : ListView et feuille protégée.

Hello,

Merci pour ta réponse Fhoest.

Ben non, même comme ça, plus rien ne s'affiche dans la ListView ??

Dès que la feuille protégée plus d'infos dans la ListView !

 

[YANN-56]

Re : ListView et feuille protégée.

Bonsoir Hulk,fhoest, et à ceux qui passeront par là.
(In aparte: il y a des pseudo pas bouffables quant à s'en souvenir!!!)

Hullk, je n'ai jamais eu de soucis de ce genre,
car je n'ai jamais tenté de copier des données dans une feuille protégée.
Je pense que lorsque tu ouvres un classeur tu actives une feuille...

Feuille ("MACHIN").Activate
C'est à ce moment là qu'il faut inhiber sa protection.
(Comme le dit "... est" mais pas après)
A voir...

Yann

 

[Fo_rum]

Re : ListView et feuille protégée.

Salut

Hello Forum 🙂
Apparemment une ListView n'affiche plus rien si la feuille est protégée ?

😕 (ce n'est pas le cas avec un de mes classeurs).
Pourrais-tu nous joindre un bout de ton fichier ?

 

[Hulk]

Re : ListView et feuille protégée.

Hello Forum,

Désolé pas pu répondre avant et merci pour vos réponses !

Ben voici un fichier pour vous démontrer que problème dès que protection de la feuille... Peut-être une erreur dans le code ?

Mais en mettant la protection et déprotection dans l'Initialize de l'Usf, tout joue.

Si une autre solution, je suis curieux de voir 😎

D'ores et déjà bon week à tous 😀

 

[Fo_rum]

Re : ListView et feuille protégée.

Re

il semble que cela vienne du CurrentRegion

remplace :

With Worksheets("Feuil1")
        tablo = .Range("A1").CurrentRegion
End With

par

tablo = Range("A1:C" & [A65000].End(xlUp).Row)

et dis nous.

 

[Hulk]

Re : ListView et feuille protégée.

Re,

Excellent Fo_rum c'était bien ça.

Un grand merci !