البسيسي

على قدر اهل العزم تأتي العزائم الف الف شكر للاخوان ( فلسطيني - علي حسين السحيب) هذا هو المطلوب وللف الف شكر للجميع بارك الله فيكم ونور طريقكم

اشكرك اخي الكريم واشكر مساعدتك لي لكن هذا الحل لا يفي بالغرض المطلوب ومع ذلك لك مني جزيل الشكر والتقدير لانك قدمت بما تعرف ( قدر استطاعتك )

وهذه المشكلة بشكل ثاني: المشكلة التي صادفتني ستجدونها في المرفقات وارجو مساعدتي في ذالك ولكم جزيل الشكر ____________.rar

لدي ثلاث خانات: A1 B1 C1 كيف اصنع معادلة واضعها في الخانة C1 (معادلة شرطية) تضع لي رقم واحد في الخلية B1 اذا كانت الخلية A1 فيها رقم 5 وإلا تترك الخلية B1 فارغة المهم من هذا الامر انة B1 لا تحوي على اي معادلة وتكون المعالجة خارج الخلية والنتائج فقط توضع في الخلية ولكم جزيل الشكر

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

اشكرك اخي الكريم قدوصل المطلوب وايضاً انا استخدمت نفس المثال وعدلت عليه وحليت المشكلة لكن الموقع عندي صارله يومين مو راضي يفتح معاي حتى اخبركم وكان التعديل التالي Option Explicit Dim OK As Boolean Sub timerMsg() Dim alertTime If OK Then alertTime = Now + TimeValue("00:00:03") Application.OnTime alertTime, "msg" End If End Sub Sub msg() ActiveWorkbook.Save timerMsg ومع ذالك الف الف شكر لك اخي الكريم وبالنسبة لانقطاعي عنكم : ضروف العمل عندي تعيسة جدا حيث لا استطيع احياناً الدخول الى النت والضرف الثاني هو قمت بالانتحار ( الزواج) وصارت عندي ضروف ومشاكل وارتباطات الها اول ما الها اخـــر ونأسف على طول المشاركة ولكم جزيل الشكر

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

اشكرك اخي الكريم وصل المطلوب

اسم الطابعة: Epson Action Laser 1500 واشكرك للمره الثانيه على المساعده

اخي الكريم اشكرك على هذه المساعدة ممكن تشرح لي الكود لني حاولت لكني فشلت واكون ممنون لك اذاكان في مثال عملي وجزاك الله الف خير

معـــقولة هذا الطلب لا يوجد له حل

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

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

اخي الكريم : اشكرك على الرد السريع انا فعلا وجدت الصورة في الملف ال c:\ لكن عند النقر على الصورة لفتحهها يعطيني رسالة لا يوجد برنامج لفتر هذا النوع من الملفات حاولت اختيار له برنامج عن طريق اختيار من القائمة السريعة الفتح باستجدام: اخترت برنامج الصور يعطيني لا يوجد معاينة وايظا قمت بتغيير الاحقة في الكود وهي : snp الى الاحقة الصور: jpg وايضا لم افلح اخي الكريم ممكن تبعثلي مثال فيه الكود وفيه صورة من التقارير واكون شاكر لك الف الف مرة

بارك الله فيك اخي الكريم ممكن تشرحلي الكود واين اجد الصورة واللف شكر لك اخي الكريم

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

مشكور على هذا الجهد الرائع لكن تستطيع ازالة الرسالة التي تضهر بعد الضغط على زر الحفظ ازارلة الرسالة فقط

بارك الله فيك وصل المطلوب

عندما احذف جميع سجلات الجدول فأن الجمع الاستعلام يعطيني سجل فارغ المطلوب: كيف اجعل المجموع يكون صفرا وليس خاليا في حال حذف جميع سجلات الجدول ارجو التعديل على هذا المرفق ____.rar

لدي الاستعلام يعطيني 16 حقل فقط هل استطيع زيادة حقول الاستعلام الى 20 حقل وشكرا لكم

يا اخواني: الجداول عندي لاتقبل الارقام العشرية بل تحذفها مثلا : اذا ادخلت الرقم: 75.004 يعطيني الرقم 75 كيف اجعلها تعطيني الارقام حسب ما اكتبها وشاكرين لكم حسن الاستماع

اخي الكريم : انت لم تفهمني ما اقصده القيم : A B C D هي اسماء الحقول الغير منضمه في النموذج هذا الكود كان شغال قبل ما اضيف الحقول الجديده وهي :pP QQ RR وطبعا انشأت لها خانات في النموذج كما هو في الكود لكن هذا الكود ما عد يتعرف على الجدول ويعطيني الغلط بلون ازرق من بداية الكود CC=A

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

اخي الكريم : اشكرك على هذا الرد السريع لا استطين ان ارسل لك الملف حتى ترى كيف الخطا لكن باريت لو تكرمت تشرحلي اكثر واذا يكون في مثال اكون شاكر لك

لدي الكود التالي: وهو يقوم بنقل المعلومات من النموذج غير المنضم الى الجدول المشكلة في هذا الكود انه لا يقبل التعديل يعني انا اريد ان ازيد حقل جديد في الجدول وانشء له خانه في النموذج واضيفهم الى الكود لكن الكود يفتح على طول الى صفحة الفيجول بيزك ويعطيني خطأ في الحقل الجديد بلون ازرق هل من يستطيع ان يجعل لى هذا الكود قابل للتعديل اي : استطيع ان اضيف حقول جديدة متى ما اريد ولكم جزيل الشكر DoCmd.GoToRecord , , acNewRec r = b * o + 2 Me.cc = a Me.bb = b Me.cc = c Me.dd = d Me.ee = e Me.ff = f Me.gg = g Me.hh = h Me.ii = i Me.jj = j Me.kk = k Me.ll = l Me.mm = m Me.nn = n Me.oo = o Me.pp = p Me.qq = q Me.rr = r DoCmd.DoMenuItem acFormBar, acRecordsMenu, acSaveRecord, , acMenuVer70 DoCmd.GoToRecord , , acNewRec MsgBox "لقد تم الترحيل بنجاح", , "SADDIQ" b = Null c = Null d = Null e = Null f = Null g = Null h = Null i = Null j = Null k = Null l = Null m = Null n = Null o = Null p = Null q = Null r = Null End Sub