majuscule sous Excel

Marsh Posté le 13-01-2003 à 14:02:57

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 ...:-(((.

Marsh Posté le 13-01-2003 à 14:02:57

Marsh Posté le 13-01-2003 à 14:06:29

:bounce:

Marsh Posté le 13-01-2003 à 14:08:58

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.

Marsh Posté le 13-01-2003 à 14:16:12

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

Marsh Posté le 13-01-2003 à 20:47:59

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

Marsh Posté le 14-01-2003 à 00:23:36

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

Code :

Sub MiseEnMajuscules()
Dim iCol As Integer
Dim iColDeb As Integer
Dim iColFin As Integer
Dim iLig As Integer
Dim iLigDeb As Integer
Dim iLigFin As Integer
iColDeb = Selection.Column
iColFin = iColDeb + Selection.Columns.Count - 1
iLigDeb = Selection.Row
iLigFin = iLigDeb + Selection.Rows.Count - 1
For iLig = iLigDeb To iLigFin
For iCol = iColDeb To iColFin
If iCol < 256 Then
If iCol > 26 Then
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)
Else
Range(Chr(iCol + 64) & iLig).Value = UCase(Range(Chr(iCol + 64) & iLig).Value)
End If
End If
Next
Next
End Sub

Hope this helps...

Marsh Posté le 14-01-2003 à 00:40:02

salut,

utilise simplement la fonction : MAJUSCULE d'excel

=MAJUSCULE(cellule à convertir)

@+

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

Make sure you enter the(*)required information where indicate.HTML code is not allowed

Name *

Email *

URL

Message *