Bonjour
J'utilise la macro suivante pour "nettoyer" le contenu de mes cellules (qui contiennent plus de 255 caractères pour info, moins de 50 cellules à traiter):
J'obtiens lors de l'exécution de la macro un message mémoire insuffisante, si je clique sur débogage, la ligne spécifiée par le debuggeur est celle en gras.
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12 Sub Macro1() Sheets("N3").Select Dim lastline_N3 As Long lastline_N3 = Range("E9").End(xlDown).Row Range("E4:E" & lastline_N3).Select For Each Cellule In Range("E4:E" & lastline_N3) old_text_N3 = Cellule.Value new_text_N3 = Replace(old_text_N3, Chr(13), Chr(10)) Cellule.Value = new_text_N3 ' <-- ICI Next End Sub
Y aurait il un moyen de palier à ce problème ?
Je travaille sous Excel 2003 SP1 (pc du boulot)
D'avance merci.
@+
ted
Partager