hauteur de ligne par défault

[VB@D]

Bonjour tous le monde

Les lignes ont une hauteur par défault de 14.25

comment faire pour les mettres à 20 car j'utilise ajustement automatique dans une macro car j'ai des cellules multilignes

Merci de votre aide

@+

VB@D

 

[Vériland]

Bonsoir VB@D et toi le Forum,

Pour définir la hauteur de toutes les lignes à 20 :

Sub Hauteur()
With Feuil1.Cells
.RowHeight = 20
End With
End Sub

Pour définir la largeur de toutes les colonnes à 20 :

Sub Largeur()
With Feuil1.Cells
.ColumnWidth = 20
End With
End Sub

bonne programmation

PS : Macro à copier depuis le forum auquel cas tu risques d'avoir les attributs gras du post dedans...

 

[VB@D]

Merci