Forum |  HardWare.fr | News | Articles | PC | S'identifier | S'inscrire | Shop Recherche
1942 connectés 

  FORUM HardWare.fr
  Windows & Software
  Logiciels

  majuscule sous Excel

 


 Mot :   Pseudo :  
 
Bas de page
Auteur Sujet :

majuscule sous Excel

n°1020311
carinae
Posté le 13-01-2003 à 14:02:57  profilanswer
 

bonjour,
 
 
quelqu'un sait comment mettre des lignes completes en majuscule sous excel ? Pour word je n'ai pas de probléme mais pour excel ...:-(((.

mood
Publicité
Posté le 13-01-2003 à 14:02:57  profilanswer
 

n°1020322
carinae
Posté le 13-01-2003 à 14:06:29  profilanswer
 

:bounce:  :bounce:  

n°1020333
Guru
Posté le 13-01-2003 à 14:08:58  profilanswer
 

Tu dois pouvoir le faire simplement avec une macro, tout dépend après de la manière dont est structurée ta feuille de calcul.

n°1020343
carinae
Posté le 13-01-2003 à 14:16:12  profilanswer
 

si je comprends bien on ne peux pas mettre une ligne en majuscule comme çà. Bizarre de la part de Microsoft ! mais pourtant ... :??:

n°1020851
carinae
Posté le 13-01-2003 à 20:47:59  profilanswer
 

bon alors personne ne sait si c'est possible ou pas ???

n°1021126
Guru
Posté le 14-01-2003 à 00:23:36  profilanswer
 

Je n'ai pas trouvé comment faire mais la macro suivante le fait sur une sélection d'une ou plusieurs lignes.
 

Code :
  1. Sub MiseEnMajuscules()
  2.     Dim iCol As Integer
  3.     Dim iColDeb As Integer
  4.     Dim iColFin As Integer
  5.     Dim iLig As Integer
  6.     Dim iLigDeb As Integer
  7.     Dim iLigFin As Integer
  8.    
  9.     iColDeb = Selection.Column
  10.     iColFin = iColDeb + Selection.Columns.Count - 1
  11.    
  12.     iLigDeb = Selection.Row
  13.     iLigFin = iLigDeb + Selection.Rows.Count - 1
  14.    
  15.     For iLig = iLigDeb To iLigFin
  16.         For iCol = iColDeb To iColFin
  17.             If iCol < 256 Then
  18.                 If iCol > 26 Then
  19.                     Range(Chr((iCol \ 26) + 64) & Chr((iCol Mod 26) + 65) & iLig).Value = UCase(Range(Chr((iCol \ 26) + 64) & Chr((iCol Mod 26) + 65) & iLig).Value)
  20.                 Else
  21.                     Range(Chr(iCol + 64) & iLig).Value = UCase(Range(Chr(iCol + 64) & iLig).Value)
  22.                 End If
  23.             End If
  24.         Next
  25.     Next
  26. End Sub


 
Hope this helps...

n°1021135
Immos
Posté le 14-01-2003 à 00:40:02  profilanswer
 

salut,
 
utilise simplement la fonction : MAJUSCULE d'excel
 
=MAJUSCULE(cellule à convertir)
 
@+


Message édité par Immos le 14-01-2003 à 00:40:23

Aller à :
Ajouter une réponse
  FORUM HardWare.fr
  Windows & Software
  Logiciels

  majuscule sous Excel

 

Sujets relatifs
truc bizarre sous excel 2000Excel - Tri de colonne
excel et les fichiers *.csv (comma seperated)Excel et proteger sont document..??
Avec excelMicrosoft Excel...
Petite question d'un newb sous excel.edit: excel recovery 3.0 (comment recupérer données excel endomagés)
excel changer le point en virgule 
Plus de sujets relatifs à : majuscule sous Excel


Copyright © 1997-2022 Hardware.fr SARL (Signaler un contenu illicite / Données personnelles) / Groupe LDLC / Shop HFR