OVH Cloud OVH Cloud

Lettre = chiffre

10 réponses
Avatar
sycora
Bonjour

A=1
B=2
C=3

Est il possible qu'en tapant A dans une cellule ce soit 1 qui apparaisse et
ainsi de suite, B ce soit 2 etc...............
Merci

10 réponses

Avatar
Rai
Bonjour

A=1
B=2
C=3

Est il possible qu'en tapant A dans une cellule ce soit 1 qui apparaisse et
ainsi de suite, B ce soit 2 etc...............
Merci




Bonjour

Par formule Excel tu peux le faire.
Inscris en colonne B
=CODE(MAJUSCULE(A1))-64

Par contre si tu veux qu'automatiquement le caractère soit converti lors
de la saisie ... sans VBA point de salut.

D'où ma question : "Que souhaites-tu faire ?"

A bientôt

Rai

Avatar
sycora
Oui je préfère que le caractère soit converti lors
de la saisie donc VBA ?
Merci

"Rai" <raimondpointschmidtatberlinpointde> a écrit dans le message de news:
43d21c6e$0$19695$
Bonjour

A=1
B=2
C=3

Est il possible qu'en tapant A dans une cellule ce soit 1 qui apparaisse
et ainsi de suite, B ce soit 2 etc...............
Merci


Bonjour

Par formule Excel tu peux le faire.
Inscris en colonne B
=CODE(MAJUSCULE(A1))-64

Par contre si tu veux qu'automatiquement > D'où ma question : "Que
souhaites-tu faire ?"

A bientôt

Rai



Avatar
LSteph
Bonjour "sycora",
Inverses les capuchons de la touche A et celui du 1 du pavé numérique.
Maintenant en appuyant sur "A" tu obtiens "1".

Plus sérieusement explique le contexte car si c'est possible de faire
mouliner
un truc pour faire ce que le choix des touches résoudrait simplement, je
doutes
quand même que ta demande n'ait point de but précis, aussi il serait utile
d'en
comprendre l'intérêt pour envisager au mieux une proposition qui y réponde.

lSteph


"sycora" a écrit dans le message de news:
43d2163d$0$19705$
Bonjour

A=1
B=2
C=3

Est il possible qu'en tapant A dans une cellule ce soit 1 qui apparaisse
et ainsi de suite, B ce soit 2 etc...............
Merci



Avatar
LSteph
Re,
voici exemple test set à réaffecter à "a " la macro toto la macro remet
sert à réaffecter "a":

Sub test()
Application.OnKey "a", "toto"
End Sub
Sub toto()
Application.SendKeys "1"
End Sub
Sub remet()
Application.OnKey "a"
End Sub

'lSteph

"sycora" a écrit dans le message de news:
43d2163d$0$19705$
Bonjour

A=1
B=2
C=3

Est il possible qu'en tapant A dans une cellule ce soit 1 qui apparaisse
et ainsi de suite, B ce soit 2 etc...............
Merci



Avatar
sycora
J'ai mal posé ma question, (A) n'est pas obligatoirement (1) "A" représente
le résultat d'une opération, et "B" le résultat d'une autre...........
Donc en tapant A ou B je voudrais que le résultat de cette opération
s'affiche ................
Peut être que ce n'est pas possible !
Merci encore


"LSteph" a écrit dans le message de news:
ujo$$
Re,
voici exemple test set à réaffecter à "a " la macro toto la macro remet
sert à réaffecter "a":

Sub test()
Application.OnKey "a", "toto"
End Sub
Sub toto()
Application.SendKeys "1"
End Sub
Sub remet()
Application.OnKey "a"
End Sub

'lSteph

"sycora" a écrit dans le message de news:
43d2163d$0$19705$
Bonjour

A=1
B=2
C=3

Est il possible qu'en tapant A dans une cellule ce soit 1 qui apparaisse
et ainsi de suite, B ce soit 2 etc...............
Merci







Avatar
LSteph
Dans ce cas tu peux qd même utiliser le onkey mais s'il ne s'agit plus d'une
touche mais
de ce qu'il faut entrer et il faudrait savoir où : cellule textbox message
d'alerte commentaire
la macro toto au lieu d'envoyer sendkeys "1" il s'agit donc d'appliquer une
formule laquelle
par rapport à quellesréférences?
activecell="le résultat de cette opération"

...un peu de précisions...?!

...a+
"sycora" a écrit dans le message de news:
43d22a4f$0$19704$
J'ai mal posé ma question, (A) n'est pas obligatoirement (1) "A"
représente le résultat d'une opération, et "B" le résultat d'une
autre...........
Donc en tapant A ou B je voudrais que le résultat de cette opération
s'affiche ................
Peut être que ce n'est pas possible !
Merci encore


