بن علية حاجي

السلام عليكم ورحمة الله أخي الكريم عيد مصطفى، تم التعديل على الكود بإضافة رسالة تأكيد الطباعة أرجو أن يفي ذلك بالمطلوب... أخوك بن علية Bringing data equation 4_bis.rar

السلام عليكم ورحمة الله أخي الكريم عيد مصطفى، تم التعديل على معادلة IF التي أضفتَها بدل القائمة المنسدلة باستعمال الدالة CHOOSE لتبسيط المعادلة... بالنسية لكود الطباعة تم عمل اللازم حسب المطلوب... أرجو أن يفي الملف المرفق بالمطلوب... أخوك بن علية Bringing data equation 4.rar

السلام عليكم ورحمة الله أخي الكريم عيد مصطفى، لست أدري إن كنت قد فهمت المطلوب فهذا حل للمسألة باستعمال المعادلة (غير أني لم أستطع التخلي عن الأعمدة الإضافية في "Trial Balance" لوّنتها باللون الأخضر)... وقد استغنيت عن كل الصفحات للقيود باستعمال "خاصية القائمة المنسدلة"... أرجو أني قربت المفهوم... أخوك بن علية Bringing data equation.rar

السلام عليكم ورحمة الله أخي الكريم، تم تعديل على معادلات الفرز في ورقة "عام" حسب المطلوب... تجد بعض الشرح في الملف لكيفية استعمال خلية "الرقم" في ورقتي "المغادرين" و "القادمين" بالملف المرفق... أخوك بن علية مانفست2014.rar

السلام عليكم ورحمة الله أخي الكريم، أعتقد أن الكود يكون بالشكل التالي: Private Sub Worksheet_SelectionChange(ByVal Target As Range) If Not Intersect(Target, Range("E3:E50")) Is Nothing = True Then Call ShowCalendar Cells(Target.Row, 5) = Range("A1") End If End Sub أخوك بن علية

السلام عليكم ورحمة الله أخي الكريم، اختلطت علي الأمور، إذا كان مع القادمين نتعامل مع تاريخ النزول ومع المغادرين نتعامل مع تاريخ العودة فإن ضالتك تجدها في الملف المرفق... أخوك بن علية 1_2.rar

السلام عليكم ورحمة الله أخي الكريم، إضافة إلى ما قدمه إخوتي الأحبة هذا حل آخر بالمعادلات... أخوكم بن علية كشف باسماء المشتركين4.rar

السلام عليكم ورحمة الله أخي الكريم، تم عمل اللازم في الملف المرفق بإضافة عمودين آخرين في ورقة "عام" وتعديل على المعادلات... يمكن باستعمال الماكرو بعد الترحيل (بالمعادلات أو بالكود) القيام بعملية الفرز حسب عمود تاريخ العودة... أخوك بن علية مانفست.rar

السلام عليكم ورحمة الله أختي الكريمة نادية، بفضل الله تم العمل على الملف واستيفاء كل ما هو مطلوب في ردك، بالنسبة للمطلوب الأول تم التعديل على الكود في ملف أخي الكريم ضاحي مع إضافات أخرى... بالنسبة لكود الحفظ فهو الأخر تعديل على كود من النت بما يناسب المطلوب وهو يقوم بحفظ Sheet1 فقط (دون أزرار الأكواد) في ملف جديد في مسار الملف الأصلي (إكسيل) ويتم تسميته تلقائيا بالاسم Backup متبوع بالتاريخ الحالي حسب الشكل : Backup_dd_MM_yy أضفت أيضا في Sheet2 عملية البحث حسب رقم IC فقط (دون السنة) باستعمال المعادلات (معادلات صفيف) مع إضافة تنسيق شرطي لتأطير البيانات الموجودة في الجدول... ملاحظة : يبقى الزر Open MRR الخاص بفتح ملفات PDF يعمل بالطريقة السابقة غير أنه يفتح هذه الملفات من مسار الملف الأصلي ويجب أن تكون هذه الملفات محفوظة حسب الشكل الذي ذكرته في السابق مثلا : 2012_257.pdf أرجو أن أكون قد وفيت المطلوب... أخوك بن علية Nadia_Offic6.rar

السلام عليكم ورحمة الله أخي الكريم، تم المطلوب ببعض التعديلات على المعادلات... أخوك بن علية مانفست.rar

