Autres Justifier un texte dans des cellules Fusionner

[chaelie2015]

Bonjour Form
je souhaite avoir un code VBA pour Justifier un texte dans des cellules fusionnées est t il possible ?
Merci par avance

 

[piga25]

Bonjour,

L'enregistreur de macro donne ceci

With Selection
        .HorizontalAlignment = xlJustify
        .VerticalAlignment = xlCenter
End With

 

[chaelie2015]

Bonjour Piga 25
Désolé je n'ai pas bien saisi votre réponse
ci rattaché fichier exemple (des cellules grises)
Merci

 

[piga25]

Bonjour,

ci rattaché fichier exemple (des cellules grises)

Il est ou le fichier

 

[chaelie2015]

Bonjour
Sorry ci joint le fichier

 

[chaelie2015]

Bonjour
Sorry ci joint le fichier

 

[piga25]

Bonjour,

fait avec l"enregistreur de macro

 

[piga25]

Re
Autrement un code plus court

Sub just()
Range("C5,C8,B11").HorizontalAlignment = xlJustify
End Sub

 

[chaelie2015]

Re
Merci piga25
mon souci est résolu
a+