"LSteph" a écrit dans le message de news:
ujo$$
Re,
voici exemple test set à réaffecter à "a " la macro toto la macro remet
sert à réaffecter "a":

Sub test()
Application.OnKey "a", "toto"
End Sub
Sub toto()
Application.SendKeys "1"
End Sub
Sub remet()
Application.OnKey "a"
End Sub

'lSteph

"sycora" a écrit dans le message de news:
43d2163d$0$19705$
Bonjour

A=1
B=2
C=3

Est il possible qu'en tapant A dans une cellule ce soit 1 qui apparaisse
et ainsi de suite, B ce soit 2 etc...............
Merci











Avatar
Rai
Bonjour

A=1
B=2
C=3

Est il possible qu'en tapant A dans une cellule ce soit 1 qui apparaisse et
ainsi de suite, B ce soit 2 etc...............
Merci


re-,


OK. Si on considère que tu veuilles automatiquement changer une saisie
texte dans la colonne A en le numéro d'ordre du premier caractère (a=1,
c=3, dodo=4 ...)

Alors je te propose le code suivant (à insérer dans le code de la
feuille souhaitée)

Private Sub Worksheet_Change(ByVal Target As Range)
On Error Resume Next
Application.EnableEvents = False
With Target
If .Column = 1 And .Cells.Count = 1 Then
.Value = Asc(UCase(Target)) - 64
End If
End With
Application.EnableEvents = True
End Sub

Ca devrait convenir.


A bientot

Rai

Avatar
Jacky
Bonjour,

Insertion/nom/ définir
Nom dans le classeur A
Fait référence a:
þuil1!$A$1+Feuil1!$B$1
Ou
þuil1!$A$1*Feuil1!$B$1

Ou tous autres instructions

Sur la feuille, dans une cellule quelconque
=A
Donnera le résultat de A1+B1

Idem pour B

Salutations
JJ

"sycora" a écrit dans le message de
news:43d22a4f$0$19704$
J'ai mal posé ma question, (A) n'est pas obligatoirement (1) "A"
représente

le résultat d'une opération, et "B" le résultat d'une autre...........
Donc en tapant A ou B je voudrais que le résultat de cette opération
s'affiche ................
Peut être que ce n'est pas possible !
Merci encore


"LSteph" a écrit dans le message de news:
ujo$$
Re,
voici exemple test set à réaffecter à "a " la macro toto la macro remet
sert à réaffecter "a":

Sub test()
Application.OnKey "a", "toto"
End Sub
Sub toto()
Application.SendKeys "1"
End Sub
Sub remet()
Application.OnKey "a"
End Sub

'lSteph

"sycora" a écrit dans le message de news:
43d2163d$0$19705$
Bonjour

A=1
B=2
C=3

Est il possible qu'en tapant A dans une cellule ce soit 1 qui
apparaisse



et ainsi de suite, B ce soit 2 etc...............
Merci











Avatar
Jacky
Exemple ici:
http://cjoint.com/?bvogYwHPwb
JJ

"Jacky" a écrit dans le message de
news:
Bonjour,

Insertion/nom/ définir
Nom dans le classeur > A
Fait référence a:
þuil1!$A$1+Feuil1!$B$1
Ou
þuil1!$A$1*Feuil1!$B$1

Ou tous autres instructions

Sur la feuille, dans une cellule quelconque
=A
Donnera le résultat de A1+B1

Idem pour B

Salutations
JJ


Avatar
sycora
Merci à tous


"Jacky" a écrit dans le message de news:

Bonjour,

Insertion/nom/ définir
Nom dans le classeur > A
Fait référence a:
þuil1!$A$1+Feuil1!$B$1
Ou
þuil1!$A$1*Feuil1!$B$1

Ou tous autres instructions

Sur la feuille, dans une cellule quelconque
=A
Donnera le résultat de A1+B1

Idem pour B

Salutations
JJ

"sycora" a écrit dans le message de
news:43d22a4f$0$19704$
J'ai mal posé ma question, (A) n'est pas obligatoirement (1) "A"
représente

le résultat d'une opération, et "B" le résultat d'une autre...........
Donc en tapant A ou B je voudrais que le résultat de cette opération
s'affiche ................
Peut être que ce n'est pas possible !
Merci encore


"LSteph" a écrit dans le message de news:
ujo$$
Re,
voici exemple test set à réaffecter à "a " la macro toto la macro
remet
sert à réaffecter "a":

Sub test()
Application.OnKey "a", "toto"
End Sub
Sub toto()
Application.SendKeys "1"
End Sub
Sub remet()
Application.OnKey "a"
End Sub

'lSteph

"sycora" a écrit dans le message de news:
43d2163d$0$19705$
Bonjour

A=1
B=2
C=3

Est il possible qu'en tapant A dans une cellule ce soit 1 qui
apparaisse



et ainsi de suite, B ce soit 2 etc...............
Merci