Hirdetés

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

  • Capella

    senior tag

    Időnként szoktam a letöltött fájlokban lévő angol jellegű tizedespontot tizedesvesszőre cserélni. Semmi gond, ha a csere funkcióval magam cserélem le.
    Gondoltam picit gyorsítok, egyszerűsítek egy makrórögzítéssel, de ott az eredmény nem lesz megfelelő. Egymilliószoros vagy akár E+11 szeres értéket ad vissza a cellákban az eredeti értékhez képest. Cellánként csak egy pont van az eredeti cellákban persze.
    Mi a hiba a rögzített makróban, vagy hogyan lehetne megszerkeszteni?
    Talán az eleje, hogy a meglévő kijelöléssel indul?

    Sub ChangePoint()
    '
    ' ChangePoint Makró
    ' Pont cseréje tizedesvesszőre
    '
    ' Billentyűparancs: Ctrl+y
    '
        Selection.Replace What:=".", Replacement:=",", LookAt:=xlPart, _
            SearchOrder:=xlByRows, MatchCase:=False, SearchFormat:=False, _
            ReplaceFormat:=False
    End Sub

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