Majuscule +nompropre meme feuille
Résolu
surplus
Messages postés
673
Date d'inscription
Statut
Membre
Dernière intervention
-
surplus Messages postés 673 Date d'inscription Statut Membre Dernière intervention -
surplus Messages postés 673 Date d'inscription Statut Membre Dernière intervention -
Bonjour,
j'ai un petit soucis sur une macro avec excel qui met en majuscule ma plage C4:O39
Private Sub Worksheet_Change(ByVal zz As Range)
If Intersect(zz, [C4:O39]) Is Nothing Then Exit Sub
Application.EnableEvents = False
zz = UCase(zz)
Application.EnableEvents = True
End Sub
qui fonctionne bien
mon soucis c'est que je veux mettre en NOMpropre sur la même feuille ma colonne AA4:AA39
que dois je rajouter ?
merci
a bientot
j'ai un petit soucis sur une macro avec excel qui met en majuscule ma plage C4:O39
Private Sub Worksheet_Change(ByVal zz As Range)
If Intersect(zz, [C4:O39]) Is Nothing Then Exit Sub
Application.EnableEvents = False
zz = UCase(zz)
Application.EnableEvents = True
End Sub
qui fonctionne bien
mon soucis c'est que je veux mettre en NOMpropre sur la même feuille ma colonne AA4:AA39
que dois je rajouter ?
merci
a bientot
A voir également:
- Majuscule +nompropre meme feuille
- É majuscule - Guide
- Majuscule - Guide
- Code ascii de a majuscule - Guide
- Bruler feuille de laurier - Guide
- Feuille de pointage excel - Télécharger - Tableur
1 réponse
Bonjour,
De plus cette version fonctionnera si tu colles une plage au lieu de planter...
eric
Private Sub Worksheet_Change(ByVal zz As Range)
Dim c As Range
Application.EnableEvents = False
For Each c In zz
If Not Intersect(c, [C4:O39]) Is Nothing Then
c = UCase(c)
ElseIf Not Intersect(c, [AA4:AA39]) Is Nothing Then
c = Application.Proper(c)
End If
Next c
Application.EnableEvents = True
End Sub
De plus cette version fonctionnera si tu colles une plage au lieu de planter...
eric
merci bonne journée
a bientot