moayad قام بنشر فبراير 14, 2004 مشاركة قام بنشر فبراير 14, 2004 هل هناك دالة لفصل الكسر عن الرقم مثال 245.76 اريد دالة تفصل الكسر 0.76 عن الرقم 245.76 ولكم جزيل الشكر 1 رابط هذا التعليق شارك More sharing options...
osama2003 قام بنشر فبراير 14, 2004 مشاركة قام بنشر فبراير 14, 2004 الاخ مؤيد ارجوا ان تكون هذه بغيتك : Private Sub ss() Dim a As Double, b As Integer, c As Single a = 123.456 b = Int(a) c = a - Int(a) MsgBox b & "-" & c End Sub انسخ هذا الكود كما هو في محرر vb رابط هذا التعليق شارك More sharing options...
moayad قام بنشر فبراير 14, 2004 الكاتب مشاركة قام بنشر فبراير 14, 2004 (معدل) اولا مشكور على الرد ولكن اريد دالة جاهزه تعمل عمليه الفصل دون اجراء عملية حسابية اريد دالة تفصل الكسر 0.76 عن الرقم 245.76 ويصبح الناتج(76) وهو عباره عن رقم الكسر وليس( 0.76) . كما يستخدم في كتابة الفواتير أو الشيكات وجزاكم الله كل خير تم تعديل فبراير 14, 2004 بواسطه moayad رابط هذا التعليق شارك More sharing options...
zakwan قام بنشر فبراير 15, 2004 مشاركة قام بنشر فبراير 15, 2004 استخدم دالة: Right([اسم مربع النص ],2) طبعا استخدم الدالة من اليسار الى اليمين رابط هذا التعليق شارك More sharing options...
محمد طاهر عرفه قام بنشر فبراير 15, 2004 مشاركة قام بنشر فبراير 15, 2004 لنفرض أن الرقم فى الخلية A1 ضع المعادلة الاتية فى أي خلية =MOD(A1;1)*100 رابط هذا التعليق شارك More sharing options...
moayad قام بنشر فبراير 17, 2004 الكاتب مشاركة قام بنشر فبراير 17, 2004 مشكورين على حسن تعاونكم ويوجد الدالة round حسب مثال التفقيط الموجود في المنتدى رابط هذا التعليق شارك More sharing options...
أبو هادي قام بنشر فبراير 17, 2004 مشاركة قام بنشر فبراير 17, 2004 السلام عليكم أخي moayad دالة Round هي دالة للتقريب وليست للفصل . بكل تأكيد معادلة محمد طاهر ممتازة وذكية ، وهنا أضيف معادلة أخرى للفصل قد ينفع بها : = A1 - Fix(Abs(A1)) تحياتي . رابط هذا التعليق شارك More sharing options...
الردود الموصى بها
من فضلك سجل دخول لتتمكن من التعليق
ستتمكن من اضافه تعليقات بعد التسجيل
سجل دخولك الان