Salut Alex,
Je n'avais pas du tout capté que tu étais sous Mac.
C'est peut-être le CommandButton qui n'est pas compatible... Je ne connais pas les incompatibilités! Déso!
J'imagine que la syntaxe est la même! Essaie de coller toi-même le code suivant dans 'Worksheet_SelectionChange' ?!?
Aucune autre idée pour t'aider!
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
'
If Target.Address = [F12].Address Then
'
Application.ScreenUpdating = False
'
iRow = Range("C" & Rows.Count).End(xlUp).Row
iIdx = 1
For x = 13 To iRow
If x Mod 8 <> 4 Then iIdx = iIdx + 1
Range("F" & x).FormulaLocal = IIf(x Mod 8 <> 4, _
"=SIERREUR(Correspondance!O" & iIdx & "*2+Correspondance!P" & iIdx & "*2,5+Correspondance!Q" & iIdx & "*3+Correspondance!R" & iIdx & "*3,5+Correspondance!S" & iIdx & "*4,5+Correspondance!T" & iIdx & "*7+Correspondance!U" & iIdx & "*11;"""")", _
"=SOMME(F" & x - 7 & ":F" & x - 1 & ")")
Next
'
Application.ScreenUpdating = True
'
End If
'
End Sub
Bon courage!
Si je trouve autre chose, je t'appelle mais tiens-moi au courant!
A+