Bonjour le forum
Je reviens vers vous par rapport à ma demande.
La macro suivante me permet de définir la hauteur de toutes les lignes de la feuille de calcul :
Option Explicit
Dim hauteur
Sub HauteurDeLigne()
hauteur = InputBox("Donner la hauteur de ligne souhaitée pour l'ensemble de la feuille.", "Hauteur des lignes", 30)
If hauteur <> "" And hauteur <> 0 Then
On Error Resume Next
Cells.RowHeight = hauteur
End If
End Sub
Comment ne pas redimensionner les lignes qui seraient supérieures à 30 ???? Dans le fichier joint, j'ai volontairement mis les lignes 7 à 12 à 50, ils ne faut pas qu'elles soient redimensionnées par la macro.
Merci pour votre aide précieuse, je ne suis pas un spécialiste VBA !