Excel définir saisie en majuscules
Résolu/Fermé
Utilisateur anonyme
-
5 nov. 2007 à 15:24
eriiic Messages postés 24603 Date d'inscription mardi 11 septembre 2007 Statut Contributeur Dernière intervention 15 décembre 2024 - 9 nov. 2007 à 00:37
eriiic Messages postés 24603 Date d'inscription mardi 11 septembre 2007 Statut Contributeur Dernière intervention 15 décembre 2024 - 9 nov. 2007 à 00:37
A voir également:
- Excel cellule majuscule automatique
- Excel cellule couleur si condition texte - Guide
- Aller à la ligne dans une cellule excel - Guide
- Liste déroulante excel - Guide
- Verrouiller cellule excel - Guide
- Formule excel pour additionner plusieurs cellules - Guide
10 réponses
Bonjour,
Tu peux utiliser ce code par exemple pour la plage B2:D56 , dés l'activation de ta feuille tous ce qui est dans cette plage sera en majuscule
Private Sub Worksheet_Activate()
For Each maj In [b2:d56] 'plage a traitée
Application.ScreenUpdating = False
If maj <> "" Then
maj.Select
maj = UCase(maj)
ActiveCell = maj
End If
Next
Application.ScreenUpdating = True
Range("a1").Select
End Sub
Code a inserer en évémentiel sur la page en question
Tu peux utiliser ce code par exemple pour la plage B2:D56 , dés l'activation de ta feuille tous ce qui est dans cette plage sera en majuscule
Private Sub Worksheet_Activate()
For Each maj In [b2:d56] 'plage a traitée
Application.ScreenUpdating = False
If maj <> "" Then
maj.Select
maj = UCase(maj)
ActiveCell = maj
End If
Next
Application.ScreenUpdating = True
Range("a1").Select
End Sub
Code a inserer en évémentiel sur la page en question
5 nov. 2007 à 21:51
J'ai oublié d'indiquer dans ma demande que je ne connais pas le VBA. Désolée pour le dérangement mais je te remercie d'avoir répondu.
Bien cordialement.