Caractere - coduri

Închis
Apostolu
Mesaje: 285
Membru din: Joi Aug 20, 2009 4:05 pm

Caractere - coduri

Mesaj de Apostolu » Joi Oct 07, 2010 10:23 am

Cum poate fi aflat codul unui caracter dintr-un document Word ?
Direct din pagina respectiva !

Dr.Windows
Moderator
Moderator
Mesaje: 4570
Membru din: Vin Iul 31, 2009 7:32 am

Re: Caractere - coduri

Mesaj de Dr.Windows » Joi Oct 07, 2010 10:41 am

Incearca sa folosesti urmatorul cod VBA pe care il poti asocia unei combinatii de taste:

Cod: Selectaţi tot

Sub GetASCIICode()
    cLtr = Selection.Text
    If Len(cLtr) > 1 Then
        Application.StatusBar = "Trebuie selectat un SINGUR caracter!"
    Else
        Application.StatusBar = "Codul ASCII pentru caracterul : >" & cLtr & "< este : " & Asc(cLtr)
    End If
End Sub
In fisierul atasat codul VBA este actionat de combinatia Ctrl+G, iar mesajele sunt afisate in bara de stare a Word-ului... asa ca trebuie sa ai grija sa fie activata (in cazul in care nu mai este).
Tot ce ai de facut este sa selectezi un SINGUR caracter si apoi sa apesi combinatia "magica"... ;)
Nu aveţi permisiunea de a vizualiza fişierele ataşate acestui mesaj.

Apostolu
Mesaje: 285
Membru din: Joi Aug 20, 2009 4:05 pm

Re: Caractere - coduri

Mesaj de Apostolu » Joi Oct 07, 2010 11:11 am

Multumesc.
Merge :D
L-am facut buton, ca imi este mai simplu.
Acum sa vedem ce minuni descopar ca am ceva probleme cu un Chr(45) pe care macro nu-l recunoaste, dar il recunoaste wordul.

adof
Mesaje: 466
Membru din: Mie Iul 14, 2010 12:42 pm
Localitate: Sibiu

Re: Caractere - coduri

Mesaj de adof » Vin Iul 12, 2013 8:07 am

sal
cum aflu codul la tasta Delete

Dr.Windows
Moderator
Moderator
Mesaje: 4570
Membru din: Vin Iul 31, 2009 7:32 am

Re: Caractere - coduri

Mesaj de Dr.Windows » Mar Iul 16, 2013 1:38 pm

Din tabela de coduri: Key Code Constants (codul 46)... pentru ca tasta DEL nu este un caracter ca sa incerci codul de mai sus... ;)

adof
Mesaje: 466
Membru din: Mie Iul 14, 2010 12:42 pm
Localitate: Sibiu

Re: Caractere - coduri

Mesaj de adof » Mar Iul 16, 2013 10:06 pm

multumesc

Închis

Înapoi la “Visual Basic for Application (VBA) - Intrebari tehnice”