Ceci est une page optimisée pour les mobiles. Cliquez sur ce texte pour afficher la vraie page.

XL 2019 Nom, Majuscule, VBA, Première Lettre, etc.

fx lefefebvre

XLDnaute Nouveau
Bonjour,

Je souhaite svp que les cellules de noms dans la colonne Q après saisie (en majuscules et/minuscules) deviennent automatiquement comme celles voulues en colonne S, mais en colonne Q.
Je suppose que cela doit se passer par un code VBA.



Je vous remercie d'avance de votre aide,
FX
 

Pièces jointes

  • Noms.xlsx
    9.2 KB · Affichages: 7

GALOUGALOU

XLDnaute Accro
bonsoir le forum
re vx lefefebre
la formule nom propre fait cela mais dans Giscard D'Estaing, le D sera en majuscule
VB:
=NOMPROPRE(Q3)
idem pour ce code vba
Code:
Sub Proper_Case()
For Each x In Range("q3:q20")
x.Value = Application.Proper(x.Value)
Next
End Sub
un membre de XLD aura peut-être la solution
cdt
galougalou
 

patricktoulon

XLDnaute Barbatruc
Bonjour
dynamiquement à la saisie tu passe par VBAet l'event change de la feuille
VB:
Private Sub Worksheet_Change(ByVal Target As Range)
    If Not Intersect(Target, [Q:Q].Resize(ActiveSheet.UsedRange.Rows.Count)) Is Nothing Then
        Application.EnableEvents = False
        Target = WorksheetFunction.Proper(Target.Value)
        Application.EnableEvents = True
   End If
End Sub
 

GALOUGALOU

XLDnaute Accro
bonjour le fil
re fx lefefebvre
Effectivement vous partez de loin. Je vous conseille cette lecture pour le code VBA, et sur le site d'autre tuto vous serons utiles.
cdt
galougalou
 

Discussions similaires

Réponses
31
Affichages
2 K
Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…