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 .

 

[gbinforme]

bonjour,

est il possible de remplacer les formules par un code qui ferait la même chose

La colonne Continents est déjà calculée par un code VBA : que veux-tu faire de plus ?

 

[Phil Du59]

bonjour,

La colonne Continents est déjà calculée par un code VBA : que veux-tu faire de plus ?

Bonjour, je me suis peut être mal exprimé, actuellement la formule de calcule en T2 est : =compte($H$2:$Q$31;A$2:A$100) et ainsi de suite jusque T7 et je voudrais remplacer cette formule par un code dans le USF pour faciliter le tri et rendre l'enregistrement plus rapide .

 

[fanch55]

Salut,
Le classeur fourni fonctionne rapidement chez moi . Pas de latence notable.
Dans le worksheet_activate de la feuille DXCCs, on pourrait rajouter :
Application.Calculation = xlCalculationManual en début et
Application.Calculation = xlCalculationAutomatic en fin .

Ceci dit, qu'est-ce qui vous a empêchée de convertir les données de la feuille LOG en table structurée ?

 

[Phil Du59]

Salut,
Le classeur fourni fonctionne rapidement chez moi . Pas de latence notable.
Dans le worksheet_activate de la feuille DXCCs, on pourrait rajouter :
Application.Calculation = xlCalculationManual en début et
Application.Calculation = xlCalculationAutomatic en fin .

Ceci dit, qu'est-ce qui vous a empêchée de convertir les données de la feuille LOG en table structurée ?

Bonjour
Mes compétences sont très limitées mise à part quelques formules basiques , le tableau a été créé par moi mais toutes les formules appliquées ont été créer par les membres du forum au fur et à mesure de mes demandes .
Sur mes 2 PC l'enregistrement depuis OPEN LOG prend + de 5s chez moi .

 

[fanch55]

Bonjour
Mes compétences sont très limitées mise à part quelques formules basiques , le tableau a été créé par moi mais toutes les formules appliquées ont été créer par les membres du forum au fur et à mesure de mes demandes .
Sur mes 2 PC l'enregistrement depuis OPEN LOG prend + de 5s chez moi .

Même avec le calculation en manuel ?
L'enregistrement, c'est bien avec le "ADD QSO" ?

 

[Phil Du59]

Même avec le calculation en manuel ?
L'enregistrement, c'est bien avec le "ADD QSO" ?

Dans OPEN LOG j'écris dans QRZ (ex 123XX456) entrée puis dans RST (ex 55) et double entée pour enregistrer et je pense que comme je lui demande de trier les numéros de DXCC Worked par continents c'est là que la formule prend du temps à chercher si le pays a déjà été fait et par conséquent il cherche aussi dans Continents avant de l'ajouter ou pas si déjà dedans .

 

[sylvanu]

Bonjour Phil, Gbinform, Fanch,
En PJ j'ai optimisé la macro Worksheet_Activate de la feuille DXCCs, ( ainsi que la fonction "compte" pour le fun )
Sur mon PC (XL2007) le calcul de la feuille DXCCs passe de 2.28s à 0.093s , du à l'utilisation d'un second array pour les calculs intermédiaires.
A tester sur votre version XL.
( Question : Pourquoi utiliser un fichier xls avec 365, une version xlsm serait plus appropriée )

 

[sylvanu]

Mais encore ?

 

[Phil Du59]

Bonjour Sylvanu, ça fonctionne nickel , l'enregistrement est rapide comme je le voulais , Merci beaucoup .
Pour ma version Excel , quand j'ouvre un fichier il s'ouvre en office 2019 , vous m'avez déjà dis pour le xlsm mais comme je ne suis pas un pro je n'ai pas été plus loin dans la recherche .

 

[Phil Du59]

Mais encore ?

mauvaise manip, désolé

 

[sylvanu]

vous m'avez déjà dis pour le xlsm mais comme je ne suis pas un pro je n'ai pas été plus loin dans la recherche .

"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 :

 

[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

J'ai bien : Classeur Excel (prenant en charge les macros) mais pas .xlsm , mon classeur est en 97 - 2003

 

[sylvanu]

Si vous ouvrez votre fichier sur une version XL récente, vous devriez avoir cette extension.
Par ex mon XL est en 2007, si j'ouvre votre fichier xls et enregistrer sous, j'ai bien ces extensions comme indiqué au dernier post.

 

[Phil Du59]

Si vous ouvrez votre fichier sur une version XL récente, vous devriez avoir cette extension.
Par ex mon XL est en 2007, si j'ouvre votre fichier xls et enregistrer sous, j'ai bien ces extensions comme indiqué au dernier post.

Ok je vais regarder ça de plus près, encore merci pour mon tableau et la manip pour le xlsm.