+ Reply to Thread
Results 1 to 57 of 57

Need a Russian Number-to-Text description macro

  1. #1
    Forum Contributor
    Join Date
    12-01-2007
    Location
    USA-North Carolina
    MS-Off Ver
    MS Office 2007
    Posts
    2,432

    Need a Russian Number-to-Text description macro

    Hi,

    I have an english version of something called "Spellnumber" which takes numbers like "3042.50" and writes out something like "Three Thousand Forty Two Dollars and 50 cents". But i need something like this for Russian.

    Is there anyone out there that can help?
    Last edited by welchs101; 06-12-2020 at 07:37 PM.

  2. #2
    Valued Forum Contributor BMV's Avatar
    Join Date
    01-13-2020
    Location
    St-Petersburg, Russia
    MS-Off Ver
    2013-2016
    Posts
    1,063

    Re: Need a Russian Number-to-Text description macro

    I think it must be modified but you can try
    https://www.planetaexcel.ru/techniques/7/46/

  3. #3
    Forum Contributor
    Join Date
    12-01-2007
    Location
    USA-North Carolina
    MS-Off Ver
    MS Office 2007
    Posts
    2,432

    Re: Need a Russian Number-to-Text description macro

    it looks like it might be something i can use but to be honest i am not sure how to even test this to see if it works.

    There is no English to really help out.

  4. #4
    Valued Forum Contributor BMV's Avatar
    Join Date
    01-13-2020
    Location
    St-Petersburg, Russia
    MS-Off Ver
    2013-2016
    Posts
    1,063

    Re: Need a Russian Number-to-Text description macro

    Do you need some translation or any else help?
    another script
    Last edited by BMV; 06-14-2020 at 12:35 AM.

  5. #5
    Forum Contributor
    Join Date
    12-01-2007
    Location
    USA-North Carolina
    MS-Off Ver
    MS Office 2007
    Posts
    2,432

    Re: Need a Russian Number-to-Text description macro

    hi, i could definitely use some translation help on this last macro you sent out. not sure how to use it. thanks....really i appreciate your help.

  6. #6
    Forum Contributor
    Join Date
    12-01-2007
    Location
    USA-North Carolina
    MS-Off Ver
    MS Office 2007
    Posts
    2,432

    Re: Need a Russian Number-to-Text description macro

    i also wonder if i have the right character set ....because even though i dont know Russian the characters that i am
    seeing do not look like Russian characters.

  7. #7
    Forum Contributor
    Join Date
    12-01-2007
    Location
    USA-North Carolina
    MS-Off Ver
    MS Office 2007
    Posts
    2,432

    Re: Need a Russian Number-to-Text description macro

    i am enclosing a post from the last macro ....i am trying to show the characters that are shown when i type in 4987.25
    Attached Images Attached Images

  8. #8
    Valued Forum Contributor BMV's Avatar
    Join Date
    01-13-2020
    Location
    St-Petersburg, Russia
    MS-Off Ver
    2013-2016
    Posts
    1,063

    Re: Need a Russian Number-to-Text description macro

    Oh . The code page is real problem. Because of VBA don't use Unicode the Cyrillic text. The standard way for Add-ins is keeping text constant on the sheet. I will try to prepare example.

    I converted all string to unicode.
    Attached Files Attached Files
    Last edited by BMV; 06-15-2020 at 12:58 PM.

  9. #9
    Forum Contributor
    Join Date
    12-01-2007
    Location
    USA-North Carolina
    MS-Off Ver
    MS Office 2007
    Posts
    2,432

    Re: Need a Russian Number-to-Text description macro

    Wow......you spent a lot of time on this i really appreciate it.

    I wish i spoke russian so i could do some of this myself so you didnt have to but i really do appreciate it.

    Few comments:
    Your code uses rubles and kopecks. In my situation i am going to have currencies of USD and Euros.
    In USD case its Dollar(s) and Cent(s)
    In Euros case its Euro(s) and Cent(s)

    Also, i tried using your macro as follows. I created a sub-procedure and i called your function from this procedure. I then tried to output the value
    returned by your function to the screen........enclosed is a screen shot of the output. Dont know why its doing this.

    Again, i really do appreciate you spending time on this......
    Attached Images Attached Images

  10. #10
    Valued Forum Contributor BMV's Avatar
    Join Date
    01-13-2020
    Location
    St-Petersburg, Russia
    MS-Off Ver
    2013-2016
    Posts
    1,063

    Re: Need a Russian Number-to-Text description macro

    welchs101. Message box can't work with unicode string. In the case of Regional operation setting set to Russian for non Unicode program
    16-06-2020 6-49-51.jpg
    it works but it is not universal way because on the other PC settings can be different and ???? will be in box again. So if you want popup message you have to use worksheet or userform or Popup(msg, timeout, title, buttons) object
    try
    Please Login or Register  to view this content.
    there must be arabic ب


    Dollar and Euro - i think i can adopt function. it's not so difficult to add extra parameter for choose currency.
    Attached Files Attached Files
    Last edited by BMV; 06-16-2020 at 01:55 AM.

  11. #11
    Forum Contributor
    Join Date
    12-01-2007
    Location
    USA-North Carolina
    MS-Off Ver
    MS Office 2007
    Posts
    2,432

    Re: Need a Russian Number-to-Text description macro

    hi, wow you really are good.

    One thing i wanted to mention. So my plan was to use your macro to help me convert something
    like this 4987.25 into written word in Russian that i can paste into a cell in a worksheet.

    i downloaded your lasted macro and i created this code in Module2
    Please Login or Register  to view this content.
    but for some reason A34 never updates........am i doing something wrong?

  12. #12
    Valued Forum Contributor BMV's Avatar
    Join Date
    01-13-2020
    Location
    St-Petersburg, Russia
    MS-Off Ver
    2013-2016
    Posts
    1,063

    Re: Need a Russian Number-to-Text description macro

    3 - is not included to the parameters list 0,1,2 :-)

  13. #13
    Forum Contributor
    Join Date
    12-01-2007
    Location
    USA-North Carolina
    MS-Off Ver
    MS Office 2007
    Posts
    2,432

    Re: Need a Russian Number-to-Text description macro

    i appologize.....i cant believe i made such a mistake.

    I have to review the soln a little more........but first glance its working.

    is it possible you could explain a little about what you did..........i see the code and to be honest i have not seen this kinda of stuff before.

  14. #14
    Valued Forum Contributor BMV's Avatar
    Join Date
    01-13-2020
    Location
    St-Petersburg, Russia
    MS-Off Ver
    2013-2016
    Posts
    1,063

    Re: Need a Russian Number-to-Text description macro

    What part you would like to understand?

  15. #15
    Forum Expert
    Join Date
    10-06-2017
    Location
    drevni ruchadlo
    MS-Off Ver
    old
    Posts
    1,693

    Re: Need a Russian Number-to-Text description macro

    Quote Originally Posted by welchs101 View Post
    ... the characters that i am seeing do not look like Russian characters ...
    Why don't you install the language add-in adequate for your windows version ?

    https://support.microsoft.com/en-us/...language-packs
    https://support.microsoft.com/en-us/...ge-preferences

  16. #16
    Forum Contributor
    Join Date
    12-01-2007
    Location
    USA-North Carolina
    MS-Off Ver
    MS Office 2007
    Posts
    2,432

    Re: Need a Russian Number-to-Text description macro

    i have been busy all day today i will review again the macro and try and come up with a better specific questions. thanks again.

  17. #17
    Forum Contributor
    Join Date
    12-01-2007
    Location
    USA-North Carolina
    MS-Off Ver
    MS Office 2007
    Posts
    2,432

    Re: Need a Russian Number-to-Text description macro

    One thing right away that i just dont understand are the big unicode arrays like this one

    Please Login or Register  to view this content.
    what is this doing exactly and why is it necessary

  18. #18
    Forum Expert
    Join Date
    10-06-2017
    Location
    drevni ruchadlo
    MS-Off Ver
    old
    Posts
    1,693

    Re: Need a Russian Number-to-Text description macro

    32 => space
    others => these numbers are the codes of letters of the Russian alphabet

  19. #19
    Forum Contributor
    Join Date
    12-01-2007
    Location
    USA-North Carolina
    MS-Off Ver
    MS Office 2007
    Posts
    2,432

    Re: Need a Russian Number-to-Text description macro

    Ok...but why the array within an array....

    and why things like this

    Please Login or Register  to view this content.

    also, what does this mean/do in the code
    Please Login or Register  to view this content.

  20. #20
    Forum Contributor
    Join Date
    12-01-2007
    Location
    USA-North Carolina
    MS-Off Ver
    MS Office 2007
    Posts
    2,432

    Re: Need a Russian Number-to-Text description macro

    oh, forgot to ask how did you know 32 was for a space?

  21. #21
    Valued Forum Contributor BMV's Avatar
    Join Date
    01-13-2020
    Location
    St-Petersburg, Russia
    MS-Off Ver
    2013-2016
    Posts
    1,063

    Re: Need a Russian Number-to-Text description macro

    @porucha vevrku Look at the #10. I have explained the reason. Language pack allow to change GUI language but Regional settings are part of core.
    As you see i work with English version and Russian local regional settings.

    @welchs101 First of all i converted all word to unicode cod per character For every word a get set of codes and Array(1089, 1090, 1086, 32) is "сто " (100 in russian)
    array that include arrays only for process to decode to words and create string array with set of Russian words
    There is code that must be readable
    Please Login or Register  to view this content.
    RNull = ChrW(1085) & ChrW(1086) & ChrW(1083) & ChrW(1100) & ChrW(32) - is "ноль " (zero in russian) and this way is analog of this process but it was easy to do it so for short single word.

    how i know code of characters? - it's not difficult AskW function return this code and i use small helper to generate text for vba
    Please Login or Register  to view this content.
    yyou can use https://unicode-table.com also.
    Last edited by BMV; 06-17-2020 at 03:25 AM.

  22. #22
    Forum Contributor
    Join Date
    12-01-2007
    Location
    USA-North Carolina
    MS-Off Ver
    MS Office 2007
    Posts
    2,432

    Re: Need a Russian Number-to-Text description macro

    Can you walk me through how the following is true:
    ChrW(1085) & ChrW(1086) & ChrW(1083) & ChrW(1100) & ChrW(32) - is "ноль "

    i went to the unicode website and from what i can tell 1085 is not any of these charcters => "ноль "

    so i am missing something

  23. #23
    Forum Contributor
    Join Date
    12-01-2007
    Location
    USA-North Carolina
    MS-Off Ver
    MS Office 2007
    Posts
    2,432

    Re: Need a Russian Number-to-Text description macro

    In looking at the code i have a question/observation:


    Please Login or Register  to view this content.

    From the above code....it seems like
    Array() = ""
    Array(1089, 1090, 1086, 32)=" "
    Array(1076, 1074, 1077, 1089, 1090, 1080, 32)=" "
    etc.....

    when i use the unicode link you sent i dont get those characters so i am thinking i am not looking at correct code. For example...the code 1089...

    i am enclosing a pic from the unicode website of what i think cod 1089 should be... see enclosed pic
    Attached Images Attached Images

  24. #24
    Forum Contributor
    Join Date
    12-01-2007
    Location
    USA-North Carolina
    MS-Off Ver
    MS Office 2007
    Posts
    2,432

    Re: Need a Russian Number-to-Text description macro

    also, in english what does this translate to

    'RHundreds= Array("", " ", " ", " ", " ", " ", " ", " ", " ", " ")

  25. #25
    Valued Forum Contributor BMV's Avatar
    Join Date
    01-13-2020
    Location
    St-Petersburg, Russia
    MS-Off Ver
    2013-2016
    Posts
    1,063

    Re: Need a Russian Number-to-Text description macro

    Your mistake you search hex values but not dec
    Hex 1089 = 4233

    https://unicode-table.com/en/search/?q=1085 - н
    https://unicode-table.com/en/search/?q=1086 - о
    https://unicode-table.com/en/search/?q=1083 - л
    https://unicode-table.com/en/search/?q=1100 - ь
    32 space
    "ноль "


    https://unicode-table.com/en/search/?q=1089

    'RHundreds= Array("", " ", " ", " ", " ", " ", " ", " ", " ", " ")
    I insert module to #21 exactly for sow how it looks like for me
    Original line is
    'RHundreds= Array("", "сто ", "двести ", "триста ", "четыреста ", "пятьсот ", "шестьсот ", "семьсот ", "восемьсот ", "девятьсот ")
    but because VBA editor limitation you see it with wrong characters
    it is only comment and could be deleted at all
    Last edited by BMV; 06-17-2020 at 08:46 AM.

  26. #26
    Forum Contributor
    Join Date
    12-01-2007
    Location
    USA-North Carolina
    MS-Off Ver
    MS Office 2007
    Posts
    2,432

    Re: Need a Russian Number-to-Text description macro

    thanks....i figured i was doing something wrong. i am swamped with work right now but i will review your post more later.
    thanks i really appreciate your responding.

  27. #27
    Forum Contributor
    Join Date
    12-01-2007
    Location
    USA-North Carolina
    MS-Off Ver
    MS Office 2007
    Posts
    2,432

    Re: Need a Russian Number-to-Text description macro

    i am trying to understand a little more about your code and how it works. i wanted to try and understand the arrays and the Function UniCodeToStr so i put
    a msgbox in the function to that i could then halt program operation and look at the local variables.........but for some reason the msgbox("check") never
    shows up..........what am i doing wrong




    Please Login or Register  to view this content.

  28. #28
    Forum Contributor
    Join Date
    12-01-2007
    Location
    USA-North Carolina
    MS-Off Ver
    MS Office 2007
    Posts
    2,432

    Re: Need a Russian Number-to-Text description macro

    apparently there is a lot about this macro i do not understand.....for some reason when i comment out the code below

    Please Login or Register  to view this content.
    the msgbox("Check") just continues to show up and i cant get rid of it....its like it just keeps running the macro..........why?

  29. #29
    Valued Forum Contributor BMV's Avatar
    Join Date
    01-13-2020
    Location
    St-Petersburg, Russia
    MS-Off Ver
    2013-2016
    Posts
    1,063

    Re: Need a Russian Number-to-Text description macro

    For debug it's better to use "stop" operator or break point (F9)

    The PopUp function should be used only for message in unicode. It is not standard method and in my file i use it on the worksheet and message will be every cell calculation.

  30. #30
    Forum Contributor
    Join Date
    12-01-2007
    Location
    USA-North Carolina
    MS-Off Ver
    MS Office 2007
    Posts
    2,432

    Re: Need a Russian Number-to-Text description macro

    hi BMV, take a look at post 9:42pm where i talk about putting msgbox in UniCodeToStr procedure............any idea why dialog box is not showing up?

    Also, how to remove the popup from happening?

  31. #31
    Forum Contributor
    Join Date
    12-01-2007
    Location
    USA-North Carolina
    MS-Off Ver
    MS Office 2007
    Posts
    2,432

    Re: Need a Russian Number-to-Text description macro

    ok...so i used the "Stop" in the code and that seems to work well.....

    i had a question about this code below
    Please Login or Register  to view this content.
    the first time through the loop i stop the code and i see that
    Please Login or Register  to view this content.
    is equal to For J = 0 to -1
    where / how does the minus 1 come from?

  32. #32
    Valued Forum Contributor BMV's Avatar
    Join Date
    01-13-2020
    Location
    St-Petersburg, Russia
    MS-Off Ver
    2013-2016
    Posts
    1,063

    Re: Need a Russian Number-to-Text description macro

    ubound(array()) = -1

  33. #33
    Forum Contributor
    Join Date
    12-01-2007
    Location
    USA-North Carolina
    MS-Off Ver
    MS Office 2007
    Posts
    2,432

    Re: Need a Russian Number-to-Text description macro

    i wonder why that equals -1..........did not know that..........

    also, how to remove the popup from your code...........do i just comment it out?

  34. #34
    Forum Contributor
    Join Date
    12-01-2007
    Location
    USA-North Carolina
    MS-Off Ver
    MS Office 2007
    Posts
    2,432

    Re: Need a Russian Number-to-Text description macro

    can you explain what razrR, razrD, and razrE are and how they are used...........not sure i understand these

  35. #35
    Forum Contributor
    Join Date
    12-01-2007
    Location
    USA-North Carolina
    MS-Off Ver
    MS Office 2007
    Posts
    2,432

    Re: Need a Russian Number-to-Text description macro

    in looking at razrR,D and E: I used a russian tranlator program to give me what the values are and below is a picture of what i found.
    The cells with red text are "questions" i have. For example......in all the arrays you have like million, million and then millions........
    except for Thousand......for Thousand you have "Thousand, Thousands, Thousand"......for thousand you have plural 2nd and not 3rd like in all the others.

    Also, euro is singular for all 3 values....is this right?
    Attached Images Attached Images

  36. #36
    Forum Contributor
    Join Date
    12-01-2007
    Location
    USA-North Carolina
    MS-Off Ver
    MS Office 2007
    Posts
    2,432

    Re: Need a Russian Number-to-Text description macro

    i will be honest......really stuggling to figure out your code.....your just too good......i thought i was "ok" at excel coding but i guess i am just still a novice.

    the for -loop below........
    Please Login or Register  to view this content.
    i put a msgbox statement in their to help figure out whats going on .......and to my surprise the for loop executes TO MANY TIMES....i dont understand
    why the for loop is executing so many times.

  37. #37
    Forum Contributor
    Join Date
    12-01-2007
    Location
    USA-North Carolina
    MS-Off Ver
    MS Office 2007
    Posts
    2,432

    Re: Need a Russian Number-to-Text description macro

    ok, i think i figured out someething.........i removed your code from the file you had it in....because your
    file had all these random number generators and so i think the function was being accessed by these worksheet
    calls.............now i get the correct number of times through the for-loop

  38. #38
    Forum Expert
    Join Date
    10-06-2017
    Location
    drevni ruchadlo
    MS-Off Ver
    old
    Posts
    1,693

    Re: Need a Russian Number-to-Text description macro

    Quote Originally Posted by welchs101 View Post
    ... I used a russian translator program to give me what the values are and below is a picture ...
    ... you have like million, million and then millions........
    ... for thousand you have plural 2nd and not 3rd like in all the others ...

    You need to read about something that is absent in English language, i.e. about the "change of words by cases and types" (all Slavic languages) - word endings are different depending on the grammatical (and natural) gender and the case (circumstances of the event) in which they are used.

    Besides, you must remember the following:
    Attached Images Attached Images

  39. #39
    Forum Contributor
    Join Date
    12-01-2007
    Location
    USA-North Carolina
    MS-Off Ver
    MS Office 2007
    Posts
    2,432

    Re: Need a Russian Number-to-Text description macro

    Any help you can provide on this formula i would appreciate. even if its just a over view of what your doing.

    Please Login or Register  to view this content.


    does your popup function allow me to show the value of "m" as one iterates through the for-loop?

  40. #40
    Valued Forum Contributor BMV's Avatar
    Join Date
    01-13-2020
    Location
    St-Petersburg, Russia
    MS-Off Ver
    2013-2016
    Posts
    1,063

    Re: Need a Russian Number-to-Text description macro

    razrR, razrD, and razrE
    it's temporary arrays and values as you wrote in #35 but for russian it's 3 diiferent value depend on digits
    1000 - one thousand - одна тысяча
    2000 - two thousands - две тысячи
    ---
    5000 - five thousands - пять тысяч
    ---

    and the same for currency but not for EURO
    1 Доллар - Евро
    2 Доллара - Евро
    ---
    5 Долларов- Евро
    ---

  41. #41
    Forum Contributor
    Join Date
    12-01-2007
    Location
    USA-North Carolina
    MS-Off Ver
    MS Office 2007
    Posts
    2,432

    Re: Need a Russian Number-to-Text description macro

    so just to be clear....the thousands and the euro highlighted in red........are ok?

  42. #42
    Forum Contributor
    Join Date
    12-01-2007
    Location
    USA-North Carolina
    MS-Off Ver
    MS Office 2007
    Posts
    2,432

    Re: Need a Russian Number-to-Text description macro

    Hi, i have been going through the main formula in the program. I am making progress but its slow.

    I was wondering if you could describe the thoughts behind this part of the formula

    Please Login or Register  to view this content.

  43. #43
    Valued Forum Contributor BMV's Avatar
    Join Date
    01-13-2020
    Location
    St-Petersburg, Russia
    MS-Off Ver
    2013-2016
    Posts
    1,063

    Re: Need a Russian Number-to-Text description macro

    There is more linguistic then VBA
    The original Runits array was
    Runits = Array("", "один ", "два ", "три ", "четыре ", "пять ", "шесть ", "семь ", "восемь ", "девять ", "", "одна ", "две ")
    For me it is not easy to explain but i will try.
    There is different words for 1 or 2 . We say "один грамм" (odin gramm - One gram) but "одна тонна" (odna tonna - one ton)
    "два карандаша" (dva karandasha - two pencils ) but "две ручки" (dve ruchki - two pens)

    now look at the calculation
    rub = "000000000001000.00"
    Runits(CInt(Mid(rub, I + 2, 1)) + IIf(I = Len(rub) - 5 And CInt(Mid(rub, I + 2, 1)) < 3, 10, 0)))
    when i =10 Mid(rub, I + 2, 1) = 1
    Runits(CInt("1") + IIf(10 = Len(rub) - 5 And CInt("1") < 3, 10, 0)))

    CInt("1") < 3 is condition for that i described before for 1 and 2
    7 = Len(rub) - 5 is conditional for thousands
    Runits(1 + IIf(true And true, 10, 0)))
    Runits(1 + 10) and it is "одна"

    for 1000000
    the condition I= Len(rub) - 5 is false and Runits(1 + 0) will be "один"

  44. #44
    Forum Contributor
    Join Date
    12-01-2007
    Location
    USA-North Carolina
    MS-Off Ver
    MS Office 2007
    Posts
    2,432

    Re: Need a Russian Number-to-Text description macro

    so your right i dont fully understand the Linguistic aspect of this but your explanation does help. thanks. I just did not see the "logic" to what you
    were doing so i thought perhaps i was not interpreting the code correctly.

    thanks.

    Hey, i also need to do the exact same thing for the Ukraine Language as well..........is this something you can help with? I will start another thread for
    this but wanted to know if you know this one as well.

  45. #45
    Valued Forum Contributor BMV's Avatar
    Join Date
    01-13-2020
    Location
    St-Petersburg, Russia
    MS-Off Ver
    2013-2016
    Posts
    1,063

    Re: Need a Russian Number-to-Text description macro

    There is source http://www.excelworld.ru/forum/3-990...-16-1396153214
    You can use first file from #3 Message.

  46. #46
    Forum Contributor
    Join Date
    12-01-2007
    Location
    USA-North Carolina
    MS-Off Ver
    MS Office 2007
    Posts
    2,432

    Re: Need a Russian Number-to-Text description macro

    hi,

    in using your procedure i changed the name of the procedure to "Russian_SpellNumber" and used the code below:

    Please Login or Register  to view this content.
    but this code fails because of the currency_num

    i have tried declaring it as integer , double and long....all fail....what am i doing wrong?

  47. #47
    Forum Contributor
    Join Date
    12-01-2007
    Location
    USA-North Carolina
    MS-Off Ver
    MS Office 2007
    Posts
    2,432

    Re: Need a Russian Number-to-Text description macro

    such an idiot i am............i for got that the "$" denotes a declaration of a string variable.

    see function declaration below

    Please Login or Register  to view this content.
    for some reason and i dont know why.........i saw the $ and assumed it was just part of the "name" of the variable. I guess because i dont declare
    variables in this way..........anyway, if i use the appropriate variable declarations i get the program to work just fine

    Please Login or Register  to view this content.

  48. #48
    Forum Contributor
    Join Date
    12-01-2007
    Location
    USA-North Carolina
    MS-Off Ver
    MS Office 2007
    Posts
    2,432

    Re: Need a Russian Number-to-Text description macro

    i looked at the Ukraine code....in the link you sent me......it does not have the unicode stuff that will need and i cant do it myself. i wish i could.

    i will start another thread for this. thanks again!!!!!!!!!!!!!!!!!

  49. #49
    Forum Contributor
    Join Date
    12-01-2007
    Location
    USA-North Carolina
    MS-Off Ver
    MS Office 2007
    Posts
    2,432

    Re: Need a Russian Number-to-Text description macro

    Hey, i am trying to get the Russian "H" like you mentioned in this post#25 and i cant figure out what value to look for. If look up 1085 its not right and if i look 4229 its not right...what am i doing wrong?

  50. #50
    Forum Contributor
    Join Date
    12-01-2007
    Location
    USA-North Carolina
    MS-Off Ver
    MS Office 2007
    Posts
    2,432

    Re: Need a Russian Number-to-Text description macro

    ok, guess i am a little confused by the numbers that are in the Arrays......are these decimal numbers or hex numbers?

  51. #51
    Valued Forum Contributor BMV's Avatar
    Join Date
    01-13-2020
    Location
    St-Petersburg, Russia
    MS-Off Ver
    2013-2016
    Posts
    1,063

    Re: Need a Russian Number-to-Text description macro

    Russian "Н" - 1053 . All arrays in decimal unicode.

  52. #52
    Forum Contributor
    Join Date
    12-01-2007
    Location
    USA-North Carolina
    MS-Off Ver
    MS Office 2007
    Posts
    2,432

    Re: Need a Russian Number-to-Text description macro

    Thanks.

    I used the code and tested it by giving some of the output to someone who spoke Russian.

    They did find these 3 mistakes but i wanted to ask you what you thought:




    238,54 - Двести трибцать восемь долларов 54 цента. Its a mistake like in ENG Thirdy instead of Thirty. This word must be тридцать.

    5847,31 - Пять тысяч восемьсот соро семь долларов 31 цент. The same mistake. Like Fort instead of Forty. Must be сорок.

    153909,36 - Сто пятьдесят три тысячи девятьсост девять долларов 36 центов. The same mistake. Like Nine hundrerd instead of Nine hundred.
    Must be девятьсот.

  53. #53
    Forum Expert
    Join Date
    10-06-2017
    Location
    drevni ruchadlo
    MS-Off Ver
    old
    Posts
    1,693

    Re: Need a Russian Number-to-Text description macro

    Quote Originally Posted by welchs101 View Post
    ... i am a little confused by the numbers that are in the Arrays ...
    Unicode numbers for the Russian alphabet.
    Attached Files Attached Files

  54. #54
    Valued Forum Contributor BMV's Avatar
    Join Date
    01-13-2020
    Location
    St-Petersburg, Russia
    MS-Off Ver
    2013-2016
    Posts
    1,063

    Re: Need a Russian Number-to-Text description macro

    Strange i have checked and it is correct for me
    22-06-2020 14-07-50.jpg I use last combo Rus and Ukr function.
    Attached Files Attached Files

  55. #55
    Forum Contributor
    Join Date
    12-01-2007
    Location
    USA-North Carolina
    MS-Off Ver
    MS Office 2007
    Posts
    2,432

    Re: Need a Russian Number-to-Text description macro

    Very strange. i will check with the new program.

  56. #56
    Forum Contributor
    Join Date
    12-01-2007
    Location
    USA-North Carolina
    MS-Off Ver
    MS Office 2007
    Posts
    2,432

    Re: Need a Russian Number-to-Text description macro

    program output is Fine......for both programs the output is fine.........my mistake

  57. #57
    Valued Forum Contributor BMV's Avatar
    Join Date
    01-13-2020
    Location
    St-Petersburg, Russia
    MS-Off Ver
    2013-2016
    Posts
    1,063

    Re: Need a Russian Number-to-Text description macro

    Oh. nice. I thing about more comact solution and there is one option to use split in stand of arrays for example
    Please Login or Register  to view this content.
    But it is about useless.
    Last edited by BMV; 06-22-2020 at 08:32 AM.

