les caractères spéciaux

Bonjour tout le monde
j'ai découvert récement que l'on pouvais obtenir le caractere Ø en tapant alt157. je sais c'est tout béta, mais bon. j'ai pensé que je pouvais obtenir la liste de ces caracteres en faisant un petit pout de code genre enregistrement de macro, hé ben non, ça donne

Code:

---

1 2 3 4 5 6

Sub Macro1() ActiveCell.FormulaR1C1 = "?" Range("A2").Select ActiveCell.FormulaR1C1 = "?" Range("A3").Select End Sub

---

et donc a la restitution, je n'obtiens rien
j'ai essayé

Code:

---

1 2 3 4 5 6

Sub macro2() For i = 1 To 256 Cells(i, 1) = i Cells(i, 2) = Chr(i) Next i End Sub

---

mais que nenni, pas de Ø dans cette série là
quelqu'un aurait il une idée, ou tout au moins ou je peut pécher l'info, je n'ai rien vu dans les faq ou la recherche.
merci

Tu as essayé chr(248) ?
MsgBox Chr(248) me donne bien Ø
A+

salut ouskel
effectivement, mais le tien est plus petit que le mien :mouarf3: :P
chr(248) = ø
et alt157 = Ø
je ne sais pas ce que sont ces caracteres

L'un correspond aux codes ascii (chr), l'autre à un code ultra connu et utilisé mais dont le nom m'échappe depuis une seconde :oops: Quelque chose-code... Zut ! Je ne connais que ça. Je reviens dès que ça me revient :mouarf:
A+

Me rev'là
Je dois ajouter "étendu" pour codes ascii.
Vas dans l'aide de l'explorateur Windows, fais une recherche sur Ascii et sur Keycode. Tu vas en apprendre, des choses :mouarf:

PS - Au fait, j'ai trouvé pour avoir la même taille : Ø :yaisse2:

Bonjour Alsimbad, Ouskelnor

pour mettre mon p'tit grain de sable, le petit 248 est un code "unicode"

quand au grand 147, j'ai marqué "ANSI" mais c'est p'tet "ASCII étendu" comme l'indique Ouskelnor (je confond toujours)

Ci joint les cartes des codes

On peut aussi trouver les unicodes avec "charmap.exe"

Bonne soirée

Bonsoir michel
bien, j'avais bien suivi la piste ouskel et découvert les ansi étendu, ton tableau est bien, c'est bien de ça qu'on parle, et manifestement, ça permet de faire tout les signes du monde. alor question subsidiaire
avec ma petite boucle de départ, comment je peux faire pour simuler le alt? hein ? on peut peut etre le simuler avec un chr

Code:

---

1 2 3 4 5 6 7

Sub macro2() For i = 1 To 10000 Cells(i, 1) = i Cells(i, 2) = Chr(le n° du alt) & i ? Next i End Sub

---

je vais essayer, je vous dirais. merci

Non, j'ai déjà essayé depuis que Alt existe sur les claviers...
Si quelqu'un a trouvé quelque chose avec Onkey, qu'il le dise ! Nom de gu !
Mon tableau à moi ! Pièce jointe 13764 Y'a pas de raison ! :mouarf:

PS - Si tu obtiens bien un petit cochon rose avec Alt 255, alors c'est bon !...

Bon, j'ai essayé

Code:

---

1 2 3 4 5 6 7

Sub macro2() For i = 1 To 255 Cells(i, 1) = i Cells(i, 2) = Chr(i) & 157 If Cells(i, 2) = "Ø" Then MsgBox i Next i End Sub

---

hé ben non, pas de réponse, je ne sais pas comment simuler la touche alt
pour le cochon rose, j'ai pas eu ton code asci, tu l'a roulé avec quoi ?:lefou: