majuscule

  • Initiateur de la discussion roberto
  • Date de début
R

roberto

Guest
je voudrais mettre toutes les cellules en majuscule
 
H

hurricane

Guest
Bonjour roberto

petit macro qui va bien "tu selectionnes la zone et tu envois la macro"


'macro pour la mise en majuscule de la premiere lettre de chaque cellule selectionnée
Sub Initiales()
Application.Cursor = xlWait
For Each cell In Selection

cell.Formula = StrConv(cell.Formula, 1)

Next cell
Application.Cursor = xlDefault
End Sub

'vbUpperCase 1 Convertit la chaîne en majuscules.
'vbLowerCase 2 Convertit la chaîne en minuscules.
'vbProperCase 3 Convertit la première lettre de chaque mot de la chaîne en majuscule.
'vbWide* 4* Convertit les caractères étroits (codés sur un octet) d'une chaîne en caractères larges (codés sur deux octets).
'vbNarrow* 8* Convertit les caractères larges (codés sur deux octets) d'une chaîne en caractères étroits (codés sur un octet).
'vbUnicode 64 Convertit la chaîne en Unicode à l'aide de la page de code par défaut du système.
'vbFromUnicode 128 Convertit la chaîne Unicode dans la page de code par défaut du système.

@+ hurricane
 
V

Valérie

Guest
Aucun problème roberto

J'ai trouvé très interressante l'explication de hurricane sur la fonction StrConv. J'espère que cela t'as au moins permis de tout convertir d'un coup

@ bientôt
Valérie
 

Membres actuellement en ligne

Statistiques des forums

Discussions
314 121
Messages
2 106 129
Membres
109 495
dernier inscrit
jerome bonneau