bordures auto

sousou

XLDnaute Barbatruc

• 5 Août 2010

• #2

Re : bordures auto

Bonjour obamams

He oui! c'est possible

l'objet range.interior.border et sa collection "borders" de six bordures doivent pouvoir t'aider

 

Vote positif 0 Vote négatif

O

obamams

Guest

• 5 Août 2010

• #3

Re : bordures auto

Penses tu que je suis dans le bon chemin ?

Sub bordure()

workbook.Select
If Not ActiveCell = "" Then
Selection.Borders(xlEdgeTop).LineStyle = xlContinuous
Else
Selection.Borders(xlEdgeTop).LineStyle = xlNone
End If

End Sub

 

Vote positif 0 Vote négatif

sousou

XLDnaute Barbatruc

• 5 Août 2010

• #4

Re : bordures auto

re
Ca semble ok, il faut voir ce que tu veux faire exactement.

 

Vote positif 0 Vote négatif

O

obamams

Guest

• 5 Août 2010

• #5

Re : bordures auto

alors j'ai fichiers avec plusieurs onglets, et chaque mois je dois effectuer des refresh sauf que lors de ce refresh des bordures disparraissent donc pour eviter de refaire tout de maniere manuel je voudrais elaborer un code pour balayer tout les tableaux du fichier et de mettre automatiquement les bordures.

Aprés je ne sais pas s'y excel peut delimiter automatiquement les zones ou il y a des tableaux et les zones vides.

Par contre ma mcro semble fausse car ca indique "objet required"

 

Vote positif 0 Vote négatif

sousou

XLDnaute Barbatruc

• 5 Août 2010

• #6

Re : bordures auto

re
Si tu peux envoyer un fichier en exemple ca va gagner tu temps

 

Vote positif 0 Vote négatif