Keresés

Új hozzászólás Aktív témák

  • Oly

    őstag

    válasz Oly #22690 üzenetére

    Most már csak a kalapos betűk szívatnak.:

    Function MAGYARIT(cella As String)
    cella = Replace(cella, "é", "e")
    cella = Replace(cella, "á", "a")
    cella = Replace(cella, "ű", "u")
    cella = Replace(cella, "ő", "o")
    cella = Replace(cella, "ú", "u")
    cella = Replace(cella, "ö", "o")
    cella = Replace(cella, "ü", "u")
    cella = Replace(cella, "ó", "o")
    cella = Replace(cella, "É", "E")
    cella = Replace(cella, "Á", "A")
    cella = Replace(cella, "Ű", "U")
    cella = Replace(cella, "Ő", "O")
    cella = Replace(cella, "Ú", "U")
    cella = Replace(cella, "Ö", "O")
    cella = Replace(cella, "Ü", "U")
    cella = Replace(cella, "Ó", "O")
    MAGYARIT = cella
    End Function

    Ha beírom az Ű és Ő betűt, akkor a hullámos vagy kalapos ékezet kerül oda a VBA editorban.
    Ezzel lehet kezdeni valamit?

    SonyEricsson T20 - T68 - T610 - K700 - W800 - K750 - K800 - C702 - P1 - MOTO Defy - Galaxy S Advance - Galaxy S4 - Lumia 820 - Honor 7 - iPhone 5S

Új hozzászólás Aktív témák