Macro pour incliner des cellules

Résolu
Bonjour à tous,
Voici mon problème, j'ai une macro qui récupère le contenu de cellule d'une feuille pour les remettre sur une seconde feuille, j'aimerai savoir s'il existe une fonction à taper ou déjà défini pour incliner les cellules de la 2e feuille à 45°

Merci d'avance.

2 réponses

  1. Bonjour,

    macro faite avec l'enregistreur de macro

    Sub Macro1()
    '
    ' Macro1 Macro
    '

    '
    Range("E5").Select
    With Selection
    .HorizontalAlignment = xlGeneral
    .VerticalAlignment = xlBottom
    .WrapText = False
    .Orientation = 45
    .AddIndent = False
    .IndentLevel = 0
    .ShrinkToFit = False
    .ReadingOrder = xlContext
    .MergeCells = False
    End With
    End Sub
    0
    1. Merci beaucoup,
      je l'avais déjà fais mais en vain et là j'ai réessayé et ça marche,
      Encore merci
      0
      1. Merci de marquer comme résolu ;-)
        0