Vous utilisez un navigateur obsolète. Il se peut que ce site ou d'autres sites Web ne s'affichent pas correctement. Vous devez le mettre à jour ou utiliser un navigateur alternatif.
Boostez vos compétences Excel avec notre communauté !
Rejoignez Excel Downloads, le rendez-vous des passionnés où l'entraide fait la force.
Apprenez, échangez, progressez – et tout ça gratuitement !
👉 Inscrivez-vous maintenant !
Bonjour à tous,
Je suis un débutant et je ne sais pas régler les largeurs de lignes et hauteurs de colonnes pour obtenir une grille réellement carrée.
Quelqu'un pourrait-il me donner le secret?
Bonjour,
avec ce code, tu peux obtenir des cellules (presque) carrées :
Par exemple, pour une hauteur et une largeur de 20 mm (2 Cm)
Code:
Sub QuadrillageEnCm()
Cells.ColumnWidth = SetColumnWidth([COLOR="Red"]20[/COLOR])
Cells.RowHeight = Columns(1).Width
End Sub
Function SetColumnWidth(MM As Integer) As Double
Dim lr As Single
Application.ScreenUpdating = False
lr = Application.CentimetersToPoints(MM / 10)
While Columns(1).Width > lr
Columns(1).ColumnWidth = Columns(1).ColumnWidth - 0.1
Wend
While Columns(1).Width < lr
Columns(1).ColumnWidth = Columns(1).ColumnWidth + 0.1
Wend
SetColumnWidth = Columns(1).ColumnWidth
End Function
Tu ne pourras jamais avoir "une grille" parfaitement carrée
XL utilise le Point est 1 Point = 25.4/72 soit 0.352 mm.
Mais si c'est juste pour un aspect visuel et non pour faire un vrai papier millimétré, tu peux utiliser le classeur, inspiré de DiggerJack 🙂, que je mets en pièce jointe.
Efgé,
un moyen simple, sélectionner toute la feuille, ensuite cliquer entre deux colonnes( au hasard) et déplacer la souris.
une info-bulle t'indiqueras la largeur .
recommence la même chose avec les lignes
- Navigue sans publicité - Accède à Cléa, notre assistante IA experte Excel... et pas que... - Profite de fonctionnalités exclusives Ton soutien permet à Excel Downloads de rester 100% gratuit et de continuer à rassembler les passionnés d'Excel. Je deviens Supporter XLD