un peu bas, tu aurai trouvé Données validation Personalisé =EXACT(a1;MAJUSCULE(a1)) a+ rural thierry
"Steph" a écrit dans le message de news: 3ffd5489$0$1145$
Bonjour,
Comment forcer la saisie d'une cellule en majuscule ?
Merci
Steph
ru-th
Salut
par cela, il est impossible d'écrire en miniscule pour le changement de casse tu aurais trouvé dans le même fil une procédure évenementielle
Private Sub Worksheet_Change(ByVal Target As Excel.Range) If Target.Address = "$A$1" Then _ Target.Value = UCase(Target.Value) End Sub
a+ rural thierry
"Steph" a écrit dans le message de news: 3ffd6ad8$0$6075$
Ce n'est pas vraiment ce que je veux, je souhaite soit que lorsque l'on écrit, on ne puisse pas écrire en minuscule ou que après avoir valider (enter), la ligne change en majuscule.
"ru-th" a écrit dans le message de news:
Salut
un peu bas, tu aurai trouvé Données validation Personalisé =EXACT(a1;MAJUSCULE(a1)) a+ rural thierry
"Steph" a écrit dans le message de news:
3ffd5489$0$1145$
Bonjour,
Comment forcer la saisie d'une cellule en majuscule ?
Merci
Steph
Salut
par cela, il est impossible d'écrire en miniscule
pour le changement de casse
tu aurais trouvé dans le même fil une procédure évenementielle
Private Sub Worksheet_Change(ByVal Target As Excel.Range)
If Target.Address = "$A$1" Then _
Target.Value = UCase(Target.Value)
End Sub
a+
rural thierry
"Steph" <stephane.stommen@technic-one.com> a écrit dans le message de news:
3ffd6ad8$0$6075$ba620e4c@news.skynet.be...
Ce n'est pas vraiment ce que je veux, je souhaite soit que lorsque l'on
écrit, on ne puisse pas écrire en minuscule
ou que après avoir valider (enter), la ligne change en majuscule.
"ru-th" <ailleurs@nowhere> a écrit dans le message de
news:u1qRYke1DHA.2388@TK2MSFTNGP09.phx.gbl...
Salut
un peu bas, tu aurai trouvé
Données validation Personalisé
=EXACT(a1;MAJUSCULE(a1))
a+
rural thierry
"Steph" <stephane.stommen@technic-one.com> a écrit dans le message de
news:
3ffd5489$0$1145$ba620e4c@news.skynet.be...
Bonjour,
Comment forcer la saisie d'une cellule en majuscule ?
par cela, il est impossible d'écrire en miniscule pour le changement de casse tu aurais trouvé dans le même fil une procédure évenementielle
Private Sub Worksheet_Change(ByVal Target As Excel.Range) If Target.Address = "$A$1" Then _ Target.Value = UCase(Target.Value) End Sub
a+ rural thierry
"Steph" a écrit dans le message de news: 3ffd6ad8$0$6075$
Ce n'est pas vraiment ce que je veux, je souhaite soit que lorsque l'on écrit, on ne puisse pas écrire en minuscule ou que après avoir valider (enter), la ligne change en majuscule.
"ru-th" a écrit dans le message de news:
Salut
un peu bas, tu aurai trouvé Données validation Personalisé =EXACT(a1;MAJUSCULE(a1)) a+ rural thierry
"Steph" a écrit dans le message de news:
3ffd5489$0$1145$
Bonjour,
Comment forcer la saisie d'une cellule en majuscule ?
Merci
Steph
Steph
Ce n'est pas vraiment ce que je veux, je souhaite soit que lorsque l'on écrit, on ne puisse pas écrire en minuscule ou que après avoir valider (enter), la ligne change en majuscule.
"ru-th" a écrit dans le message de news:
Salut
un peu bas, tu aurai trouvé Données validation Personalisé =EXACT(a1;MAJUSCULE(a1)) a+ rural thierry
"Steph" a écrit dans le message de news:
3ffd5489$0$1145$
Bonjour,
Comment forcer la saisie d'une cellule en majuscule ?
Merci
Steph
Ce n'est pas vraiment ce que je veux, je souhaite soit que lorsque l'on
écrit, on ne puisse pas écrire en minuscule
ou que après avoir valider (enter), la ligne change en majuscule.
"ru-th" <ailleurs@nowhere> a écrit dans le message de
news:u1qRYke1DHA.2388@TK2MSFTNGP09.phx.gbl...
Salut
un peu bas, tu aurai trouvé
Données validation Personalisé
=EXACT(a1;MAJUSCULE(a1))
a+
rural thierry
"Steph" <stephane.stommen@technic-one.com> a écrit dans le message de
news:
3ffd5489$0$1145$ba620e4c@news.skynet.be...
Bonjour,
Comment forcer la saisie d'une cellule en majuscule ?
Ce n'est pas vraiment ce que je veux, je souhaite soit que lorsque l'on écrit, on ne puisse pas écrire en minuscule ou que après avoir valider (enter), la ligne change en majuscule.
"ru-th" a écrit dans le message de news:
Salut
un peu bas, tu aurai trouvé Données validation Personalisé =EXACT(a1;MAJUSCULE(a1)) a+ rural thierry
"Steph" a écrit dans le message de news:
3ffd5489$0$1145$
Bonjour,
Comment forcer la saisie d'une cellule en majuscule ?
Merci
Steph
Steph
Ceci fonctionne très bien merci Thierry
"ru-th" a écrit dans le message de news:
Salut
par cela, il est impossible d'écrire en miniscule pour le changement de casse tu aurais trouvé dans le même fil une procédure évenementielle
Private Sub Worksheet_Change(ByVal Target As Excel.Range) If Target.Address = "$A$1" Then _ Target.Value = UCase(Target.Value) End Sub
a+ rural thierry
"Steph" a écrit dans le message de news:
3ffd6ad8$0$6075$
Ce n'est pas vraiment ce que je veux, je souhaite soit que lorsque l'on écrit, on ne puisse pas écrire en minuscule ou que après avoir valider (enter), la ligne change en majuscule.
"ru-th" a écrit dans le message de news:
Salut
un peu bas, tu aurai trouvé Données validation Personalisé =EXACT(a1;MAJUSCULE(a1)) a+ rural thierry
"Steph" a écrit dans le message de news:
3ffd5489$0$1145$
Bonjour,
Comment forcer la saisie d'une cellule en majuscule ?
Merci
Steph
Ceci fonctionne très bien
merci Thierry
"ru-th" <ailleurs@nowhere> a écrit dans le message de
news:eEqsd0e1DHA.3140@tk2msftngp13.phx.gbl...
Salut
par cela, il est impossible d'écrire en miniscule
pour le changement de casse
tu aurais trouvé dans le même fil une procédure évenementielle
Private Sub Worksheet_Change(ByVal Target As Excel.Range)
If Target.Address = "$A$1" Then _
Target.Value = UCase(Target.Value)
End Sub
a+
rural thierry
"Steph" <stephane.stommen@technic-one.com> a écrit dans le message de
news:
3ffd6ad8$0$6075$ba620e4c@news.skynet.be...
Ce n'est pas vraiment ce que je veux, je souhaite soit que lorsque l'on
écrit, on ne puisse pas écrire en minuscule
ou que après avoir valider (enter), la ligne change en majuscule.
"ru-th" <ailleurs@nowhere> a écrit dans le message de
news:u1qRYke1DHA.2388@TK2MSFTNGP09.phx.gbl...
Salut
un peu bas, tu aurai trouvé
Données validation Personalisé
=EXACT(a1;MAJUSCULE(a1))
a+
rural thierry
"Steph" <stephane.stommen@technic-one.com> a écrit dans le message de
news:
3ffd5489$0$1145$ba620e4c@news.skynet.be...
Bonjour,
Comment forcer la saisie d'une cellule en majuscule ?
par cela, il est impossible d'écrire en miniscule pour le changement de casse tu aurais trouvé dans le même fil une procédure évenementielle
Private Sub Worksheet_Change(ByVal Target As Excel.Range) If Target.Address = "$A$1" Then _ Target.Value = UCase(Target.Value) End Sub
a+ rural thierry
"Steph" a écrit dans le message de news:
3ffd6ad8$0$6075$
Ce n'est pas vraiment ce que je veux, je souhaite soit que lorsque l'on écrit, on ne puisse pas écrire en minuscule ou que après avoir valider (enter), la ligne change en majuscule.
"ru-th" a écrit dans le message de news:
Salut
un peu bas, tu aurai trouvé Données validation Personalisé =EXACT(a1;MAJUSCULE(a1)) a+ rural thierry
"Steph" a écrit dans le message de news:
3ffd5489$0$1145$
Bonjour,
Comment forcer la saisie d'une cellule en majuscule ?
Merci
Steph
ChrisV
De rien...! >:-)
ChrisV
"Steph" a écrit dans le message de news: 3ffd67b9$0$830$
Ceci fonctionne très bien merci Thierry
"ru-th" a écrit dans le message de news:
Salut
par cela, il est impossible d'écrire en miniscule pour le changement de casse tu aurais trouvé dans le même fil une procédure évenementielle
Private Sub Worksheet_Change(ByVal Target As Excel.Range) If Target.Address = "$A$1" Then _ Target.Value = UCase(Target.Value) End Sub
a+ rural thierry
De rien...! >:-)
ChrisV
"Steph" <stephane.stommen@technic-one.com> a écrit dans le message de news:
3ffd67b9$0$830$ba620e4c@news.skynet.be...
Ceci fonctionne très bien
merci Thierry
"ru-th" <ailleurs@nowhere> a écrit dans le message de
news:eEqsd0e1DHA.3140@tk2msftngp13.phx.gbl...
Salut
par cela, il est impossible d'écrire en miniscule
pour le changement de casse
tu aurais trouvé dans le même fil une procédure évenementielle
Private Sub Worksheet_Change(ByVal Target As Excel.Range)
If Target.Address = "$A$1" Then _
Target.Value = UCase(Target.Value)
End Sub
"Steph" a écrit dans le message de news: 3ffd67b9$0$830$
Ceci fonctionne très bien merci Thierry
"ru-th" a écrit dans le message de news:
Salut
par cela, il est impossible d'écrire en miniscule pour le changement de casse tu aurais trouvé dans le même fil une procédure évenementielle
Private Sub Worksheet_Change(ByVal Target As Excel.Range) If Target.Address = "$A$1" Then _ Target.Value = UCase(Target.Value) End Sub
a+ rural thierry
Auguste VIEIRA de RESENDE
Bonjour,
j'ai un pb du même genre :
lorsque je saisi du texte dans une cellule appartenant a un groupe de cellules, il faut que la saisie passe automatiquement en majuscule (quelque soit la cellule qui a été saisie)
je suis un peu (beaucoup) débutant... merci
"Steph" a écrit dans le message news: 3ffd5489$0$1145$
Bonjour,
Comment forcer la saisie d'une cellule en majuscule ?
Merci
Steph
Bonjour,
j'ai un pb du même genre :
lorsque je saisi du texte dans une cellule appartenant
a un groupe de cellules, il faut que la saisie passe automatiquement
en majuscule (quelque soit la cellule qui a été saisie)
je suis un peu (beaucoup) débutant...
merci
"Steph" <stephane.stommen@technic-one.com> a écrit dans le message news:
3ffd5489$0$1145$ba620e4c@news.skynet.be...
Bonjour,
Comment forcer la saisie d'une cellule en majuscule ?
lorsque je saisi du texte dans une cellule appartenant a un groupe de cellules, il faut que la saisie passe automatiquement en majuscule (quelque soit la cellule qui a été saisie)
je suis un peu (beaucoup) débutant... merci
"Steph" a écrit dans le message news: 3ffd5489$0$1145$
Bonjour,
Comment forcer la saisie d'une cellule en majuscule ?
Merci
Steph
ChrisV
Bonjour Auguste,
Avec la plage de cellules sur laquelle tu désires forcer les majuscules nommée ici Zn... Dans la feuille de code de l'onglet correspondant:
Private Sub Worksheet_Change(ByVal Target As Excel.Range) On Error Resume Next If Not Intersect(Target, Range("Zn")) Is Nothing Then _ Target.Value = UCase(Target.Value) End Sub
ChrisV
"Auguste VIEIRA de RESENDE" a écrit dans le message de news:
Bonjour,
j'ai un pb du même genre :
lorsque je saisi du texte dans une cellule appartenant a un groupe de cellules, il faut que la saisie passe automatiquement en majuscule (quelque soit la cellule qui a été saisie)
je suis un peu (beaucoup) débutant... merci
"Steph" a écrit dans le message news: 3ffd5489$0$1145$
Bonjour,
Comment forcer la saisie d'une cellule en majuscule ?
Merci
Steph
Bonjour Auguste,
Avec la plage de cellules sur laquelle tu désires forcer les majuscules
nommée ici Zn...
Dans la feuille de code de l'onglet correspondant:
Private Sub Worksheet_Change(ByVal Target As Excel.Range)
On Error Resume Next
If Not Intersect(Target, Range("Zn")) Is Nothing Then _
Target.Value = UCase(Target.Value)
End Sub
ChrisV
"Auguste VIEIRA de RESENDE" <avieira@ifrance.com> a écrit dans le message de
news: OEKA2j12DHA.3936@TK2MSFTNGP11.phx.gbl...
Bonjour,
j'ai un pb du même genre :
lorsque je saisi du texte dans une cellule appartenant
a un groupe de cellules, il faut que la saisie passe automatiquement
en majuscule (quelque soit la cellule qui a été saisie)
je suis un peu (beaucoup) débutant...
merci
"Steph" <stephane.stommen@technic-one.com> a écrit dans le message news:
3ffd5489$0$1145$ba620e4c@news.skynet.be...
Bonjour,
Comment forcer la saisie d'une cellule en majuscule ?
Avec la plage de cellules sur laquelle tu désires forcer les majuscules nommée ici Zn... Dans la feuille de code de l'onglet correspondant:
Private Sub Worksheet_Change(ByVal Target As Excel.Range) On Error Resume Next If Not Intersect(Target, Range("Zn")) Is Nothing Then _ Target.Value = UCase(Target.Value) End Sub
ChrisV
"Auguste VIEIRA de RESENDE" a écrit dans le message de news:
Bonjour,
j'ai un pb du même genre :
lorsque je saisi du texte dans une cellule appartenant a un groupe de cellules, il faut que la saisie passe automatiquement en majuscule (quelque soit la cellule qui a été saisie)
je suis un peu (beaucoup) débutant... merci
"Steph" a écrit dans le message news: 3ffd5489$0$1145$
Bonjour,
Comment forcer la saisie d'une cellule en majuscule ?
Merci
Steph
Auguste VIEIRA de RESENDE
super, ça fonctionne plutôt bien mais
lorsque j'ouvre mon classeur une macro initialise automatiquement mon planning (elle récupère des formules et des données qui se trouvent dans une feuille masquée)
si j'utilise la solution proposée (qui fonctionne très bien) apparemment cela tourne longtemps à l'ouverture du classeur suis-je clair ?
"ChrisV" a écrit dans le message news:
Bonjour Auguste,
Avec la plage de cellules sur laquelle tu désires forcer les majuscules nommée ici Zn... Dans la feuille de code de l'onglet correspondant:
Private Sub Worksheet_Change(ByVal Target As Excel.Range) On Error Resume Next If Not Intersect(Target, Range("Zn")) Is Nothing Then _ Target.Value = UCase(Target.Value) End Sub
ChrisV
"Auguste VIEIRA de RESENDE" a écrit dans le message de
news:
Bonjour,
j'ai un pb du même genre :
lorsque je saisi du texte dans une cellule appartenant a un groupe de cellules, il faut que la saisie passe automatiquement en majuscule (quelque soit la cellule qui a été saisie)
je suis un peu (beaucoup) débutant... merci
"Steph" a écrit dans le message news: 3ffd5489$0$1145$
Bonjour,
Comment forcer la saisie d'une cellule en majuscule ?
Merci
Steph
super,
ça fonctionne plutôt bien
mais
lorsque j'ouvre mon classeur une macro initialise automatiquement mon
planning
(elle récupère des formules et des données qui se trouvent dans une feuille
masquée)
si j'utilise la solution proposée (qui fonctionne très bien) apparemment
cela tourne longtemps à l'ouverture du classeur
suis-je clair ?
"ChrisV" <chrisve@wanadoo.fr> a écrit dans le message news:
eX2ZSB22DHA.1184@TK2MSFTNGP10.phx.gbl...
Bonjour Auguste,
Avec la plage de cellules sur laquelle tu désires forcer les majuscules
nommée ici Zn...
Dans la feuille de code de l'onglet correspondant:
Private Sub Worksheet_Change(ByVal Target As Excel.Range)
On Error Resume Next
If Not Intersect(Target, Range("Zn")) Is Nothing Then _
Target.Value = UCase(Target.Value)
End Sub
ChrisV
"Auguste VIEIRA de RESENDE" <avieira@ifrance.com> a écrit dans le message
de
news: OEKA2j12DHA.3936@TK2MSFTNGP11.phx.gbl...
Bonjour,
j'ai un pb du même genre :
lorsque je saisi du texte dans une cellule appartenant
a un groupe de cellules, il faut que la saisie passe automatiquement
en majuscule (quelque soit la cellule qui a été saisie)
je suis un peu (beaucoup) débutant...
merci
"Steph" <stephane.stommen@technic-one.com> a écrit dans le message news:
3ffd5489$0$1145$ba620e4c@news.skynet.be...
Bonjour,
Comment forcer la saisie d'une cellule en majuscule ?
lorsque j'ouvre mon classeur une macro initialise automatiquement mon planning (elle récupère des formules et des données qui se trouvent dans une feuille masquée)
si j'utilise la solution proposée (qui fonctionne très bien) apparemment cela tourne longtemps à l'ouverture du classeur suis-je clair ?
"ChrisV" a écrit dans le message news:
Bonjour Auguste,
Avec la plage de cellules sur laquelle tu désires forcer les majuscules nommée ici Zn... Dans la feuille de code de l'onglet correspondant:
Private Sub Worksheet_Change(ByVal Target As Excel.Range) On Error Resume Next If Not Intersect(Target, Range("Zn")) Is Nothing Then _ Target.Value = UCase(Target.Value) End Sub
ChrisV
"Auguste VIEIRA de RESENDE" a écrit dans le message de
news:
Bonjour,
j'ai un pb du même genre :
lorsque je saisi du texte dans une cellule appartenant a un groupe de cellules, il faut que la saisie passe automatiquement en majuscule (quelque soit la cellule qui a été saisie)
je suis un peu (beaucoup) débutant... merci
"Steph" a écrit dans le message news: 3ffd5489$0$1145$
Bonjour,
Comment forcer la saisie d'une cellule en majuscule ?