Microsoft 365 creation petit macro ordre croissant

[blancolie]

Bonsoir le Forum,

Dans ce fichier, j'aimerais avoir dans un module, une petite macro qui rangera mes plantes par ordre croissant quand il y aura un rajout d'une nouvelle plante ( nouvelle ligne)

la colonne à mettre en ordre croissant, c'est la colonne F et à partir de F27. Bien sur, j'espère que cela ne mélangera pas les données à côté.

Pouvez-vous me mettre le code dans votre message si au cas ou je n'arrive pas à ouvrir le fichier.

En vous remerciant d'avance.

Cordialement.

 

[soan]

j'ai modifié mon post précédent, alors relis-le.

non quoi ? tes réponses sont trop courtes,
et elles ne sont pas assez explicites !

 

[blancolie]

Bonjour,

la plante n existe pas. Elle n est pas rentré dans le tableau T_Datas. Mais logiquement c est peut être moi qui me trompe mais logiquement quand on copie , un trie se fait par ordre alphabétique. J ai l’eut être pas inséré le code ds ce fichier post18 : création de de devis. Si le code y Est pas, je vais l insérer et si j y arrive pas je reviens ds cette discussion

 

[soan]

J'ai trouvé ton erreur ; voici ton fichier corrigé.

soan

 

[blancolie]

bonsoir,

merci pour le fichier, j'ai cherché l'erreur mais en comparant les versions de fichier, je n'arrive pas à trouver ou était l'erreur . Elle était ou ?

dans cette ligne suivante : ig = Columns(2).Find(plante, , -4163, 1, 1).Row ;

-4163 veut dire quoi ?

merci

 

[blancolie]

Bonsoir,

une question d'ordre esthétique :

dans l'entête de mon tableau T_Datas onglet BDD_Fleurs, peut on enlever les flèches filtrage de chaque colonne sans que cela enlève le moyen de filtrer ?

 

[soan]

Bonsoir,

Réponse à ton post #34 :

Ton erreur était d'avoir oublié de mettre : Application.EnableEvents = 0
Je l'ai ajouté après : Application.ScreenUpdating = 0 ; comme ceci :

Application.ScreenUpdating = 0: Application.EnableEvents = 0

--------------------------------------------------------------------------------

Dans : lig = Columns(2).Find(plante, , -4163, 1, 1).Row :

-4163 est la constante numérique de xlValues

soan

 

[soan]

Réponse à ton post #35 :

Non, je ne connais pas de moyen de faire un filtrage sans que les flèches
de filtrage de la ligne d'en-têtes du tableau T_Datas soient visibles.

soan

 

[blancolie]

Bonsoir,

un autre problème, peut-être du à une limit. La plante gazania qui se trouve en bas du tableau mais hors du tableau et de plus, elle n'est pas trié.

C'est du a quoi ? faut essayer de ne pas mettre de limite car il risque d'avoir plus de 10000 plantes dans ma base de donnée.

Cordialement

 

[soan]

Bonsoir,

Fais ce petit test : sur une copie du fichier, sélectionne B3155:AA3155 ;
appuie sur la touche Suppression ➯ tu viens d'effacer la dernière ligne,
qui est hors tableau ; maintenant, sélectionne B3155 ; saisis "abc", par
exemple, et appuie sur Entrée ; question : est-ce que "abc" est hors
tableau, ou ça a ajouté une ligne à ton tableau structuré ?

Si c'est hors tableau, tu auras une ou deux options d'Excel à régler.

(quand j'ai fait ce test sur mon PC, ça a bien ajouté une ligne au tableau,
car mes options Excel pour faire ça sont ok ; mais je ne peux pas mettre
ces options dans le fichier, car c'est pas possible ; donc là-dessus, je peux
rien faire qui puisse te servir, car c'est toi qui doit ajuster correctement
tes options Excel)

soan

 

[blancolie]

bonsoir, je vais faire le test. cela m'est arrivé qu'une fois après tout est reparti à la normal.

Quels seront les réglages que je defrais faire ?

merci

 

[soan]

J'ai fait cet autre test sur mon PC : j'ai effacé B3155:AA3155 ;
puis tout en haut, j'ai cliqué sur le bouton Copier ; résultat :
c'est ok : ça a ajouté ta nouvelle plante gazania dans le
tableau, en ligne 1273 (➯ il n'y a pas de limite).

soan

 

[soan]

 

[soan]

 

[blancolie]

merci à toi

 

[soan]