Forcer des cellules à s'écrire en minuscule

Bonjour je voudrai savoir comment de range("h3:h8") je pourrais forcer les cellules à être écrite en minuscule automatiquement

cordialement

Salut Naubin1

Une idée, il faut utiliser LCase()

Sub Minuscule()
  Dim Rng As Range
  For Each Rng In Range("H3:H8")
    Rng.Value = LCase(Rng.Value)
  Next Rng
End Sub

A+

Bonjour

Salut Bruno

On peut aussi le faire par Validation

=EXACT(H3;MINUSCULE(H3))

à appliquer sur la plage H3 à H...

merci