Keresés

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

  • Fferi50

    Topikgazda

    válasz bteebi #31845 üzenetére

    Szia!

    A függvényed első paramétere ne Range legyen, hanem Variant. Ebben az esetben tudsz tartományt és számot is beadni paraméternek, mindkettőt elfogadja.
    A vezető ill. követő 0 számjegyeket az Excel cellaformázás egyéni számformátumban tudod beállítani, amit a Range.NumberFormat tulajdonsággal lehet makróban állítani, pl.
    Range("A2").NumberFormat="000000.000000"
    a tizedesvessző előtt és után is 6-6 számjegyet jelenít meg, az üres helyiértékekre 0 kerül.

    Mivel a FIX függvény alapból szöveget ad vissza, ezért szám csak akkor lesz belőle, ha a VAL függvénnyel átalakítod számmá.
    Function Sigdig(number As Variant, SigDigits As Integer) As Double
    Sigdig = Val(WorksheetFunction.Fixed(number, SigDigits - Int(WorksheetFunction.Log10(Abs(number))) - 1, True))
    End Function

    Üdv.

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