gavan

حبيبي الغالي ممكن ترفع الملف لنتمكن من الفهم اكثر , يالغالي

اسف اخي الكريم والله لم الاحظ ذلك , انا في المثال كونت ملف وجداول فقط لكيفية العمل ولكن البرنامج الحقيقي التسميات مختلفة جدا صح مثالك جيد جدا وهو المطلوب ولكن لدي سوال هل طريقتي في الحل صحيحة , وهي : انشاء جدول Appended_Table يستقبل البيانات من استعلامين الحاقيين وهما ل مجموع لسعر و مجموع الديون انشاءت استعلام مصدر بياناته من Appended_Table يحتوي على فلترة في الاسم وبهذا وصلت الى النتيجة المطلوبة

ياجماعة الخير انا سويتها بالطريقة كما في المرفق انشاء جدول Appended_Table يستقبل البيانات من استعلامين الحاقيين وهما ل مجموع لسعر و مجموع الديون انشاءت استعلام مصدر بياناته من Appended_Table يحتوي على فلترة في الاسم وبهذا وصلت الى النتيجة المطلوبة , هل من مراجعة على الطريقة كونها تفضل طريقة ؟؟ تحياتي 221.accdb

فكرة ممتازة جدا ولكن لو كانت الفكرة اكثر تبسيطا , كل خطوة بخطوة للتعليم الاولي , لكي نستطيع ان نبحر في هذا المجال مجال قوي ولابد من التعرف عليه تحياتي لك

