عمر ضاحى

استاذى الفاضل انا لا اقصد من هذا شئ واذا اردت فعل هذا لكنت فعلته من قبل لكن انا ليس لى فى فعل مثل هذه الافعال وانما ذكرتها لتوضيح احد الجوانب السلبيه لمثل هذه الامور اتمنى ان تكون تفاهمت مشكلتى

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

استاذ عبدالرحمن اولا اشكر حضرتك على مجهودك ولى استفسار اخر انا دلوقتى حضرتك حطيت الكود ده If QQ = ("وارد") Then Q4 = ("وارد") Else Q4 = ("") End If علشان تنفذ الشرط وهو شغال تمام لكن لما باختار من القائمة الكل (ال هو الوارد والمنصرف) بيجبلى فقط المنصرف يعنى فى حالة اني عاوز الاثنين محتاج اعمل ايه ؟

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

شرط التاريخ زى ما هو (لانه هو الاصل فى الاستعلام ) فقط بدل ما يظهرلى الجميع يظهرلى الوارد فقط

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

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

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

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

جزاك الله كل خير عنا واعانك الله على جميع مشاغل ويسر لك الله امورك كلها

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

السلام عليكم اساتذتى الكرام تحية طيبه للجميع وبعد؛ بعد اذن حضراتكم انا كنت عملت موضوع بعنوان (( إنشاء استعلام عن قيم ونصوص معينه تحت شرط معين )) ولله الحمد اجابنى استاذى الفاضل احمدزمان وكان لى استفسارات اخرى لكن للاسف لم يستطع احد ان يجيب عن استفساراتى فى الموضوع السابق وانا اليوم بعد اذنكم كنت محتاج اطور الكود ده بالاتى 1- كيف ادمج بين مفتاح الاستعلام بالشروط فى عمليت الفلتره 2- كيف عمل قائمة استطيع ان اختار منها اسم مخزن (المخزن هنا هو اسم الشيت) او عدة مخازن لتحقيق شرط معين يأتى تاليا 3- كيف استعلم بين تاريخين عن جميع الارصده بمعني ( عند وضع تاريخين يقوم البرنامج بالبحث لى عن جميع الفواتير فى جميع المخازن اذا لم اقوم بتحديد مخازن معينه ) 4- وعندما اريد ان اطبع النتائج اريد ان تظهر لى النتائج بصورة معينه دون طباعة صف الادوات ويظهر لى كتقرير ويتم وضع شعار وابيانات اريد وضعها فيما بعد اسف ان طلباتي كثير لكن هنا عمالقة الاكسيل لا يصعب عليهم شئ من هذا وشكرا للجميع مقدما TEST2.xlsm

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

up

UP

UP

هل ممكن تحديث البرنامج بحيث يعمل الكود على اوفيس 2016 لانه بيظهر لى خطأ عند تشغيله

up

up

up

up

ممكن استأذن حضرتك في مراجعة الملف مرة اخري لان فى شئ خطأ

up

up

انا وجدة كود لموضوع القائمة للفتلرة وعلى قدر استطاعتى عرفت ان لو عملت تسجيل للميكرو واخفيت صف عرفت انه هيظهرلى الكود الخاص بامر الفلتره وهو EntireRow.Hidden = True والكود كامل بعد التعديل هو Sub hiden_line() 'CODE FOR HIDE VALUE Dim rng As Range Dim cell As Range Set rng = Range("A10:M25") For Each cell In rng ' D7 هى الخلية التى بها القائمة او القيمة المطلوب الفلتره عليها If cell.Value = Range("D7").Value Then cell.EntireRow.Hidden = True End If Next cell End Sub Sub show_line() 'CODE FOR SHOW VALUE Dim rng As Range Dim cell As Range Set rng = Range("A10:M25") For Each cell In rng If cell.Value = Range("D7").Value Then cell.EntireRow.Hidden = False End If Next cell End Sub Sub show_lineALL() 'CODE FOR SHOW ALL VALUE Dim rng As Range Dim cell As Range Set rng = Range("A10:M25") For Each cell In rng If cell.Value = "وارد" Or cell.Value = "صرف" Then cell.EntireRow.Hidden = False End If Next cell End Sub @احمدزمان لو امكن حضرتك ممكن تساعدنى فى هذه النقطة بحيث ادمج هذا الكود مع كود حضرتك بحيث يكون هناك زرار واحد لعمل كل الخطوات بدل 4 مفاتيح يعنى انا محتاج من حضرتك تساعدنى فى دمج هذه الاكواد او كيف اخلى لما اختار شئ من القائمة المنسدلة يتم تطبيق الميكرو تلقائي دون ان يكون هناك مفتاح لتنفيذ المايكرو