ผมทำจาก excel 2013 วิธีการครับ

ต้องสร้างฟังก์ชั่นแบบกำหนดเอง
1. เปิด workbook ใหม่
2. เปิดการใช้ VBA (กดปุ่ม Alt+F11)
3. แทรก new module (Insert > Module)
4. - คัดลอกข้อความไปวาง -

//เริ่มต้นข้อความ

Function ROUNDSIG(num As Variant, sigs As Variant)
    Dim exponent As Double
    If IsNumeric(num) And IsNumeric(sigs) Then
        If sigs < 1 Then
            ' Return the  " #NUM "  error
            ROUNDSIG = CVErr(xlErrNum)
        Else
            If num <> 0 Then
                exponent = Int(Log(Abs(num)) / Log(10#))
            Else
                exponent = 0
            End If
            ROUNDSIG = WorksheetFunction.Round(num, _
                       Sigs - (1 + exponent))
        End If
    Else
        ' Return the  " #N/A "  error
        ROUNDSIG = CVErr(xlErrNA)
    End If
End Function


//สิ้นสุดข้อความ

5. ออกจาก VBA (กดปุ่ม Alt+Q)
6. ใช้ฟังก์ชั่นที่สร้างขึ้น (กดปุ่ม Shift+F3, ภายใต้ "User Defined" : ผู้ใช้กำหนดเอง )
เช่น