Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire
Veuillez sélectionner un problème
Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
Pascal Engelmajer
Salut, if not cell.hasformula then cell.value = Application.WorksheetFunction.Proper(cell.value) 'initiales majuscules end if -- Amicalement. Pascal "il n'y a pas de vent favorable pour celui qui ne sait pas ou il va." Sénèque. http://www.ilyapa.net/excel http://www.ilyapa.net/baseExcel "arnaud" a écrit dans le message de news:
Bonjour à tous Je viens de créer une macro pour passer mon texte en minuscule.
For Each cell In Selection cell.Formula = LCase(cell.Formula) Next cell
Le problème, c'est que j'aimerai que la premiere lettre de chaque mot reste
en majuscule... Comment je fais ??
Autre question : Quand j'execute ma macro, je ne peux plus annuler l'opération, y'a t'il un moyen ??
Merci d'avance Arnaud
Salut,
if not cell.hasformula then
cell.value = Application.WorksheetFunction.Proper(cell.value) 'initiales
majuscules
end if
--
Amicalement.
Pascal
"il n'y a pas de vent favorable pour celui qui ne sait pas ou il va."
Sénèque.
http://www.ilyapa.net/excel
http://www.ilyapa.net/baseExcel
"arnaud" <arnaud.lamy@silverplastics.fr> a écrit dans le message de news:
O0DE5XBYEHA.3516@TK2MSFTNGP09.phx.gbl...
Bonjour à tous
Je viens de créer une macro pour passer mon texte en minuscule.
For Each cell In Selection
cell.Formula = LCase(cell.Formula)
Next cell
Le problème, c'est que j'aimerai que la premiere lettre de chaque mot
reste
en majuscule... Comment je fais ??
Autre question :
Quand j'execute ma macro, je ne peux plus annuler l'opération, y'a t'il un
moyen ??
Salut, if not cell.hasformula then cell.value = Application.WorksheetFunction.Proper(cell.value) 'initiales majuscules end if -- Amicalement. Pascal "il n'y a pas de vent favorable pour celui qui ne sait pas ou il va." Sénèque. http://www.ilyapa.net/excel http://www.ilyapa.net/baseExcel "arnaud" a écrit dans le message de news:
Bonjour à tous Je viens de créer une macro pour passer mon texte en minuscule.
For Each cell In Selection cell.Formula = LCase(cell.Formula) Next cell
Le problème, c'est que j'aimerai que la premiere lettre de chaque mot reste
en majuscule... Comment je fais ??
Autre question : Quand j'execute ma macro, je ne peux plus annuler l'opération, y'a t'il un moyen ??
Merci d'avance Arnaud
arnaud
super ? C'est au top !
"Pascal Engelmajer" a écrit dans le message de news:
Salut, if not cell.hasformula then cell.value = Application.WorksheetFunction.Proper(cell.value) 'initiales
majuscules end if -- Amicalement. Pascal "il n'y a pas de vent favorable pour celui qui ne sait pas ou il va." Sénèque. http://www.ilyapa.net/excel http://www.ilyapa.net/baseExcel "arnaud" a écrit dans le message de news:
Bonjour à tous Je viens de créer une macro pour passer mon texte en minuscule.
For Each cell In Selection cell.Formula = LCase(cell.Formula) Next cell
Le problème, c'est que j'aimerai que la premiere lettre de chaque mot reste
en majuscule... Comment je fais ??
Autre question : Quand j'execute ma macro, je ne peux plus annuler l'opération, y'a t'il un
moyen ??
Merci d'avance Arnaud
super ? C'est au top !
"Pascal Engelmajer" <pascal.engelmajer@ilyapa_spam.net> a écrit dans le
message de news: O88mV0BYEHA.644@tk2msftngp13.phx.gbl...
Salut,
if not cell.hasformula then
cell.value = Application.WorksheetFunction.Proper(cell.value)
'initiales
majuscules
end if
--
Amicalement.
Pascal
"il n'y a pas de vent favorable pour celui qui ne sait pas ou il va."
Sénèque.
http://www.ilyapa.net/excel
http://www.ilyapa.net/baseExcel
"arnaud" <arnaud.lamy@silverplastics.fr> a écrit dans le message de news:
O0DE5XBYEHA.3516@TK2MSFTNGP09.phx.gbl...
Bonjour à tous
Je viens de créer une macro pour passer mon texte en minuscule.
For Each cell In Selection
cell.Formula = LCase(cell.Formula)
Next cell
Le problème, c'est que j'aimerai que la premiere lettre de chaque mot
reste
en majuscule... Comment je fais ??
Autre question :
Quand j'execute ma macro, je ne peux plus annuler l'opération, y'a t'il
un
"Pascal Engelmajer" a écrit dans le message de news:
Salut, if not cell.hasformula then cell.value = Application.WorksheetFunction.Proper(cell.value) 'initiales
majuscules end if -- Amicalement. Pascal "il n'y a pas de vent favorable pour celui qui ne sait pas ou il va." Sénèque. http://www.ilyapa.net/excel http://www.ilyapa.net/baseExcel "arnaud" a écrit dans le message de news:
Bonjour à tous Je viens de créer une macro pour passer mon texte en minuscule.
For Each cell In Selection cell.Formula = LCase(cell.Formula) Next cell
Le problème, c'est que j'aimerai que la premiere lettre de chaque mot reste
en majuscule... Comment je fais ??
Autre question : Quand j'execute ma macro, je ne peux plus annuler l'opération, y'a t'il un
