إنسان

وجدت أثناء تصفحي للأمثلة هذا الكود Private Sub Caller_ID2_AfterUpdate() If Not IsNull(DLookup("[Caller-ID2]", "StuDay", "[Caller-ID2]=Forms![date_data]![student_data_Sub].Form![Caller-ID2]")) Then MsgBox "ÓÈÞ ÊÓÌíá äÝÓ ÇáÑÞã ÎáÇá Çáíæã " & Year(date), vbMsgBoxRight, "ÊäÈíå" [Caller-ID2] = Null [Name of Student] = Null [Caller-ID2].SetFocus End If End Sub فهل من الممكن شرحة بشكل موجز

الله يعطيك فكرة رائعة

لو سمحتم كيف أرفع صورة في المنتدة وتكون صغيرة مثل ما أراها في المشاركات وأشكركم جمعيا

اضغط كنترول مع إنتر واستمر بالضغط

علمت مسبقا أن الأخ حامل المسك حصل على درجة الماجستير فأبارك له وأتمنى منه تأكيد الخبر وألف ألف مبررررررررررررررروك

السلام علكيم كثيرًا ما نجد أن حدود البرواز الذي ندرجه من تنسيق حدود الصفحة يأتي ناقص عند الطباعة ، فما الحل؟؟ الحل أن تذهب إلى ملف - إعداد الصفحة - ثم الورق - ثم تغير 29.7 إلى 29.2 ثم موافق وشكرَا