VBA Event .HorizontalAlignment: alignement en haut à gauche

Bonjour

Suite à une mise en page d' @eriic qui permet de faire une "grosse cellule" sans fusionner, et surtout, grace au Event pour copier une cellule avec des caractères spéciaux. La mise en forme peut encore etre mieux rendu grace aux "RichtextBox".

Etant une quich en prog, comment intégrer ceux-ci pour que la cellule affiche les events en haut à gauche?

La cellule en haut en l'état actuel. Obligation pour l'event de faire un "alignement.center"
La cellule du bas comme j'aimerai. Pas d'event ici.

Donc la cellule du haut avec l'event avec la mise en forme de la cellule du bas serait TOP.

Bonjour,

Vous n'aurez que l'alignement du texte en haut , à gauche ce n'est pas possible, il suffit d'ajouter la ligne suivante:

                .VerticalAlignment = xlTop

juste après celle-ci:

                .HorizontalAlignment = xlCenterAcrossSelection

Cdlt

Le verticalalignement fonctionne, merci @Arturo83
C'est bien dommage que l'alignement sur la gauche ne peut se faire