+ Reply to Thread

Thread Information

Users Browsing this Thread

There are currently 1 users browsing this thread. (0 members and 1 guests)

Similar Threads

  1. [SOLVED] Looking for partial number within text or description
    By Louis1983 in forum Excel Formulas & Functions
    Replies: 5
    Last Post: 12-13-2017, 11:10 AM
  2. [SOLVED] Drop List with a description but once chosen description disappear
    By dezspert22 in forum Excel General
    Replies: 22
    Last Post: 12-19-2016, 05:24 PM
  3. russian characters in text
    By HarryKlein in forum Excel Programming / VBA / Macros
    Replies: 1
    Last Post: 06-16-2016, 11:44 PM
  4. Part-Number - Description lookup macro
    By AAdach in forum Excel Programming / VBA / Macros
    Replies: 8
    Last Post: 02-19-2015, 02:37 PM
  5. Macro to replace any 10 digit number in the cell which has other description
    By harisha19 in forum Excel Programming / VBA / Macros
    Replies: 2
    Last Post: 01-17-2014, 05:17 AM
  6. [SOLVED] Need macro that searches for a description based on a number from a drop down list
    By Peebly in forum Excel Programming / VBA / Macros
    Replies: 29
    Last Post: 02-28-2013, 07:02 PM
  7. [SOLVED] Need Macro to pull only interface number not description.
    By watchdog4400 in forum Excel Programming / VBA / Macros
    Replies: 2
    Last Post: 01-11-2013, 08:39 AM

Bookmarks

Posting Permissions

  • You may not post new threads
  • You may not post replies
  • You may not post attachments
  • You may not edit your posts

Search Engine Friendly URLs by vBSEO 3.6.0 RC 1