améliorer un tableau avec des macros : probleme principal lenteur

[Paddy]

Bonjour à tous,
J'ai conçu un tableau pour les remboursements kilométriques des salariés dans plusieurs établissements avec une macro qui copie/colle un modele de tableau, une macro qui cache les colonnes en fonction du mois choisi de remboursement, une macro pour un ajustement des colonnes choisies, et il y a des somme.si dans le tableau..
Mon problème avec ce fichier est que au bout de une a deux minutes, les insertions sont lentes, les calculs sont lents, l'enregistrement est lent, bref, ca rame.
Est ce que quelqu'un pourrait m'aider à alléger les macros, les formules pour que l'utilisation soit rapide.
Merci d'avance
Fichier joint

 

[James007]

Re : améliorer un tableau avec des macros : probleme principal lenteur

Bonjour,

Est-ce que tu fais référence uniquement à la macro NouveauSalarié ... qui est truffée de Select ...?

A +
🙂

 

[Paddy]

Re : améliorer un tableau avec des macros : probleme principal lenteur

Bonjour James,
Oui il y a notamment la macro "nouveau salarié", mais il y a ausi je pense l'ajustement automatique des colonnes qui jouent unrole sur la lenteur et peut etre aussi les "somme.si" de la ligne total non?
Je ne suis pas un pro en vba loin de là , remarque ca se voit dans mes macros...
Merci de ton aide
Paddy

 

[James007]

Re : améliorer un tableau avec des macros : probleme principal lenteur

Re,

Pour commencer un premier pas ... à tester

Option Explicit

Sub Nouveau_Salarie()
' Nouveau_Salarie Macro
Application.ScreenUpdating = False
Application.Calculation = xlCalculationManual

Worksheets("Bareme 2011").Range("modele_nouveau").Copy _
Destination:=Worksheets("KM Ets1").Range("A65536").End(xlUp).Offset(2, 0)

' Largeurs de colonnes
Columns("E:E").ColumnWidth = 9
Columns("F:F").ColumnWidth = 12
' Copie des Formats
Columns("E:F").Copy
Columns("G:AB").PasteSpecial Paste:=xlPasteFormats
' Largeurs de colonnes
Columns("AC:AD").ColumnWidth = 3
Columns("AE:AG").ColumnWidth = 14

Range("A10").Select
Application.Calculation = xlCalculationAutomatic
Application.ScreenUpdating = True

End Sub

A +
🙂

 

[James007]

Re : améliorer un tableau avec des macros : probleme principal lenteur

Re,

Voir fichier joint ...

J'espère que cela améliore bien ton usage du fichier ...

A +
🙂

 

[Paddy]

Re : améliorer un tableau avec des macros : probleme principal lenteur

C'est exactement ce que je voulai.Merci beaucoup James.
J'adore quand les pros de macro sont aussi réactif.
Merci encore
Paddy

 

[Paddy]

Re : améliorer un tableau avec des macros : probleme principal lenteur

James, J'ai crié "victoire" trop vite
Dans le fichier que tu m'a envoyé, les colonnes ne se masquent plus en fonction du mois selectionné. De plus, la macro fonctionne sur la feuille "Km Ets1" mais pas sur les autres...Peux tu me réparer cela?
Merci d'avance
Paddu

 

[Paddy]

Re : améliorer un tableau avec des macros : probleme principal lenteur

Bonjour a tous,
Est ce que James ou qq'un d'autre peut résoudre mon problème?
Merci
Paddy

 

[James007]

Re : améliorer un tableau avec des macros : probleme principal lenteur

Désolé ... je ne comprends ton commentaire 😕

Si tu reprends le fichier posté ... tout fonctionne normalement ...

A +
🙂

 

[James007]

Re : améliorer un tableau avec des macros : probleme principal lenteur

Re,

Pour bien tester le fichier et les macros, choisis le mois de Février dans tous tes onglets ...

Dis moi si tout fonctionne de ton côté ...

A +
🙂

 

[Paddy]

Re : améliorer un tableau avec des macros : probleme principal lenteur

Re James,
En fait je viens de comprendre le problème.
Pour réduire le processus, tu as dans chaque feuille fait un
Private Sub CommandButton1_Click()
Nouveau_Salarie
End Sub
Ce qui est sympa car cela évite de recopier une macro longue, mais le souci est que dans cette macro copie le modèle et le colle sur "Km Ets 1), vu que cette macro est identique pour les autres feuilles, quand on click sur "nouveau salarié" dans les autres feuilles, la macro insére les lignes dans la feuille "Km Ets1". IL faudrait que la macro insère dans la feuille concernée les lignes "modele_nouveau"..
Ouh la même moi je ne me comprends pas...sourire.
En bref la macro copie les lignes "modele nouveau" que sur la feuile "Km Ets1" et pas sur la feuille ou l'on a cliqué "nouveau salarié".
Désolé James de ne pas être très clair
Merci pour ton aide
Paddy

 

[James007]

Re : améliorer un tableau avec des macros : probleme principal lenteur

Salut Paddy,

Voilà qui éclaircit la question ...

Je reprends ton classeur et tes macros ... après le déj ...

Bon App

A +
🙂

 

[James007]

Re : améliorer un tableau avec des macros : probleme principal lenteur

Re,

Tout compte fait, un classeur test .... avant le déj ...

A +
🙂

 

[James007]

Re : améliorer un tableau avec des macros : probleme principal lenteur

Re,

Une fois que tu auras réalisé tous tes tests, dis moi simplement si de ton côté, tout fonctionne correctement ... ou si tu trouves encore des modifs à faire ...

A +
🙂

 

[Paddy]

Re : améliorer un tableau avec des macros : probleme principal lenteur

Re James,
Excuse mon retour tardif, j'ai du m'absenter l'après midi..
J'ai regardé le fichier et c'est quasi ce que je souhaite.
J'ai juste une demande de modif concernant les colonnes cachées, car lorsque je clic sur le bouton "nouveau salarié", cela me rajoute bien un nouveau modele mais ca reaffiche les colonnes, je reclic sur le choix du mois, ca marche et dès que je rajoute un nouveau salarié les colonnes qui étaient masquées s'affichent..
Pourrez-tu faire en sorte qu'elles restent cachées lors d'un nouveau salarié?
Merci encore pour ton aide, c'est très sympa.
Paddy