XL 2016 Vba - Coller texte vertical

[tomy]

Salut les Excelliens !

Dans ma macro, je prends un texte dans un tableau qui est vertical (alignement de police) et quand je le colle dans une nouvelle cellule, il garde ce formatage.
Savez vous comment remettre le texte à l'horizontal ?

Merci
Thom

 

[Arthur931]

hello,

Si tu as un doute, utilise l'enregistreur de Macro.
Tu enregistres, tu vas sur ta cellule où tu souhaites changer l'alignement -> clique droit -> Format de cellule -> Alignement -> et à droite tu mets Degré 0
Tu arrête l'enregistrement et normalement tu auras la macro souhaitée.

Bon courage

 

[Usine à gaz]

Bjr,
OU colle uniquement valeur 🙂

 

[Phil69970]

Bonjour tomy, Arthur, Usine à gaz, le forum

Comme dit plus haut par Arthur l'enregistreur de macro de donne la réponse en moins de 1 minute !

Range("A1").Copy    'Valeur à copier
Range("A15").PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks:=False, Transpose:=False     'Copie les valeurs dans la cellule A15

Cordialement