Faire correspondre lettre à symbole ?
Utilisateur anonyme
-
Raymond PENTIER Messages postés 59017 Date d'inscription Statut Contributeur Dernière intervention -
Raymond PENTIER Messages postés 59017 Date d'inscription Statut Contributeur Dernière intervention -
Bonjour,
Je désire faire correspondre les lettres de l'alphabet à un symbole précis. Par exemple :
A --> +
B --> "
C --> *
Comment pourrais-je faire cela. Existe-t-il un programme ? Ou comment faire cela dans un classeur ? La technique m'est égale, tant que je peux écrire des textes dont les lettres sont remplacées par des symboles.
Merci d'avance,
Chris.
Je désire faire correspondre les lettres de l'alphabet à un symbole précis. Par exemple :
A --> +
B --> "
C --> *
Comment pourrais-je faire cela. Existe-t-il un programme ? Ou comment faire cela dans un classeur ? La technique m'est égale, tant que je peux écrire des textes dont les lettres sont remplacées par des symboles.
Merci d'avance,
Chris.
A voir également:
- Lettre a symbole
- Clavier iphone chiffre et lettre - Guide
- Symbole poisson témoin de jéhovah - Accueil - Maison
- Telecharger macro convertir chiffre en lettre excel - Télécharger - Tableur
- Symbole spéciaux - Guide
- Caractere speciaux lettre - Guide
6 réponses
Tu tapes la totalité de ton texte.
Tu cliques sur l'icône en forme de jumelles Rechercher et sélectionner
Tu choisis Remplacer
Dans la fenêtre Rechercher tu saisis la lettre "A", dans la fenêtre Remplacer par tu saisis le symbole "+"
Tu cliques sur le bouton Remplacer tout
Et tu recommences pour chaque lettre.
Tu cliques sur l'icône en forme de jumelles Rechercher et sélectionner
Tu choisis Remplacer
Dans la fenêtre Rechercher tu saisis la lettre "A", dans la fenêtre Remplacer par tu saisis le symbole "+"
Tu cliques sur le bouton Remplacer tout
Et tu recommences pour chaque lettre.
bonjour à tous les deux
une fonction permettant de coder ton texte à mettre dans un module général (Alt-F11 puis insertion/module et copier/coller) et a utiliser comme une fonction excel
sur la feuille
la plage A2:A54 contient les lettres A .. Z a .. z et espace
la plage B2:B54 contient les codes +-*/.!:;, ......
bonne suite
une fonction permettant de coder ton texte à mettre dans un module général (Alt-F11 puis insertion/module et copier/coller) et a utiliser comme une fonction excel
sur la feuille
la plage A2:A54 contient les lettres A .. Z a .. z et espace
la plage B2:B54 contient les codes +-*/.!:;, ......
Public Function coder(s As String) As String
Dim ls As Long, r As Long, li As Long
Dim ss As String, c As String
ss = ""
ls = Len(s)
For r = 1 To ls
c = Mid(s, r, 1)
For li = 2 To 54
If c = Sheets(1).Cells(li, 1) Then
ss = ss & Sheets(1).Cells(li, 2).Value
Exit For
End If
Next li
Next r
coder = ss
End Function
bonne suite
ou bien sans le tableau des correspondances dans la feuille
bonne suite
Const letts = " ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyz"
Const codes = "&+-*/,;:!?.§$£µ%=)([]°{}#_~+-*/,;:!?.§$£µ%=)([]°{}#\~"
Public Function kode(s As String) As String
Dim ls As Long, r As Long, rc As Long
Dim ss As String, c As String
ss = ""
ls = Len(s)
For r = 1 To ls
c = Mid(s, r, 1)
rc = InStr(1, letts, c)
If rc > 0 Then
ss = ss & Mid(codes, rc, 1)
End If
Next r
kode = ss
End Function
bonne suite
Vous n’avez pas trouvé la réponse que vous recherchez ?
Posez votre question
Mais comme tu n'as pas expliqué quel était le but de la manoeuvre, je me suis borné à te fournir une méthode.
Moi, quand je veux rendre un texte illisible, je me contente de le sélectionner et de choisir la police Symbol ou Webdings ; mais telle n'était pas ta question !