VB SCRIPT i naša slova

Već sam jednom postavio pitanje i nisam dobio odgovor. To je bilo otprilike prije mjesec - dva dana. Da probam ponovo.

Dakle,

imam problem sa konkretno excelovim VB editorom i on se ogleda samo u nasim slovima. Da bi vam malo primakao dacu vam primjer. Ja zelim da napisem jednu malo macro kontrolu koja ce mi nase slovo "š" pokretanjem prebaciti u slovo s, znaci samo ukloniti kucicu iznad.

To otprilike izgleda ovako:

Sub utf8()


' š malo
Cells.Replace What:="š", Replacement:="s", LookAt:=xlPart, SearchOrder _
:=xlByRows, MatchCase:=True


End Sub

I ovo sve radi OK. Mozete i probati da bi se uvjerili. Znaci slova Š š Ž ž (veliko i malo š i veliko i malo ž) rade OK.

Problem je u tome što mi ne rade slova Đđ Čč Ćć.

Dakle isto je sve potpuno:

Sub utf8()


' č malo
Cells.Replace What:="č", Replacement:="c", LookAt:=xlPart, SearchOrder _
:=xlByRows, MatchCase:=True


End Sub

i nece.

Ukoliko bi neko imao bilo kakvu sugestiju koja bi rjesila ovaj moj problem, bio bih puno zahvalan ako bi je podijelio samnom.

Odavno pokushavam ovo rijesiti bezuspjesno

Omasio si forum

Uglavnom, problem ti je sto VB skripta nije unicode, ali karakteri Š š Ž ž mogu da prodju. Probaj da zamenis u poredjenu slova sa unicode hex vrednostima.

Hvala na odgovoru.

Bi li mi mogao malo pomoci oko prestavljanja hex karaktera. Mogu na netu naci tabelu hex karaktera, ali da li treba nesto dodati ispred u VB-u?

Hmmm, valjda nista Zameni Cells.Replace What:="š", sa Cells.Replace What:=&H353 i probaj da li radi.

NECE!!!

Tja, onda ne znam, ali palo mi nesto na pamet: koji font se koristi u dokumentu ?

Ljudi,

da li je moguce da niko nema odgovor na ovo pitanje??? Zar se niko nije susreo sa ovim?

Ja sam puno toga isprobao ali nikako da dodjem do rjeshenja.

Bilo kakva pomoc bi mi znachila.

HVALA

Da li ti je .vbs fajl snimljen kao utf-8? Ako jeste, pitanje je da li uopste moze, jer je uvek nekih problema sa vb6/vbscript-om. da li ti je obavezno da bude bas VBScript?

Btw, u tim situacijama kada "nece" sta se zapravo desi? Kakav je rezultat?

Potpis

Nebojsa Milanovic:
-Trumpa smatram vrhunskim predsednikom i voleo bih da živim u državi na čijem je on čelu
-Rusija ne laže, ne vodi osvajačke ratove
-Trump je svetla tačka u USA blatu
-Elon Musk, možda najpametniji i najtrezveniji Amerikanac

Jeste, snimljen je kao UTF-8.

Nije mi obavezno da bude VB script, ali ja ne znam drugi nacin kako da u ogromnom excel dokumentu iz jednog poteza izmjenim sve karaktere osim koristeci VB script.

U situacijama kada "nece" - nishta se ne desi, č ostane č! Ne promijeni se.

Nemam bash nikakvu ideju!

Ako je jedan fajl onda mozes u samom Excel-u sa search and replace. Ako je vise.. onda treba skripta/program. Mozes u VB-u praviti program pa onda pogledaj po forumu teme koje se ticu nasih slova u VB-u.
Ako stignem (a mala je sansa, jer ne znam ni ja napamet kako treba pa bih morao traziti) uradicu ti ja u vb.net-u, ako ti samo te zamene trebaju.

Potpis

Nebojsa Milanovic:
-Trumpa smatram vrhunskim predsednikom i voleo bih da živim u državi na čijem je on čelu
-Rusija ne laže, ne vodi osvajačke ratove
-Trump je svetla tačka u USA blatu
-Elon Musk, možda najpametniji i najtrezveniji Amerikanac

Meni to treba za vishe fajlova pa mi EXCEL nije kao opcija. Ako bi stigao pa i za 10 dana bi mi puno znacilo.

Hvala!

Evo sad videh ovu temicu, pa da probamo josh neshto... Pokusaj ovo:



Znam da u VB6 ChrW$ se koristi za wide karaktere, odnosno Unicode, ali ne znam kakvo je stanje sa VBScriptom, mada, ako je radjen kao i VB, onda je u osnovi unicode... Pokushaj ovako, pa mi javi, pa ako ne ide, napisatjemo neshto u VB na brzinu, valjda tjemo smuljati...

Potpis

- SKRati link - JaZaKraljevo.rs -

"I have never let my schooling interfere with my education." - Mark Twain