مرحبا بك استعمل دالة Dlast DLast ( ''Field"' , ''Table or Query'' [, criteria] )

مرحبا ,, هل هناك طريقة لتكوين تقرير موحد بين جداول او استعلامات لدي اربع جداول اثنان منهم مرتبطين مع الاثنان الاخرين بطريقة جداول التقاطع المهم تكوين تقرير موحد مفصل لكل شخص يبين تحته المراحل وكل عمليات السعر و الدين , مثلا احمد المرحلة الاولى مجموع السعر و مجموع الدين المرحلة الثانية مجموع السعر و مجموع الدين وهكذا بالنسبة ل كمال و محمد هل يمكن الوصول الى مثل هكذا استعلام او تقرير , ولكم مني اجمل شكر و تقدير 221.accdb

شكرا اخي الحبيب الغالي وهو المطلوب ,كل التحية الك

مرحبا بكم في المرفق جدول به حقل logo نوعه Attachment . ونموذج لتحميل صورة ل Logo . (وتقرير به مربع Image لاضهار ال Logo في التقرير ,ومصدر التقرير ليس الجدول) هذا ال image مصدره سويته ب دالة Dlookup الصورة لا تظهر في التقرير , والمطلوب ان تظهر ؟؟ هل الدالة صحيحة ؟؟ وشكرا 220.accdb

up

استاذي الغالي ابو خليل تحياتي لك وكل عام وانت و اعضاء المنتدى الغالي بالف خير استاذي ممكن توضيح اكثر و اذا امكن ارفاق بمثال 🌷

لا الأخ فوكش ١٩٦٠ متواجد والحمد لله، لانه جاوب على سوالي البارحة، تحياتي لهم كلهم و دمتم في رعاية العالي الكبير 🌹🌹❤️❤️

شكرا لك يالغالي خليفة 1960🙏 انا اضفت حقل جديد الى الجدول باسم R_Name , و سحبته الى النموذج ايظا, المطلوب هو : عندما اكتب كلمة مثلا : كمال في السجل الاول و في السجل الثاني (اي الجديد) عندما اكتب كلمة ك يظهر كلمة كمال التي تم كتابتها في السجل السابق وهكذا , اي انه كل كلمة تم كتابتها تخزن موقتا و حيث ان هذه الخاصية موجودة في برنامج الاكسل , فهل هناك طريقة بنفس العمل في الاكسس ؟ وشكرا لكم جميعا DDTestSearch .accdb

شكرا لكم 🌹

ايه ياجدعان هو انا اتنسيت ولا ايه (0 قرأت و 0 ردود) ,هههههههههههههههه, هو انا سؤالي غلط ولا ايه ياناس انا هنا

مرحبا بكم من جديد هل بالامكان تكملة الكلمة بمجرد كتابة الحرف الاول من الكلمة في حقل معين من الاكسس , حيث يوجد هذه الخاصية في برنامج الاكسل ولكم اجمل شكر ❤️

Up

بارك الله فيك يالغالي Foksh عمل رائع

بارك الله فيك اخي ابو خليل

اخي الكريم ابو جودي فرغت المكتبات حتى تسع للكود هههههههه امزح اغاتي رفعت لك الملف حتى تستكشف ما الغلط بالموضوع , في اول الامر طلع الفورم فاظي , بعدين اشرت الى بعض الحقول و سويت بيهم Arrange ضهروا ولكن بس خطوط , فممكن تشوف المرفق و تشرحلى لماذا حدث ذلك , تحياتي بطريقة الاستاذ ابو جودي.accdb

يا جماعة الخير السلام عليكم مو راضيين نخلص السالفة الا ما نوصل لحل ,هههههههههه تحياتي الكم يالغاليين في هذا الملتقى الرائع اخوتي من خلال تجربتي على تحجيم النماذج و كيفية التخلص من مشكلة تغير مقاس الشاشات وصلت الى النتائج التالية : من خلال الوحدة النمطية هذه Option Compare Database Declare PtrSafe Function DisplaySize Lib "user32" Alias "GetSystemMetrics" (ByVal nIndex As Long) As Long Function resizefrom(frm As Form, bestw As Integer, besth As Integer) On Error Resume Next wrate = DisplaySize(0) / bestw hrate = DisplaySize(1) / besth frm.InsideWidth = frm.InsideWidth * wrate frm.InsideHeight = frm.InsideHeight * hrate Dim fc As Control For Each fc In frm.Controls fc.Top = fc.Top * hrate fc.Left = fc.Left * wrate fc.Width = fc.Width * wrate fc.Height = fc.Height * hrate fc.FontSize = fc.FontSize * wrate Next End Function واستدعائها من خلال النموذج عند التحميل بالشكل الاتي : resizefrom Me, 1366, 768 DoCmd.Maximize نحصل على ناتئج جيدة جدا سواء في مقاس (600*800) او (1024*768) او (1280*720) او (1366*768) حيث تم تصميم البرنامج على اخر مقاس وهو (1366*768) ونتوصل هنا الى شيء مفاده ان: 1-بهذه الوحدة النمطية 2-وتصميم على مقاس (1366*768) 3- واستدعائها بهذه الطريقة المذكورة من هذا القياس و الى القياسات الاصغر لاتوجد اي مشاكل و البرنامج يعمل بشكل ممتاز , فقط يجب ملاحظة انه النماذج التي لا تحصل على تكبير كامل للشاشة (DoCmd.Maximize) , يجب ان تحتوي على استدعاء هكذا (resizefrom Me, 1366, 768 ) لكي تحصل على افضل النتائج . هذة الفكرة انقلها لكم من خلال تجربتي الشخصية و الحصول على نتائج جيدة , ارجوا نشر الموضوع ليستفيد منه اكبر عدد من الاعظاء في حال تم تجربته من قبل اعظاء المنتدى الرائع❤️

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

مرحبا بالغوالي و لعى راسهم الاخ Foksh الحبيب والله اخي الحبيب انا لم اقم بتجربة فقط ,بل قمت بالكثير منها على سبيل المثال , قمت باستدعاء الدالة من الفورم عند التحميل بهذا الشكل resizefrom Me, 1366, 768 DoCmd.Maximize في كومبوتر شاشة 24 انج اعتقد الرزيليوشن 1950*1443 يعني دقة عالية كانت النتائج مذهلة وكانك بكل المقاييس توسيط و تحجيم و كل شيئ , ولكن فجأة عند غلق النموذج و فتحه تضاعف حجم المحتويات واصبح غير مرتب , قمت بعدها بحذف دالة الاستدعاء resizefrom Me, 1366, 768 ,,,, وابقيت فقط على DoCmd.Maximize اصبحت النتائج جيدة وكانني قمت بالتصيميم على ذلك الكومبيوتر 24 انج ابو الريزليوشن 1950*1443 , فهل من تفسير ؟؟؟ ولك مني اجمل سلام

طار الموضوع من فكري ههههههههه خربطت لقد قمت بتجربة (لا اعرف صح ولا طبقتها بشكل خاطئ) اتمنى ان تشاركوني بها يا حبايبي لقد قمت بتكوين موديول Resize وهو Option Compare Database Declare PtrSafe Function DisplaySize Lib "user32" Alias "GetSystemMetrics" (ByVal nIndex As Long) As Long Function resizefrom(frm As Form, bestw As Integer, besth As Integer) On Error Resume Next wrate = DisplaySize(0) / bestw hrate = DisplaySize(1) / besth frm.InsideWidth = frm.InsideWidth * wrate frm.InsideHeight = frm.InsideHeight * hrate Dim fc As Control For Each fc In frm.Controls fc.Top = fc.Top * hrate fc.Left = fc.Left * wrate fc.Width = fc.Width * wrate fc.Height = fc.Height * hrate fc.FontSize = fc.FontSize * wrate Next End Function و استدعيتها من الفورم عند التحميل هكذا resizefrom Me, DisplaySize(0), DisplaySize(1) DoCmd.Maximize الامر الى الان طبيعي عند دقة الشاشة 1336*768. عندما اغير دقة الشاشة الى 800*600 هنا تبدا المعركة (على فرض انني اعطيت البرنامج الى شخص اخر شاشته 600*800) يتغير محتويات الفورم كما في الصورة ادناه. اليس من المفروض يتوسط و يتحجم كل المحتويات في الفورم حسب الدقة الجديدة 600*800 ؟؟ ام انا مخطئ ,تحياتي لكم

استاذنا القدير ابو خليل لك كل التحية ولكل الأعضاء الكرام في هذا الصرح الرائع 🌹🌹 صح عندما اعطي البرنامج إلى شخص آخر يتغير المقاسات لبعض النماذج والبعض لا، وبالتالي ارجع لإدخال الأرقام من جديد ولكن هل يوجد طريقة موحدة ب وحدة نمطية جاهزة لكل فورم محتوياتها، نستدعيها ولايحصل اي خلل سواء شاشة صغيرة كبيرة متوسطة، ولكم مني أجمل سلام 🌹🌹

شكرا يالغالي ابو خليل على الرد , تكرار ال x هو خطا مطبعي الكود الذي ارفقته ما اشتغل الكود في الاسفل يعمل بصورة صحيحة اذا كان ملف ال( Frontend و Backend , وملفات ال PDF) في نفس المجلد x = Application.CurrentProject.Path & "\" & Me.TextConv & ".pdf" Application.FollowHyperlink x اما اذا نقلت ال Frontend الى قرص اخر و طبقت عليه الكود الذي جربته من حظرتك ,لايعمل تحياتي ❤️