Bonjour, et merci de s'interesser à mon prob....
Pour ce qui est de la mémoire, j'avais déjà poussé à 30000(Sous Mac Os 9), mais pour les autres, sous Mac os X, je crois que c'est Mac Os qui gère la mémoire, donc comment ce fait il que cette macro pose problème sur trois Mac avec Mac os X alors qu'il n'y a aucun problème sur un PC!
Ci dessous, le code de la macro(qui fonctionne sur PC et qui a bien fonctionné pendant des mois sur Mac)
A+
Claudy
Sub zaza()
Dim zaza As Integer
If ActiveCell.Column <> 3 Or ActiveCell.Value = "" Then
MsgBox "!!!!!! Plouf!!!!!"
Exit Sub
End If
Range("A1") = 1
zaza = ActiveCell.Row
Range("A" & zaza, "L" & zaza).Select
Selection.Insert Shift:=xlDown
Range("D" & zaza, "L" & zaza) = Range("D" & zaza + 1, "L" & zaza + 1).Value
Range("D" & zaza + 1, "L" & zaza + 1).ClearContents
Range("G" & zaza + 1) = Range("J" & zaza)
Range("F" & zaza + 1) = Range("F" & zaza)
Range("K" & zaza + 1) = Range("K" & zaza)
Range("L" & zaza + 1) = Range("L" & zaza)
Range("J" & zaza).ClearContents
Range("J" & zaza + 1).FormulaR1C1 = "=RC[-3]+RC[-2]-RC[-1]"
Range("A" & zaza + 1, "L" & zaza + 1).Borders(xlEdgeTop).LineStyle = xlNone
Range("A" & zaza + 1, "L" & zaza + 1).Borders(xlEdgeBottom).LineStyle = xlDouble
Range("F" & zaza + 1).Select
Range("A1").ClearContents
End Sub