Microsoft 365 Changer une formule en code vba

[Phil Du59]

Bonjour le forum
Je me rends compte que les enregistrements dans mon tableau sont de plus en plus long (plusieurs secondes) et je pense que c'est à cause de la formule de tri , dans la partie DXCCs j'ai une colonne Continents et en T le tri qui se fait par rapport au tableau DXCC Worked et quand je la supprime mes enregistrements sont plus rapide , donc est il possible de remplacer les formules par un code qui ferait la même chose . Pour mes enregistrements je passe par Open Log.
Merci de votre aide, Philippe .

 

[fanch55]

Pour le fun, j'ai :

• converti les données de la feuille Log en un TS ( tableau structuré ) de nom T_Log
• Mis des formules de type Excel dans les Cellules de la colonne T de la feuille DXCCs
• Modifié le Worksheet_Activate de la feuille DXCCs
• Modifié la sub btnAjout_Click de Userform1 pour prendre en compte la table
• Modifié la sub CommandButton1_Click( de la feuile Log pour prendre en compte la table

 

[Phil Du59]

Pour le fun, j'ai :

• converti les données de la feuille Log en un TS ( tableau structuré ) de nom T_Log
• Mis des formules de type Excel dans les Cellules de la colonne T de la feuille DXCCs
• Modifié le Worksheet_Activate de la feuille DXCCs
• Modifié la sub btnAjout_Click de Userform1 pour prendre en compte la table
• Modifié la sub CommandButton1_Click( de la feuile Log pour prendre en compte la table

Bonjour, merci mais beug chez moi au niveau Tablo.
' tri du dictionnaire et stockage dans un tableau
Tablo = WorksheetFunction.Sort(CDic.keys, 1, 1, True)

 

[fanch55]

Bonjour, merci mais beug chez moi au niveau Tablo.
' tri du dictionnaire et stockage dans un tableau
Tablo = WorksheetFunction.Sort(CDic.keys, 1, 1, True)

Vous utilisez bien Office 365 ?
Sinon quelle est votre version d'Excel ?

 

[Phil Du59]

Vous utilisez bien Office 365 ?
Sinon quelle est votre version d'Excel ?

Quand j'ouvre un fichier , il s'ouvre avec Office 2019

 

[fanch55]

Ok, le sort n'a été implémenté qu'à partir de office 2021 .
Classeur corrigé pour utiliser la sub traditionnelle de tri ...

 

[Phil Du59]

Ok, le sort n'a été implémenté qu'à partir de office 2021 .
Classeur corrigé pour utiliser la sub traditionnelle de tri ...

Merci ça fonctionne nickel, encore merci pour votre aide à tous.

 

[Phil Du59]

"xls" est l'extension utilisée kusqu'à XL2003.
Puis fut remplacé par "xlsx" et "xlsm"
Vous faites "Enregistrer sous " puis choississez l'extension xlsm. C'est un format plus concis et plus léger.
Pour votre fichier, on passe de 155ko à 77ko :

Regarde la pièce jointe 1229459


Regarde la pièce jointe 1229458

Bonjour Sylvanu , pour faire suite , je regardais pour enregistrer avec le xlsm à la fin que je n'ai pas , mais avec juste (prenant en compte les macros) je passe de 125ko à 70,7ko . merci .

 

[bsalv]

et si vous l'enregistrez en "xlsb" (fichier binair) ?
Maintenant l'UF se montre en 500 ms, beaucoup plus vite que l'original, mais cela vaut la peine de le faire dans le moitié du temps ?

 

[Phil Du59]

et si vous l'enregistrez en "xlsb" (fichier binair) ?
Maintenant l'UF se montre en 500 ms, beaucoup plus vite que l'original, mais cela vaut la peine de le faire dans le moitié du temps ?

Bonjour, c'est noté et maintenant il est en 60,1ko , merci .