Jump to content

SUBIECTE NOI
« 1 / 5 »
RSS
PC game stream catre Nvidia Shiel...

Pompa de apa HEPU ?!

Vreau o masina electrica de tocat...

Cum ajunge remorca de tir inapoi ...
 Alt "Utilizator nou" pe T...

ULBS INFORMATICA

Index preturi

Boxa membrana tweeter infundata
 Am nevoie de poze cu un curcubeu

Whisky for Mac

Xiaomi 14 Gpay

Izolare zid exterior de scandura
 Dezinstalare drivere W11 23H3

Recomandare masina de spalat fiab...

BSOD din cauza Intel Audio DSP dr...

De ce sunt oamenii nostalgici
 

diacritice in vba..?

- - - - -
  • Please log in to reply
1 reply to this topic

#1
leroivroro

leroivroro

    New Member

  • Grup: Members
  • Posts: 1
  • Înscris: 03.10.2007
Salut.
Incerc sa fac un macro in vba care sa-mi caute un text ce contine si diacriticele romanesti. Problema este ca desi este setata limba romana in excel din task bar-ul din dreapta jos si la lansarea functiei "find" din meniu (Ctrl+F) mi le gaseste, la rularea macroului meu , nu mi le gaseste!! Cum pot remedia acest lucru?Am observat ca in inputbox nu sunt afisate unele diacritice (sh si tz nu apar pe cand i si a sunt corecte) Multumesc!
Sub test()
Dim x As String
x = InputBox("What Date?")
Cells.Find(What:=x).Select
End Sub


#2
Hato0be

Hato0be

    Junior Member

  • Grup: Members
  • Posts: 49
  • Înscris: 05.07.2006
Pentru a folosi diacriticile în Word/Excel din VBA poti aplică funcția ChrW care convertește codul unicode în caracter. Pentru a afla codurile unicode pentru diacritice poți folosi aplicația standard windows charmap și calc pentru a converti valoarea hexazecimală în zecimalș. Funcția ChrW ia ca parametru, codul zecimal al caracterului unicode.

Și exemplul tău de mai sus ia următoarea formă

Sub test()
Dim x As String
  x = " c" & ChrW(259) & "su" & ChrW(355) & ChrW(259)
  ' x= "căsuță"
  Cells.Find(What:=x).Select
End Sub


Anunturi

Bun venit pe Forumul Softpedia!

0 user(s) are reading this topic

0 members, 0 guests, 0 anonymous users

Forumul Softpedia foloseste "cookies" pentru a imbunatati experienta utilizatorilor Accept
Pentru detalii si optiuni legate de cookies si datele personale, consultati Politica de utilizare cookies si Politica de confidentialitate