السلام عليكم ورحمة الله أخي الكريم، وأضيف وأقول إن الدواء يُؤخذ حسب الحالة وبجرعات في أوقات معينة، ولو أُخذ في غير حالته أو في غير وقته أو دون احترام للجرعات فقد يضر صاحبه... مثله مثل المنتدى وما يتضمنه من أعضاء يتفانون ويجتهدون في تقديم المساعدات كل حسب سعة وقته وعلمه، ومن ملفات تخدم الكثير والكثير من الحالات والميادين... فيجب الأخذ منها قطرة قطرة حسب الحاجة والهدف الذي تريد الوصول إليه وهو مما يساعد أيضا على التعلم أكثر والاستفادة من كل ما يُقدّم لك... أما إذا أخذت ما تريده جملة واحدة فقد تتبعثر الأفكار ويتيه العقل بين هذا الكم الكبير من المعلومات... والله أعلى وأعلم أخوك بن علية

السلام عليكم ورحمة الله أخي الكريم، أريدك أن تجرب العملية التالية : بعد أن تقوم بتفعيل خاصية "التفاف النص" في خلية ما واحجز فيها النص (الطويل) وقبل أن تقوم بتغيير ارتفاع الصف (كما فعلت في الفيديو) انظر إلى خاصية "التفاف النص" هل بقيت مفعلة؟ إذا لم تجدها مفعلة فهذا يعني أنه يوجد (أو وُجد) ماكرو في الملف يقوم بإلغاء الخاصية ... والله أعلى وأعلم أخوك بن علية

السلام عليكم ورحمة الله أخي الكريم، في اعتقادي أنه لحل هذه المشكلة في الوورد يجب اتباع ما يلي : 1- الضغط على : ALT+F9 وفي هذه الحالة كل الحقول المدرجة في الورقة تُفتح على الشكل : { MERGEFIELD Name } حيث Name يمثل اسم الحقل... 2- تختار الحقل الذي تريد تغيير التنسيق فيه وتضيف له بعد اسم الحقل العبارة MM/dd/yyyy @\ أو العبارة dd/MM/yyyy @\ (حسب الحالة) بعد اسم الحقل، فيكون الحقل من الشكل : { MERGEFIELD Name \@ MM/dd/yyyy } أو { MERGEFIELD Name \@ dd/MM/yyyy } 3- الضغط على : ALT+F9 مرة أخرى للرجوع إلى حالة الدمج... أرجو أن يفيدك هذا في حل مشكلتك.... أخوك بن علية

السلام عليكم ورحمة الله أخي الكريم نسيت أن أذكر أنه لكي تعمل هذه الخاصية تلقائيا في خلايا معينة يجب أولا تحديد هذه الخلايا ثم تفعيل الخاصية على هذه الخلايا... انظر إلى الرابط التالي (بالإنجليزية) وهو يجيب على السؤالين : http://office.microsoft.com/en-us/excel-help/wrap-text-in-a-cell-HP001216382.aspx أخوك بن علية

السلام عليكم ورحمة الله أخي الكريم أختي الكريمة، وأؤكد أن هذا يبقى صحيحا حتى في إكسيل 2003... أخوكم بن علية

السلام عليكم ورحمة الله أختي الكريمة نادية، ليست عندي فكرة عن كيفية عمل السيرفر ولكني أعتقد أن عملها مماثل لعمل أي جهاز كمبيوتر وفي هذه الحالة وإذا كانت ملفات PDF التي يتم طلب فتحها بواسطة الكود موضوعة مع ملف إكسيل الذي يتم العمل عليه (في الموقع نفسه) فإنه يتم استبدال السطر (في الكود) : Emplacement = "C:\TEST\" بالسطر: Emplacement = ThisWorkbook.Path & "\" ملاحظة : في كود الزر Open MRR أخطأت خطأ مطبعيا وهو في العبارة : If Dir(Fichier) <> "" الرجاء تصحيحها بالعبارة : If Dir(File) <> "" والله أعلى وأعلم أخوك بن علية

