Christian22
XLDnaute Junior
Bonjour à tous,
j'ai un problème de mémoire lorsque je supprime des colonnes dans une feuille excel avec le code suivant.
Chaque colonne supprimée comprend environ 1500 dates.
Auparant, j'utilisais la fonction Delete Shift:=xlToLeft mais cela consommait encore plus de mémoire.
(à titre d'infos, la mémoire utilisée augmente d'environ 1 000 000 Ko et parfois cela plante mon excel)
Avez vous une solution pour nettoyer la mémoire consommée?
Merci d'avance
j'ai un problème de mémoire lorsque je supprime des colonnes dans une feuille excel avec le code suivant.
Chaque colonne supprimée comprend environ 1500 dates.
Auparant, j'utilisais la fonction Delete Shift:=xlToLeft mais cela consommait encore plus de mémoire.
(à titre d'infos, la mémoire utilisée augmente d'environ 1 000 000 Ko et parfois cela plante mon excel)
Avez vous une solution pour nettoyer la mémoire consommée?
Merci d'avance
Code:
Public Sub DateInsertion()
Application.ScreenUpdating = False
Application.Calculation = xlManual
Sheets("T2").Select
For i = 0 To 39
Columns(141 - 2 * i).Select
Selection.EntireColumn.Delete
Next i
Columns("W:BJ").Select
Selection.EntireColumn.Delete
Application.ScreenUpdating = True
Application.Calculation = xlAutomatic
End Sub