Bonjour,

Lors de l'affectation d'un style à une cellule fusionnée, j'obtiens ce message d'erreur:
"erreur d’exécution 450
Nombre d'arguments incorrect ou affectation de propriété incorrecte"

Ce qui est étrange est que ce code fonctionne pour des cellules non fusionnées.

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
 
    For i = 12 To 18
 
        If Range("N8").Value = Range("E" + CStr(i)).Value Then
            ActiveSheet.Range("E" + CStr(i)).Style = "Flashing"
        End If
 
        If Not (Range("E" + CStr(i)).MergeArea.Rows.Count) = 1 Then
            i = i + Range("E" + CStr(i)).MergeArea.Rows.Count - 1
        End If
 
    Next i
la cellule que j'essaie de mettre en style flashing est fusionnée sur E15:E18


Merci de votre aide !