نزار سليمان عيد

اخي الكريم السلام عليكم انظر للرابط ادناه لعله يفيدك http://www.officena.net/ib/index.php?showtopic=24426 مع الشكر

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

اخي الحبيب مزلزل السلام عليكم جزاك الله خيرا ومشكور على الدالة

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

السلام عليكم اخي الكريم معذرة على تاخري بالرد فانا مشغول هذه اليومين عموما انظر للمرفق وهل يناسبك هذا التعديل وهو عبارة عن اخفاء اسماء الصفحات وتعطيل زر خيارات المسؤول عن ظهورها مرفق الملف على ايميلك الخاص ومعذرة مرة اخرى _______________________2____________5.rar

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

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

اخي الكريم السلام عليكم انت لم تتبع خطوات الشرح انظر للمرفق KASHF.rar

اخي الكريم السلام عليكم ممكن ارسال الملف مع كلمة السر لمعرفة المشكلة وتوضيحها لك

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

اخي الكريم السلام عليكم يمكن عمل ذلك وذلك عند حماية الصفحة وطلب وضع كلمة السر تقوم باختيار ذلك من القائمة باسفل كلمة السر انظر للمرفق واي توضيح او استفسار اعلمني من فضلك Protect.rar

السلام عليكم والله نور المنتدى وحياك الله اخوي اكرم وجزاك الله خيرا على هذا العمل الرائع

السلام عليكم بعد اذن اخي ابو اسامة انظر للمرفق Options.rar

السلام عليكم اخي العزيز aah_aah2008 جزاك الله خيرا ولمسة جميلة واضافة رائعة الاخت Iman Gharabawy تم اضافة زر ماكرو يقوم باخفاء السطور الفارغة مع سطر تاكيد من جميع الاوراق ويمكن تعديله لاي ورقة تحدديها قومي بالتجربة multicolumns3.rar

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

الاخت Iman Gharabawy السلام عليكم انا مجهز الملف من يوم الاربعاء ولكن مع الاسف الموقع معطل ممكن ترسلي ايميلك الخاص لتفادي هذه الامور سارسل لك الملف وقد اضفت لك ماكرو يقوم بعمل التعديل بعد ان تنسخي ملف التكست صراحة ارسلت الملف اكثر من مرة مع الشرح ولكن الموقع لايستجيب لذلك ساشرح لك بعد ان يصلك الملف وبالتوفيق 25_5_2008_2_.rar

اخي gelani السلام عليكم فهمت قصدك بالطبع لن يتم التعديل على الكود او نسخه لانه في Run فيجب عليك اولا ايقاف الماكرو من break انظر للصورة break.bmp ثم تقوم بنسخ او تعديل الكود واي استفسار اعلمني من فضلك

اختي ايمان السلام عليكم في المرفق تجدين المنطقة الزرقاء وهي منطقة التكست والتي ستنقلي اليها البيانات تم عكس الاعمدة مكان الصفوف والصفوف مكان الاعمدة لماذا؟ لاحظت ان المنتجات ثابتة والفروع متغيرة وكبيرة حتى في الطباعة يصعب طباعتها كصفحة واحدة هذا من ناحية من ناحية اخرى تغيير الفروع الآن سيصبح عليك اسهل كيف؟ لو افترضنا ان الفرع رقم 34 في عمود D اتانا من مركز التوزيع 32 فماذا يحصل؟ ستجدين ان الجدول الذي به معادلات اظهر لك كلمة False وذلك لعدم توافق الفرع بالتكست 32 عما كان عليه بالسابق 34في جدول المعادلات بالاسفل! هنا تقومين بتغيير كود جدول المعادلات الى الكود الجديد اي من 34 الى 32 وسيتم القراءة اتركك مع الملف وجربي واعطيني رايك هل يناسبك التعديل لكي اكمل الجدول ام لا؟ انظري للمرفق مع الشكر 25_5_2008_1_.rar

حياك الله اخي gelani لايوجد هناك اية حماية ولكن تم تثبيت قيمة الخلية A1 عن طريق كود VBA ولو رجعت لمشاركتي رقم 6 ستجد ان رسالة الترحيب بالسطر 7 وموقع الرسالة تم تحديده بالسطر العاشر وهو A1 وحياك الله مرة اخرى واي استفسار انا حاضر

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

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

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

اخي الكريم السلام عليكم انظر للكود ادناه Private Sub Workbook_Open() appTime = Now() + TimeValue("00:00:01") Application.OnTime appTime, "Blink" Dim Title As String Dim i As Integer Dim Start As Double Title = "nadereladly &Atilde;&aring;&aacute;&Ccedil; &Egrave;&szlig;&atilde; &Yacute;&iacute; &Egrave;&Ntilde;&auml;&Ccedil;&atilde;&Igrave;" & Space(4) With Sheets("Sheet1") Do For i = 1 To Len(Title) .Range("A1").Value = Left(Title, i) Start = Timer Do While Timer < Start + 0.3 DoEvents Loop Next i Loop End With End Sub انظر لرسالة الترحيب بالسطر 7 وموقع الرسالة تم تحديده بالسطر العاشر وهو A1 ولهذا عند فتح ملفات اخرى تعتقد ان الملفات لا تفتح لان الرسالة تظهر ولكن لو فتحت الملف وكتبت اي شئ ستختفي الرسالة بالنسبة للطلب الثاني انا وضعت الكود فى المجلد الرئيسي وليس في موديول وذلك ليتم ظهور الرسالة عند فتح الملف ولكن اذا وضعته في موديول ستطلب منك تشغيل الرسالة بزر ماكرو او من خلال نفس الصفحة عمل تشغيل للماكرو اي استفسار اعلمني من فضلك

السلام عليكم انا الان مشغول وساحاول عمل تنظيم للجداول وارسل لك الملف بعد التعديل لعله يساعدك مع الشكر

جزاك الله خيرا