السلام عليكم ورحمة الله أختي الكريمة نادية، قمت ببعض التعديلات على كود البحث إذ أني وجدت فيه خللا بعدم اعتبار "السنة" في البحث مع إضافة حل للمطلوب الأول (التحقق من حالة المعمل Lab Status بعد إظهار النتيجة) بطريقتين (في الملفين المرفقين) الأولى بتلوين textbox ذاته الخاص بحالة المعمل في الفورم والثاني تلوين textbox آخر تم إنشاؤه مقابل textbox الخاص بحالة المعمل... تم أيضا كحل للمطلوب الثاني ربط زر Open MRR بكود يقوم بفتح المعني من مسار يتم تحديده في الكود، والكود كما يلي : Private Sub cmdClear_Click() Dim File As String, Emplacement As String On Error Resume Next Emplacement = "C:\Test\" File = Emplacement & Split(txtICn.Value, "/")(2) & "_" & Split(txtICn.Value, "/")(3) & ".pdf" If Dir(Fichier) <> "" Then ShellExecute 0, "open", File, "", "", 0 End Sub * الملف الذي يتم فتحه من المسار تكون تسميته من الشكل (مثلا) : 2012_257.pdf * المسار يتم تغييره وتحديده في الكود في السطر : Emplacement = "C:\Test\" أرجو أن يكون هذا العمل مستوفيا كل المطاليب.... أخوك بن علية الملف المرفق : Nadia_Offic4_5.rar

السلام عليكم ورحمة الله أختي الكريمة، أخوايا الكريمين الأستاذ/ عباد والأستاذ/ ضاحي، عيدكم سعيد وكل عام وانتم بخير، عملكما أكثر من رائع فبارك الله فيكما وجزاكما عنا كل خير... أستسمحكما لأضيف حلا آخر فيه تعديل على كود أخي عباد ومشابه لعمل أخي ضاحي في الملف المرفق... أخوكم بن علية الملف المرفق : Nadia_Offic3.rar

السلام عليكم ورحمة الله أختي الكريمة، معذرة أولا على الإطالة في الرد وثانيا لأني لم أستعمل الفورم الذي وضعته (لا أتحكم كثيرا بالفورم) واستعملت المعادلات لعمل المطلوب مع إضافة بالتنسيق الشرطي ... أرجو أن يفي هذا بالمطلوب... أخوك بن علية الملف المرفق : book1-trial.rar

السلام عليكم ورحمة الله أخي الكريم، تم المطلوب في الملف المرفق مع إضافة عمودين في ورقة "سجل الطلبات" للترقيم التلقائي حسب الشروط المطلوبة أحدهما (A) خاص للفرز حسب "مركز الخدمة" والآخر (B) للفرز حسب "التاريخ" وهذا يساعد في استعمال معادلات بسيطة للترحيل وإلا -وما دمت لا تريد أكوادا- فإن معادلات الترحيل ستكون "معادلات صفيف وطويلة" مما يكون سببا في بطء عمل الملف باعتبار العدد الكبير لهذه المعادلات... أرجو أن يكون هذا العمل مقبولا ويفي بالغرض المطلوب فعلا... أخوك بن علية الملف المرفق : سجل.rar

السلام عليكم ورحمة الله أخي الكريم، تم المطلوب بإدراج كود بسيط جدا مع تغيير طفيف على معادلة A10.... أخوك بن علية الملف المرفق : مساعده فى كود لمسح البيانات.rar

السلام عليكم ورحمة الله أخي الكريم، تم التعديل على الكود ليتناسب مع المطلوب... أخوك بن علية الملف المرفق : المساعده فى الطباعه.rar

السلام عليكم ورحمة الله أخي الكريم، هذا رابط (بالإنجليزية) يعطي بعض الحلول لهذا النوع من الرسائل، أرجو أن تحل مسألتك... الرابط : http://techsalsa.com/solution-to-this-operation-has-been-cancelled-due-to-restrictions-in-effect-on-this-computer/ أخوك بن علية

السلام عليكم ورحمة الله أخي الكريم ريان، لست أدري إن كنت قد فهمت المطلوب وهذه محاولة في الملف المرفق.... أخوك بن علية الملف المرفق : rerr.rar

السلام عليكم ورحمة الله أخي الكريم، لست أدري إن كنت قد فهمت المطلوب وأقدم لك الملف المرفق فيه تعديل على المعادلة الشرطية علّه يفي بالغرض المطلوب.... أخوك بن علية الملف المرفق : ‫PASS OR FAIL11_2.rar