En B1 : =MAJUSCULE(A1) ou MINUSCULE(A1) si ton texte est en A1 A recopier pour toutes tes cellules
Cordialement
"bulrog" a écrit dans le message de news: 41f3837c$0$17413$
Bonjour,
Existe-il une macro ou un petit truc simple qui permettrait de mettre tout le texte d'une ou de plusieurs cellules en majuscules ?
--
Rai
Bonjour,
Une solution, parmi d'autres, en programmation. Pratique si la feuille comporte une multitude de zones à mettre en majuscules ...
Créer un nouveau module et y insérer le code suivant : Sub majuscules() For Each c In Selection Range(c.Address).Formula = UCase(c.Formula) Next c End Sub
Sélectionner la (ou les) zone(s) à mettre en majuscules, exécuter la macro.
Cette macro garde intact les formules.
Bon dimanche
Rai
"bulrog" a écrit dans le message de news: 41f3837c$0$17413$
Bonjour,
Existe-il une macro ou un petit truc simple qui permettrait de mettre tout le texte d'une ou de plusieurs cellules en majuscules ?
--
Bonjour,
Une solution, parmi d'autres, en programmation.
Pratique si la feuille comporte une multitude de zones à mettre en majuscules ...
Créer un nouveau module et y insérer le code suivant :
Sub majuscules()
For Each c In Selection
Range(c.Address).Formula = UCase(c.Formula)
Next c
End Sub
Sélectionner la (ou les) zone(s) à mettre en majuscules, exécuter la macro.
Cette macro garde intact les formules.
Bon dimanche
Rai
"bulrog" <bulrog_@teledisnet.be> a écrit dans le message de news: 41f3837c$0$17413$4d4efb8e@read.news.be.uu.net...
Bonjour,
Existe-il une macro ou un petit truc simple qui permettrait de mettre tout
le texte d'une ou de
plusieurs cellules en majuscules ?
Une solution, parmi d'autres, en programmation. Pratique si la feuille comporte une multitude de zones à mettre en majuscules ...
Créer un nouveau module et y insérer le code suivant : Sub majuscules() For Each c In Selection Range(c.Address).Formula = UCase(c.Formula) Next c End Sub
Sélectionner la (ou les) zone(s) à mettre en majuscules, exécuter la macro.
Cette macro garde intact les formules.
Bon dimanche
Rai
"bulrog" a écrit dans le message de news: 41f3837c$0$17413$
Bonjour,
Existe-il une macro ou un petit truc simple qui permettrait de mettre tout le texte d'une ou de plusieurs cellules en majuscules ?
--
bulrog
Merci mais ce que je cherche, c'est à mettre le contenu d'une cellule en majuscule. Pas recopier le contenu d'une cellule dans une autre qui sera en majuscule... Heu, c'est clair ?
En d'autres termes, si la cellule A1 contient le texte "hello", je voudrais qu'après la macro, la cellule A1 contienne le texte "HELLO".
"ROCHE Pierre" a écrit dans le message de news:
Bonjour
En B1 : =MAJUSCULE(A1) ou MINUSCULE(A1) si ton texte est en A1 A recopier pour toutes tes cellules
Cordialement
"bulrog" a écrit dans le message de news: 41f3837c$0$17413$
Bonjour,
Existe-il une macro ou un petit truc simple qui permettrait de mettre tout le texte d'une ou de plusieurs cellules en majuscules ?
--
Merci mais ce que je cherche, c'est à mettre le contenu d'une cellule en
majuscule. Pas recopier le contenu d'une cellule dans une autre qui sera en
majuscule... Heu, c'est clair ?
En d'autres termes, si la cellule A1 contient le texte "hello", je voudrais
qu'après la macro, la cellule A1 contienne le texte "HELLO".
"ROCHE Pierre" <Pierre.Roche@Wanadoo.fr> a écrit dans le message de news:
OFM3TwTAFHA.2568@TK2MSFTNGP10.phx.gbl...
Bonjour
En B1 : =MAJUSCULE(A1) ou MINUSCULE(A1) si ton texte est en A1
A recopier pour toutes tes cellules
Cordialement
"bulrog" <bulrog_@teledisnet.be> a écrit dans le message de news:
41f3837c$0$17413$4d4efb8e@read.news.be.uu.net...
Bonjour,
Existe-il une macro ou un petit truc simple qui permettrait de mettre
tout le texte d'une ou de
plusieurs cellules en majuscules ?
Merci mais ce que je cherche, c'est à mettre le contenu d'une cellule en majuscule. Pas recopier le contenu d'une cellule dans une autre qui sera en majuscule... Heu, c'est clair ?
En d'autres termes, si la cellule A1 contient le texte "hello", je voudrais qu'après la macro, la cellule A1 contienne le texte "HELLO".
"ROCHE Pierre" a écrit dans le message de news:
Bonjour
En B1 : =MAJUSCULE(A1) ou MINUSCULE(A1) si ton texte est en A1 A recopier pour toutes tes cellules
Cordialement
"bulrog" a écrit dans le message de news: 41f3837c$0$17413$
Bonjour,
Existe-il une macro ou un petit truc simple qui permettrait de mettre tout le texte d'une ou de plusieurs cellules en majuscules ?
--
bulrog
Peux-tu me dire comment je peux faire pour sélectionner automatiquement un ensemble de cellules qui ne se touchent pas pour les mettre en majuscule ? J'ai un formulaire dans lequel certains champs doivent être en majuscule mais pas tous. J'essaye de faire cela avec une macro qui serai activée par un bouton.
Merci d'avance.
"Rai" a écrit dans le message de news:
Bonjour,
Une solution, parmi d'autres, en programmation. Pratique si la feuille comporte une multitude de zones à mettre en majuscules ...
Créer un nouveau module et y insérer le code suivant : Sub majuscules() For Each c In Selection Range(c.Address).Formula = UCase(c.Formula) Next c End Sub
Sélectionner la (ou les) zone(s) à mettre en majuscules, exécuter la macro.
Cette macro garde intact les formules.
Bon dimanche
Rai
"bulrog" a écrit dans le message de news: 41f3837c$0$17413$
Bonjour,
Existe-il une macro ou un petit truc simple qui permettrait de mettre tout le texte d'une ou de plusieurs cellules en majuscules ?
--
Peux-tu me dire comment je peux faire pour sélectionner automatiquement un
ensemble de cellules qui ne se touchent pas pour les mettre en majuscule ?
J'ai un formulaire dans lequel certains champs doivent être en majuscule
mais pas tous. J'essaye de faire cela avec une macro qui serai activée par
un bouton.
Merci d'avance.
"Rai" <raimondpointschmidt@berlin.de> a écrit dans le message de news:
OQiw63TAFHA.3592@TK2MSFTNGP09.phx.gbl...
Bonjour,
Une solution, parmi d'autres, en programmation.
Pratique si la feuille comporte une multitude de zones à mettre en
majuscules ...
Créer un nouveau module et y insérer le code suivant :
Sub majuscules()
For Each c In Selection
Range(c.Address).Formula = UCase(c.Formula)
Next c
End Sub
Sélectionner la (ou les) zone(s) à mettre en majuscules, exécuter la macro.
Cette macro garde intact les formules.
Bon dimanche
Rai
"bulrog" <bulrog_@teledisnet.be> a écrit dans le message de news:
41f3837c$0$17413$4d4efb8e@read.news.be.uu.net...
Bonjour,
Existe-il une macro ou un petit truc simple qui permettrait de mettre tout
le texte d'une ou de
plusieurs cellules en majuscules ?
Peux-tu me dire comment je peux faire pour sélectionner automatiquement un ensemble de cellules qui ne se touchent pas pour les mettre en majuscule ? J'ai un formulaire dans lequel certains champs doivent être en majuscule mais pas tous. J'essaye de faire cela avec une macro qui serai activée par un bouton.
Merci d'avance.
"Rai" a écrit dans le message de news:
Bonjour,
Une solution, parmi d'autres, en programmation. Pratique si la feuille comporte une multitude de zones à mettre en majuscules ...
Créer un nouveau module et y insérer le code suivant : Sub majuscules() For Each c In Selection Range(c.Address).Formula = UCase(c.Formula) Next c End Sub
Sélectionner la (ou les) zone(s) à mettre en majuscules, exécuter la macro.
Cette macro garde intact les formules.
Bon dimanche
Rai
"bulrog" a écrit dans le message de news: 41f3837c$0$17413$
Bonjour,
Existe-il une macro ou un petit truc simple qui permettrait de mettre tout le texte d'une ou de plusieurs cellules en majuscules ?
--
Céline Brien
Bonjour, Sélectionne les cellules à mettre en majuscule en utilisant la touche Ctrl+glisser. Donne un nom à ce champ de cellules : Menu Insertion, Nom, Définir. Modifie la macro proposée par Rai : For Each c In Selection devient For Each c In Range("NomDonnéAuChampDeCellules") Bonne chance, Céline
Sub majuscules() For Each c In Range("NomDonnéAuChampDeCellules") Range(c.Address).Formula = UCase(c.Formula) Next c End Sub
"bulrog" a écrit dans le message de news:41f39053$0$17407$
Peux-tu me dire comment je peux faire pour sélectionner automatiquement un
ensemble de cellules qui ne se touchent pas pour les mettre en majuscule ?
J'ai un formulaire dans lequel certains champs doivent être en majuscule
mais pas tous. J'essaye de faire cela avec une macro qui serai activée par
un bouton.
Merci d'avance.
"Rai" a écrit dans le message de news:
Bonjour,
Une solution, parmi d'autres, en programmation. Pratique si la feuille comporte une multitude de zones à mettre en majuscules ...
Créer un nouveau module et y insérer le code suivant : Sub majuscules() For Each c In Selection Range(c.Address).Formula = UCase(c.Formula) Next c End Sub
Sélectionner la (ou les) zone(s) à mettre en majuscules, exécuter la macro.
Cette macro garde intact les formules.
Bon dimanche
Rai
"bulrog" a écrit dans le message de news: 41f3837c$0$17413$
Bonjour,
Existe-il une macro ou un petit truc simple qui permettrait de mettre tout
le texte d'une ou de plusieurs cellules en majuscules ?
--
Bonjour,
Sélectionne les cellules à mettre en majuscule en utilisant la touche
Ctrl+glisser.
Donne un nom à ce champ de cellules : Menu Insertion, Nom, Définir.
Modifie la macro proposée par Rai :
For Each c In Selection
devient
For Each c In Range("NomDonnéAuChampDeCellules")
Bonne chance,
Céline
Sub majuscules()
For Each c In Range("NomDonnéAuChampDeCellules")
Range(c.Address).Formula = UCase(c.Formula)
Next c
End Sub
"bulrog" <bulrog_@teledisnet.be> a écrit dans le message de
news:41f39053$0$17407$4d4efb8e@read.news.be.uu.net...
Peux-tu me dire comment je peux faire pour sélectionner
automatiquement un
ensemble de cellules qui ne se touchent pas pour les mettre en
majuscule ?
J'ai un formulaire dans lequel certains champs doivent être en
majuscule
mais pas tous. J'essaye de faire cela avec une macro qui serai
activée par
un bouton.
Merci d'avance.
"Rai" <raimondpointschmidt@berlin.de> a écrit dans le message de news:
OQiw63TAFHA.3592@TK2MSFTNGP09.phx.gbl...
Bonjour,
Une solution, parmi d'autres, en programmation.
Pratique si la feuille comporte une multitude de zones à mettre en
majuscules ...
Créer un nouveau module et y insérer le code suivant :
Sub majuscules()
For Each c In Selection
Range(c.Address).Formula = UCase(c.Formula)
Next c
End Sub
Sélectionner la (ou les) zone(s) à mettre en majuscules, exécuter la
macro.
Cette macro garde intact les formules.
Bon dimanche
Rai
"bulrog" <bulrog_@teledisnet.be> a écrit dans le message de news:
41f3837c$0$17413$4d4efb8e@read.news.be.uu.net...
Bonjour,
Existe-il une macro ou un petit truc simple qui permettrait de
mettre tout
le texte d'une ou de
plusieurs cellules en majuscules ?
Bonjour, Sélectionne les cellules à mettre en majuscule en utilisant la touche Ctrl+glisser. Donne un nom à ce champ de cellules : Menu Insertion, Nom, Définir. Modifie la macro proposée par Rai : For Each c In Selection devient For Each c In Range("NomDonnéAuChampDeCellules") Bonne chance, Céline
Sub majuscules() For Each c In Range("NomDonnéAuChampDeCellules") Range(c.Address).Formula = UCase(c.Formula) Next c End Sub
"bulrog" a écrit dans le message de news:41f39053$0$17407$
Peux-tu me dire comment je peux faire pour sélectionner automatiquement un
ensemble de cellules qui ne se touchent pas pour les mettre en majuscule ?
J'ai un formulaire dans lequel certains champs doivent être en majuscule
mais pas tous. J'essaye de faire cela avec une macro qui serai activée par
un bouton.
Merci d'avance.
"Rai" a écrit dans le message de news:
Bonjour,
Une solution, parmi d'autres, en programmation. Pratique si la feuille comporte une multitude de zones à mettre en majuscules ...
Créer un nouveau module et y insérer le code suivant : Sub majuscules() For Each c In Selection Range(c.Address).Formula = UCase(c.Formula) Next c End Sub
Sélectionner la (ou les) zone(s) à mettre en majuscules, exécuter la macro.
Cette macro garde intact les formules.
Bon dimanche
Rai
"bulrog" a écrit dans le message de news: 41f3837c$0$17413$
Bonjour,
Existe-il une macro ou un petit truc simple qui permettrait de mettre tout
le texte d'une ou de plusieurs cellules en majuscules ?