execution macro

[Pyrof]

Bonjour, ( à tout ceux qui sont encore au travail)


Je soupçonne un problème de mémoire.

Dans une application, je dois construire une feuille suivant certaines données. Puis je dois dupliquer cette feuille dans le même classeur.

J'ai donc fait 2 macros, une pour créer la feuille et une seconde pour dupliquer cette feuille.

Je voudrais pouvoir enchaîner ces deux macros, et là, Excel bloque à la copie.

extrait de la macro de copie

For Each langue In Range('liste_langues')
    If langue.Offset(0, 1) = 1 Then
        
        status_bar 'Creation feuille ' & langue
        x = Worksheets.Count
        [b]Sheets('Base_langue').Copy after:=Worksheets.Item(x)[/b]
        x = ActiveSheet.Name
        Sheets(x).Cells(5, 1) = langue
        Worksheets(x).Name = langue
    End If
Next

Si j'exécute la première macro, que j'enregistre, que je ferme le fichier et que je l'ouvre à nouveau pour exécuter la seconde macro, tout se passe bien.

Quelqu'un connaîtrait-il un moyen de libérer la mémoire.

Je suis désolé je ne peux joindre le fichier, il fait 12 mégas sans les données, et il ne peut être diffusé malgré toute la confiance que j'ai sur ce super site.