..|| Blog || Produkti/Storitve || MExcel || MDodatki || 300 nasvetov ||..

ASCII vrednost

Pomoč pri delu z MS Wordom

ASCII vrednost

OdgovorNapisal/-a RTM » To apr 28, 2020 5:40 pm

VBA makro ukaz vrne desetiško vrednost zapisa za utripačem:

Koda: Izberi vse
Public Sub KateriZnak()
MsgBox "ASCII vrednost: " & Asc(Selection)
End Sub

Iščem, guglam pa ne najdem rešitve, da bi namesto le enega znaka ustrezen ukaz vrnil vrednosti npr. za 5 znakov za utripačem.

Za vsako idejo, rešitev bom hvaležen :oops:
RTM
 
Prispevkov: 39
Pridružen: Po mar 16, 2015 4:29 pm



Matjazev.NET
 

Re: ASCII vrednost

OdgovorNapisal/-a admin » To apr 28, 2020 7:58 pm

Pozdravljeni,

Izbor je sestavljen iz enega ali več znakov in vse kar je potrebno narediti je, da se v zanki sprehodite skozi vse znake:
Koda: Izberi vse
Public Sub KateriZnak()
  Dim znak, i
 
  i = 1
  For Each znak In Selection.Characters
    MsgBox "ASCII vrednost znaka[" & i & " - " & znak & "] je " & Asc(znak)
    i = i + 1
  Next
End Sub
lp,
Matjaž Prtenjak
Administrator
admin
Site Admin
 
Prispevkov: 3560
Pridružen: Sr jul 20, 2005 10:06 pm

Re: ASCII vrednost

OdgovorNapisal/-a RTM » To apr 28, 2020 9:45 pm

G. Matjaž - najlepša hvala.

Potreboval sem 3 minute, da sem pogruntal kako makro deluje.
Preblisk in rešitev je bila "preprosta kot kranjska klobasa": treba je označiti besedilo!

Še 1x hvala in mirno karanteno :!:
Mladen
RTM
 
Prispevkov: 39
Pridružen: Po mar 16, 2015 4:29 pm


Vrni se na Word

Kdo je prisoten

Po forumu brska: 0 registriranih uporabnikov in 4 gostov

cron