comment je peux encadrer un table a la fin de chaque liste automatiquement

[ExcelDZ]

bonjour
j'ai un tableaux qui Il contient des différentes listes
Il y a une liste de dix colonnes par exemple et d'autres plus.. je veux encadrer le tableaux a la fin de chaque liste automatiquement

 

[gosselien]

Re : comment je peux encadrer un table a la fin de chaque liste automatiquement

Bonjour,

je n'ai pas la réponse, mais comment fais-tu si tu dois trier un jour sur la colonne D ?

P.
edit:

fait rapidement avec l'enregistreur de macro

Sub Macro1()
    Range("A1:A2").Select
    Selection.CurrentRegion.Select
    Selection.Borders(xlDiagonalDown).LineStyle = xlNone
    Selection.Borders(xlDiagonalUp).LineStyle = xlNone
    With Selection.Borders(xlEdgeLeft)
        .LineStyle = xlContinuous
        .Weight = xlThin
    End With
    With Selection.Borders(xlEdgeTop)
        .LineStyle = xlContinuous
        .Weight = xlThin
    End With
    With Selection.Borders(xlEdgeBottom)
        .LineStyle = xlContinuous
        .Weight = xlThin
    End With
    With Selection.Borders(xlEdgeRight)
        .LineStyle = xlContinuous
        .Weight = xlThin
    End With
    With Selection.Borders(xlInsideVertical)
        .LineStyle = xlContinuous
        .Weight = xlThin
    End With
    With Selection.Borders(xlInsideHorizontal)
        .LineStyle = xlContinuous
        .Weight = xlThin
    End With
End Sub

 

[Dugenou]

Re : comment je peux encadrer un table a la fin de chaque liste automatiquement

Bonjour,
Comment définis-tu une table : comment on sait ou créer le cadre : peux tu faire un encadré à la main pour qu'on comprenne ?
Cordialement

 

[ExcelDZ]

Re : comment je peux encadrer un table a la fin de chaque liste automatiquement

Bonjour
désolé pour cette erreur
et merci pour votre aide
seulement je ne sais pas comment créer des macros
ou le modifier