Macro pour incliner des cellules

Résolu
lecanu.jordan Messages postés 51 Statut Membre -  
sipherion Messages postés 1836 Date d'inscription   Statut Membre Dernière intervention   -
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. f894009 Messages postés 17417 Date d'inscription   Statut Membre Dernière intervention   1 717
     
    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
  2. lecanu.jordan Messages postés 51 Statut Membre
     
    Merci beaucoup,
    je l'avais déjà fais mais en vain et là j'ai réessayé et ça marche,
    Encore merci
    0
    1. sipherion Messages postés 1836 Date d'inscription   Statut Membre Dernière intervention   287
       
      Merci de marquer comme résolu ;-)
      0