bjr à tous
j'ai developpé un macro dont le syntaxe est:
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
Private Sub Workbook_SheetChange(ByVal Sh As Object, ByVal Target As Range)
If IsNumeric(Sh.Name) Then
If Target.Value <> "" Then
If Target = Range("e14") Then
.
.
.
.
.
end if
end if
end if
end sub
le problème se pose lors ce que je supprime le contenu de la cellule "E14" qui est fusionnée E14;G14
par contre le problème ne se pose pas lors ce que je supprime le contenu d'une cellule non fusionnée
le message d'erreur sur la ligne
Code : Sélectionner tout - Visualiser dans une fenêtre à part
If Target.Value <> "" Then
j'espere que mon problème soit clair
merci de votre aide