Bordure
Résolu
Bonjour à tous,
J'ai un problème avec le quadrillage de mon tableau, je fais un quadrillage complet de mon tableau qui part de 17, 1 et qui fini à 17, 37, j'ai ecrit le code suivant , mais le quadrillage déborde en dehors de ma mise en page sur 5 colonnes.
Il y a t'il une erreur de code ?
' With Range(Cells(17, 1), Cells(17, 36))
With Range(Cells(17, 1), Cells(totalRows, totalCols))
.Borders.LineStyle = xlContinuous
.Borders.Color = vbBlack
.Borders.Weight = xlThin
'.Interior.ColorIndex = xlNone
End With
Merci pour voter Aide.
Pascal
J'ai un problème avec le quadrillage de mon tableau, je fais un quadrillage complet de mon tableau qui part de 17, 1 et qui fini à 17, 37, j'ai ecrit le code suivant , mais le quadrillage déborde en dehors de ma mise en page sur 5 colonnes.
Il y a t'il une erreur de code ?
' With Range(Cells(17, 1), Cells(17, 36))
With Range(Cells(17, 1), Cells(totalRows, totalCols))
.Borders.LineStyle = xlContinuous
.Borders.Color = vbBlack
.Borders.Weight = xlThin
'.Interior.ColorIndex = xlNone
End With
Merci pour voter Aide.
Pascal
2 réponses
-
Bonjour Michel_m
Bon j'ai fini par trouver le code, mais bonce n'est pas évident pour un novice.
Merci.
Bonne journée.
Pascal -
ContributeurBonjour
totalRows, totalCols : ques aco ?
sinon au passage
.Borders.LineStyle = xlContinuous
.Borders.Color = vbBlack
les 2 paramètres vbBlack et xlcotinuos sont des valaurs pas défaut donc inutiles de les préciser
Michel
