rey360 قام بنشر أكتوبر 3, 2019 قام بنشر أكتوبر 3, 2019 السلام عليكم أعضاء المنتدي الافاضل أريد طريقة لعمل RoundUp في التقرير وشكرا
rey360 قام بنشر أكتوبر 3, 2019 الكاتب قام بنشر أكتوبر 3, 2019 (معدل) بحثت ووجد طريقتين عن طريق expression في حالة القيم موجبة =Int(Expr)+IIf(Expr-Int(Expr)>0,1,0) في حاالة القيم سالبة =(Int(Abs(Expr))+IIf(Abs(Expr)-Int(Abs(Expr))>0,1,0))*IIf(Expr>=0,1,-1) كما يمكن القيام بها عن طريق vba Public Function RoundUp(X As Double, Optional I As Integer) As Double If IsMissing(I) Then RoundUp = -Int(-X) Else RoundUp = -Sgn(X) * Int(-Sgn(X) * X * 10 ^ I) / 10 ^ I End If End Function تم تعديل أكتوبر 3, 2019 بواسطه rey360 1
الردود الموصى بها
Join the conversation
You can post now and register later. If you have an account, sign in now to post with your account.