Liste dynamique instable

apt · 27 Novembre 2011

Bonjour à tous,

J'aimerais bien trouvé une solution à ce qui suit :

- Pourquoi la liste extraite P5 😛100 ne contiendra qu’une seule ligne après l’événement WorkSheet_Change ?

- Pourquoi en saisissant en B24 "11-11" ça devient une date et il est écrit : T11/11/2011 et non pas T11-11 comme attendu ?

Merci d'avance.

Dranreb · 27 Novembre 2011

Re : Liste dynamique instable

Bonsoir

- Pourquoi la liste extraite P5 😛100 ne contiendra qu’une seule ligne après l’événement WorkSheet_Change ?

Sais pas. Mais déjà vu le problème. Il semblerait qu'il garde trace quelque part d'une ancienne plage de critères spécifiée. Le problème est levé en ajoutant parmi les paramètres du AdvancedFilter: CriteriaRange:=Empty

- Pourquoi en saisissant en B24 "11-11" ça devient une date et il est écrit : T11/11/2011 et non pas T11-11 comme attendu ?

Parce que la cellule n'est pas équipée d'un format Texte qui empêcherait cette interprétation possible en tant que date.
À +

Gorfael · 27 Novembre 2011

Re : Liste dynamique instable

Salut apt et le forum

- Pourquoi la liste extraite P5 😛100 ne contiendra qu’une seule ligne après l’événement WorkSheet_Change ?

Étant feignant de nature, pas envie de cherche où est la liste considérée. Je dirais que c'est parce qu'il n'y a qu'une ligne de visible...

- Pourquoi en saisissant en B24 "11-11" ça devient une date et il est écrit : T11/11/2011 et non pas T11-11 comme attendu ?

Rappel :excel fait toujours ce que tu lui demandes et quelques (rares) fois ce que tu veux !
La colonne B est en format standard, avec un préfixe au nombre => donc, il fait comme d'habitude en reconnaissant un "nombre" qui peut représenter une date => si tu mets un format texte sur la colonne B, ça devrait être plus conforme.

Pour ton code : ça ne sert à rien de le donner sans explication. Si on ne sait pas ce qu'il est sensé faire, s'il ne donne pas une erreur, on ne pourra pas savoir ce qui ne va pas (à par une erreur flagrante).
Un exemple de code de remplissage totalement inutile :

Code:

.....
Else
Application.ScreenUpdating = True
Application.EnableEvents = True
Exit Sub
End If
Application.ScreenUpdating = True
Application.EnableEvents = True
End Sub

Si on supprime la partie else, le fonctionnement restera totalement identique, sans les quatre lignes

Code:

.....

End If
Application.ScreenUpdating = True
Application.EnableEvents = True
End Sub

A+

apt · 27 Novembre 2011

Re : Liste dynamique instable

Bonsoir Dranreb,

Mais avant de saisir la valeur 11-11, le format de la cellule était Standard

C'est après, que le format de la cellule change en format personnalisée "jj-mmm".

Comment faire pour éviter ce changement de format ?

Merci.

apt · 27 Novembre 2011

Re : Liste dynamique instable

Salut Gorfael,

Je crois posté en même temps que toi 🙂

Je dirais que c'est parce qu'il n'y a qu'une ligne de visible...

Je m'excuse, mais je n'ai pas bien compris !

ça ne sert à rien de le donner sans explication. Si on ne sait pas ce qu'il est sensé faire, s'il ne donne pas une erreur, on ne pourra pas savoir ce qui ne va pas

C'est une petite application qui sert comme base de données à une liste de numéros de téléphone de plus de 4000 abonnés avec références et informations de chaque numéro d'appel coté équipements.

Un exemple de code de remplissage totalement inutile :

Merci de ta correction de code.

Mais le ELSE sert à traiter le cas ou l'utilisateur n'intervient pas dans les colonnes de 1 à 7 (De A à G).

Alors il n'y a pas d'événement WokSheetChange (Exit Sub).

Merci de me citer d'autres erreurs dans l'application.

😀

Dranreb · 28 Novembre 2011

Re : Liste dynamique instable

Bonjour.

Comment faire pour éviter ce changement de format ?

Mettre le format Texte à toute la colonne.
À +

apt · 28 Novembre 2011

Re : Liste dynamique instable

Salut Danreb,

Dranreb à dit:
Bonjour.Mettre le format Texte à toute la colonne.
À +

Comme la colonne B ne commence pas depuis la premiere cellule, pourras-je ecrire cela :

Code:

Range("B6:B4000").Select
Selection.NumberFormat = "@"

ou :

Code:

Target.NumberFormat = "@"

Merci.

Dranreb · 28 Novembre 2011

Re : Liste dynamique instable

Bonsoir
Pour la 2ième ça me semble trop tard, Target étant probablement la cellule qui a déjà été saisie
Pour la première oui c'est à peu près bon mais : Range("B6:B65536").NumberFormat = "@"
pourquoi voudriez vous l'exécuter 36000 fois ? Mettez le une bonne fois pour toutes à la main et ça restera !
À +

apt · 29 Novembre 2011

Re : Liste dynamique instable

Bonsjour Dranreb,

D'accord, je vais le faire à la main 🙂

Liste dynamique instable

apt

XLDnaute Impliqué

Pièces jointes

Dranreb

XLDnaute Barbatruc

Gorfael

XLDnaute Barbatruc

apt

XLDnaute Impliqué

apt

XLDnaute Impliqué

Dranreb

XLDnaute Barbatruc

apt

XLDnaute Impliqué

Dranreb

XLDnaute Barbatruc

apt

XLDnaute Impliqué

Discussions similaires

Liste dynamique instable

XLDnaute Impliqué

Pièces jointes

XLDnaute Barbatruc

XLDnaute Barbatruc

XLDnaute Impliqué

XLDnaute Impliqué

XLDnaute Barbatruc

XLDnaute Impliqué

XLDnaute Barbatruc

XLDnaute Impliqué

Discussions similaires

Privacy & Transparency

Privacy & Transparency