aliba2012

بارك الله فيك على الرد و الاجابة الوافية

add_docfield = Me.Add_doc Dim a a = DLookup("[add_doc]", "add_doc", "[add_doc]='" & Me.Add_doc & "'") If Not (IsNull(a)) Then MsgBox "أنت تريد تسجيل فاتورة قد تم تسجيلها سابقاَ", vbCritical, "رسالة تحـــزيرية" Cancel = -1 End If End Sub السلام عليكم و رحمة الل…

السلام عليكم ورحمة الله و بركاته عندي سجل بالمؤسسة التي اعمل بها و هو سجل طويل و عريض و ممل و لكنه في غاية الأهمية و قد حاولت أن أقوم بتحويل المعلومات الوجودة في السجل إلى قاعدة بيانات أكسس أو اكسل لكن واجهت مشكلة في الحساب و لم أعرف كيف أضع المعادلات و الاستع…