kanory

من خصائص الملف اشر على الموجود في الصورة

ليس هناك ازعاج اخي الكريم ولكن القصد حتى نصل لما تريد لاقصر الطرق .... بارك الله فيك وهذه طريقة اخرى جربها واعلمنا بالنتيجة Function FnSearch(Str As String) As String Dim Arr() As String Dim i As Long Arr = Split(Str) ' """" & txtSearch & """" For i = 0 To UBound(Arr) - 1 If Nz(DLookup("LikeA", "KindX", "LikeA='" & Trim(Arr(i)) & "'"), 0) <> 0 Then FnSearch = DLookup("LikeB", "KindX", "LikeA='" & Trim(Arr(i)) & "'") Exit For ElseIf Nz(DLookup("LikeA", "KindX", "LikeA='" & Trim(Arr(i)) & " " & Trim(Arr(i + 1)) & "'"), 0) <> 0 Then FnSearch = DLookup("LikeB", "KindX", "LikeA='" & Trim(Arr(i)) & " " & Trim(Arr(i + 1)) & "'") Exit For End If Next i End Function Replace&add.mdb

ضع في زر التحديث هذا .... Me.OrderBy = "[sifa] ASC" Me.OrderByOn = True DoCmd.Requery

ممكن تضيف لنا عينات لانشطة متعددة الكلمات

تم بناء الحل وفق معطياتك في مثالك ولم تذكر ان هناك انشطة اكثر من كلمة ...

طيب اخي الكريم انظر الصور :::::::::::::::: واحدة قبل التحديث في الجدول والثانية بعد تحديث الجدول ومع وجود اسم صالح احمد بدون وظيفة ....... Replace&add.mdb

طيب الان جاتني فكرة ثانية وهي عند طريق مديول للبحث عن العبارة .....

طيب انظر هذا ..................

مشاركة مع استاذي المهندس @Eng.Qassim هل تريدها بهذه الصورة في استعلام ........

فقط كررها مع اضافة شرط ثان وهو الجنس .... sifa: IIf([sin]>=20 And [jins]="ذكر";"قائد";IIf([sin]>=18 And [jins]="ذكر";"جوال";IIf([sin]>=15 And [jins]="ذكر";"كشاف متقدم";IIf([sin]>=11 And [jins]="ذكر";"كشاف";IIf([sin]>=6 And [jins]="ذكر";"شبل";IIf([sin]>=20 And [jins]="انثى";"قائده";IIf([sin]>=18 And [jins]="انثى";"جواله";IIf([sin]>=15 And [jins]="انثى";"مرشدة متقدمة";IIf([sin]>=11 And [jins]="انثى";"مرشدة";IIf([sin]>=6 And [jins]="انثى";"زهرة")))))))))) انظر المرفق لتفهم مقصودي ........ sma - Copie.accdb

طيب امسح التنسيق الموجود وضع مثلا للبراعم هذا .... وطبق لبقية المراحل الكشفية بنفس الطريقة .....

الكود يقوم بتصدير الملف المرفق فقط وليس لتحويل الملف .. فلو كان الملف المرفق pdf يقوم بتصديرة الى pdf واذا كان الملف jpg بقوم بتصديره الى jpg اي لا يقوم بتحويل الملفات ....

بارك الله فيك .... نعم هذا ما كنت اقصده ....

تفضل <><><><><><> احصاء عدد الصفوف.accdb

كلامك صحيح استاذي @Eng.Qassim

شاهدت اما هنا او في منتدى اخر ملف معمول بالاكسس كان تقوم بالبحث في جميع منتديات الاكسس ولكن للاسف لا تتحدث البيانات فيه ....

مشاركة من استاذي المهندس قاسم بعد وضع الكود الذي تفضل به البشمهندس وحول القاعدة الى accede بذلك لن يتمكن اي شخص من الدخول للاكواد .....

هل هذا التصور صحيح .......

الغي هذا الحدث وجرب ......

أخي الاعتذار شيم الكبار دائما ...... بارك الله فيك .... بالعكس انت كبرت في اعيننا ....

وعليكم السلام ورحمة الله وبركاته أخي الكريم وضح اكثر .... لأن مثالك لايوجد به سوى جدول واحد .... وضح الطلب ؟؟؟ هل هذا ما تقصد ؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟

وعليكم السلام ..... ماذا تقصد سؤال نعم لا ... هل تقد رسالة تحذير مثلا ام ماذا وضح ...

وعليكم السلام ورحمة الله وبركاته ممكن عن طريق استعلام الحاق عمل ذلك بشرط عدم الحاق حقل الترقيم التلقائي لانه قد يتكرر اذا لم تستطع ارفق مثال مبسط وبه بيانات وهمية لمساعدتك

ما شاء الله تبارك الله ملك دمج المتصفح مع الاكسس الاستاذ @أبو إبراهيم الغامدي بارك الله فيك .....

هدية رائعة من شخص رائع اتشرف ان اكون اول من يرد ويشكر بارك الله فيك اخي @Moosak