XL 2016 Simplifier un code enregistrer

[fenec]

bonjour le forum,
Voulant fusionner des cellules en VBA j'ai utiliser l'enregistreur

 

[sylvanu]

Bonjour Fenec,
Et alors ?
vous avez rencontré un problème ?

' Pour Fusionner'
Sub Fusion()
    Range("E3:F10").Merge
End Sub

' Pour Défusionner'
Sub Défusion()
    Range("E3:F10").UnMerge
End Sub