Bloquer les chiffres numériques

Bonjour à tous

j'ai fouiller dans le forum et ailleurs mais sans résultat

beaucoup veulent empêcher les lettres et moi c'est le contraire

Comment créer une vba interdisant les chiffres 1,2,3,4,5,6,7,8,9,0 dans une plage de cellules A10:F800

mettre que des lettres "abcdefghijklmnopqrstuvwxyz" le "." point , la "," virgule et le "-" tiret rien d'autre

et si possible mettre la 1er lettre en majuscule en colonne A10 à C800

Merci beaucoup pour vos réponses

jean62

Bonjour

Une macro à placer dans le code la feuille

Clic droit sur le nom de l'onglet --->Visualiser le code

Private Sub Worksheet_Change(ByVal Target As Range)

  If Not Intersect(Range("A10:F800"), Target) Is Nothing And Target.Count = 1 Then
    Application.EnableEvents = False
     If Target Like "*[-,.a-z]" Then
      Target = UCase(Left(Target, 1)) & Mid(Target, 2)          
    Else
      Target = ""
    End If
    Application.EnableEvents = True
  End If

End Sub

bonjour, je te remercie de ton aide mon problème est résolu

a +

Rechercher des sujets similaires à "bloquer chiffres numeriques"