عبد الفتاح كيرة قام بنشر أغسطس 26, 2016 مشاركة قام بنشر أغسطس 26, 2016 السلام عليكم و رحمة الله () نتابع معكم الفيديوهات الاحترافية التى تسهل العمل على برنامج أكسيس من خلال الاستعانة بأكواد vba درس اليوم سهل جدا و بسيط جدا و هو عن كيفية البحث عن السجلات و الانتقال إليها لكن هذه المرة باستخدام طريقة البحث searchforrecord أرجو لكم النفع و الفائدة الفيديو بتاريخ اليوم أرجو دعم القناة بالاشتراكhttps://www.youtube.com/watch?v=Xqw4...ature=youtu.be 3 رابط هذا التعليق شارك More sharing options...
zoed2 قام بنشر أغسطس 30, 2016 مشاركة قام بنشر أغسطس 30, 2016 كل التوفيق والتجاح شكرا على الشرح 1 رابط هذا التعليق شارك More sharing options...
عبد الفتاح كيرة قام بنشر أغسطس 30, 2016 الكاتب مشاركة قام بنشر أغسطس 30, 2016 شكرا لك أخى الفاضل ربنا يبارك فيك رابط هذا التعليق شارك More sharing options...
صالح حمادي قام بنشر أغسطس 30, 2016 مشاركة قام بنشر أغسطس 30, 2016 ما شاء الله أخي عبد الفتاح أنت دائما في الموعد أعانك الله 1 رابط هذا التعليق شارك More sharing options...
عبد الفتاح كيرة قام بنشر أغسطس 30, 2016 الكاتب مشاركة قام بنشر أغسطس 30, 2016 دائما أسعد بتشجيعكم أستاذ صالح جزاك الله خيرا 1 رابط هذا التعليق شارك More sharing options...
صالح حمادي قام بنشر أغسطس 30, 2016 مشاركة قام بنشر أغسطس 30, 2016 أنت أكبر من أن تحتاج إلى تشجيع أستاذنا الكريم فأعمالك تتكلم عليك 1 رابط هذا التعليق شارك More sharing options...
عبد الفتاح كيرة قام بنشر أغسطس 30, 2016 الكاتب مشاركة قام بنشر أغسطس 30, 2016 أستغفر الله ما زلت أتعلم بارك الله فيك رابط هذا التعليق شارك More sharing options...
abdul_algalal قام بنشر أغسطس 30, 2016 مشاركة قام بنشر أغسطس 30, 2016 السلام عليكم استاذ عبدالفتاح لقد استفدنا من شروحاتك الكثير . الله يجعلها في ميزان حسناتك (آمين يارب) لدي سؤال اذا تكرمت هو كيف اقارن بين عمودين في استعلام اكسس مثل هذه الداله في الاكسيل اريدها في الاستعلام =IF(ISNUMBER(MATCH(B1;A1;0));"موجود";"غير موجود") (المطلوب الكود الذي اكتبه في العمود الجديد"المقارنه") المثال عمود1 عمود2 المقارنه 9999 9999 موجود 9998 9999 غيرموجود ولك جزيل الشكر والتقدير. ؛؛؛؛؛؛؛؛؛؛؛؛ 1 رابط هذا التعليق شارك More sharing options...
عبد الفتاح كيرة قام بنشر أغسطس 30, 2016 الكاتب مشاركة قام بنشر أغسطس 30, 2016 (معدل) أنشئ استعلامات أدرج العمودي المطلوب مقارنتها فى خانة فارغة من الاستعلام مكان اسم الحقل اكتب Newfield : iif ) F1=f2 ; "Yes" ; "No" ( معناه لو الحقل الأول يساوى الثانى اطبع Yes و إلا اطبع No شغل الاستعلام معذرة للكتابة رآسيا لأنى اكتب من الموبايل وفقك الله تم تعديل أغسطس 30, 2016 بواسطه عبد الفتاح كيرة رابط هذا التعليق شارك More sharing options...
أبورحيل قام بنشر أغسطس 30, 2016 مشاركة قام بنشر أغسطس 30, 2016 (معدل) بارك الله فيك يا أستاذ زدنا من علمك زادك الله من علمه تم تعديل أغسطس 30, 2016 بواسطه أبورحيل 1 رابط هذا التعليق شارك More sharing options...
عبد الفتاح كيرة قام بنشر أغسطس 30, 2016 الكاتب مشاركة قام بنشر أغسطس 30, 2016 شكراً لك على هذا الكلام الطيب وفقكم الله رابط هذا التعليق شارك More sharing options...
abdul_algalal قام بنشر سبتمبر 2, 2016 مشاركة قام بنشر سبتمبر 2, 2016 الله يعطيك العافيه تمت الطريقه بنجاح الف الف شـــكــــر لاستاذنا القدير عبدالفتاح 1 رابط هذا التعليق شارك More sharing options...
abdul_algalal قام بنشر سبتمبر 2, 2016 مشاركة قام بنشر سبتمبر 2, 2016 استاذ عبدالفتاح ارجو منك الافاده اريد جمع الحقل الذي يحتوي على لون النص اسود في التقرير (اكسس) هذا الكود تم استخراج النص باللون الاسود باقي اريد جمع النص باللون الاسود فقط ( في تفاصيل التقرير) Private Sub ÊÝÕíá_Print(Cancel As Integer, PrintCount As Integer) Dim RetColor As Long If [mm] = "abdul" Or [mm] = "algalal" Then [w].ForeColor = vbBlack Else [w].ForeColor = vbWhite End If End Sub ,,,,,,,,,,,,,,,,ولك جزيل الشكر والتقدير,,,,,,,,,,,,,,,,,, رابط هذا التعليق شارك More sharing options...
abdul_algalal قام بنشر سبتمبر 2, 2016 مشاركة قام بنشر سبتمبر 2, 2016 المعذره المقصود لون النص يعني لون الرقم 1+1=2 1 رابط هذا التعليق شارك More sharing options...
عبد الفتاح كيرة قام بنشر سبتمبر 2, 2016 الكاتب مشاركة قام بنشر سبتمبر 2, 2016 أخى abdul_algalal أظن هذا مخالفا لقوانين المنتديات المشاركة مخصصة لموضوع واحد قم بنشر موضوع جديد بالمنتدى اعرض فيه ما تريد و نقوم جميعا إن شاء الله بالرد عليك حسب الإمكان شكرا لك و مؤقتا جرب الآتى sum(if me.[w].ForeColor = vbBlack,1,0) الان, عبد الفتاح كيرة said: أخى abdul_algalal أظن هذا مخالفا لقوانين المنتديات المشاركة مخصصة لموضوع واحد قم بنشر موضوع جديد بالمنتدى اعرض فيه ما تريد و نقوم جميعا إن شاء الله بالرد عليك حسب الإمكان شكرا لك و مؤقتا جرب الآتى sum(if( me.[w].ForeColor = vbBlack,1,0) رابط هذا التعليق شارك More sharing options...
abdul_algalal قام بنشر سبتمبر 2, 2016 مشاركة قام بنشر سبتمبر 2, 2016 شكراً الف شكر على الافاده واقدم اعتذاري على المخالفه لكوني لا ادري رابط هذا التعليق شارك More sharing options...
عبد الفتاح كيرة قام بنشر سبتمبر 2, 2016 الكاتب مشاركة قام بنشر سبتمبر 2, 2016 لا عليك أخى قلت لك ذلك قبل أن يقوله لك المشرفون كل عام أنت بخير رابط هذا التعليق شارك More sharing options...
محمد ايمن قام بنشر نوفمبر 22, 2016 مشاركة قام بنشر نوفمبر 22, 2016 جزاك الله كل خير 1 رابط هذا التعليق شارك More sharing options...
عبد الفتاح كيرة قام بنشر نوفمبر 22, 2016 الكاتب مشاركة قام بنشر نوفمبر 22, 2016 شكرا أخى أيمن رابط هذا التعليق شارك More sharing options...
BFS قام بنشر نوفمبر 23, 2016 مشاركة قام بنشر نوفمبر 23, 2016 الاخوة الافاضل السلام عليكم ورحمة الله وبركاته اطلب من حضرات الاخوة الذين لهم درايه ومعرفة بقاعدة الاكسس ان يساعدونى فى تعديل الملف المرفق علما بان جميع الملاحظات المطلوبة التى نرغب عملها فى الملف ساتجدوها اثناء فتح الملف اتمنى منكم مساعدتى خاصة لاول مرة اشارك فى عذا الموقع الرائع واملى وطيد فى ذلك وشكرا. بحث بالحرف الابجدى.rar رابط هذا التعليق شارك More sharing options...
الردود الموصى بها
Join the conversation
You can post now and register later. If you have an account, sign in now to post with your account.