اذهب الي المحتوي
أوفيسنا
بحث مخصص من جوجل فى أوفيسنا
Custom Search

حسين بلال

03 عضو مميز
  • Posts

    167
  • تاريخ الانضمام

  • تاريخ اخر زياره

كل منشورات العضو حسين بلال

  1. السلام عليكم أخي أبو حنين وجزاك الله خيراً على مساعدتك. هل من طريقة اتفادى بها وضع ازرار على الصفحة. هذا سيربك المستخدم النهائي. هل من طريقة لقفل الصفحة بشكل كامل وفعال من خيارات الاكسل او ع القليل بواسطة كود لكن بطريقة مخفية؟؟؟
  2. السلام عليكم ماهي افضل طريقة لقفل ورقة عمل في اكسل حيث أن لدي ورقة عمل اريد ان اخفي المعادلات فيها مع اعطاء صلاحية تغيير قيم بعض الخلايا فقط. اعلم طريقة القفل العادية لقفل ورقة عمل لكن وكما تعلمون يوجد هذه الأداة الجبارة والمضافة من قبل الأستاذ محمد الصالح, http://www.officena.net/ib/index.php?showtopic=29972 لذا هل من طريقة لتحقيق قفل ورقة عمل دونوجود احتمال ان تتغلب هذه الادة على كلمة السر لأنني جربت كلمات سر معقدة لكنها كانت دائماً تكسر بواسطة هذه الأاداة. جزيل الشكر سلفاً.
  3. السلام عليكم احتاج لماكرو يقوم بتحويل المواعيد المحفوظة على برنامج اوت لوك قبل موعد استحقاقها بربع ساعة إلى رسالة ترسل الى بريدي الإلكتروني. وجدت كهذه الخدمة لكنها مدفوعة فهل من بديل رجاءاً؟ جزيتم خيراً سلفاً. رمضان مبارك
  4. السلام عليكم نظراً لاهمية الحفاظ على كل عنوان بريد الكتروني نتعامل مع صاحبه ( كونه زبون أو لنا علاقة عمل معه ) فإنه من المهم اضافة هذه العناوين الى دفتر العناوين لحفظها لحين الرجوع اليها مستقبلاً مع كامل البيانات المتاحة عن صاحب هذا البريد كاسمه ومنصبه وشركته وارقام تلفوناته ...... لذلك فأنا اطلب مساعدتكم رجاءاً للحصو على ماكرو او اضافة للآوت لوك تتيح لي حفظ كل بريد جديد اقوم بمراسلته. وجدت في النت اشياء مشابهة لكنها مأجورة فهل من حل رجاءاً؟ انا استخدم اصدار 2007. ارجو ان اجد لديكم حلاً لما اريد. بأمان الله.
  5. السلام عليكم احتاج وبشدة برنامج يساعدني ولو قليلاً في تنظيم عملية التحصيل في الشركة التي اعمل بها سواءاً للديون المتعثرة أو الشيكات الراجعة من البنك بما في ذلك تسيل المتابعات مع كل زبون بهدف الرجوع اليها في المستقبل وتسجيل الوعود بالسداد وما الى ذلك. هل من برنامج متوافر لديكم يفيدني في هذا الخصوص رجاءاً؟؟؟
  6. حياك الله أخي طارق. اعرف عمل هذه الدالة لكن المطلوب هو التالي انا اريد معرفة مقدار الفائدة من كل قسط, مثلاً اقسط الأول قيمته 1000 ريال, منه 400 فوائد و 600 أصل القرض, القسط الثاني 1000 ريال منه 380 فوائد و 620 أصل القرض وهكذا. الفكرة انني اعمل في شركة بيع سيارات ويأتينا زبائن يريدون دفع المتبقي على سياراتهم بشكل مسبق فيقومون بضرب قيمة السيارة الأصلية بسعر الفائدة المأخوذة منهم بالمدة الزمنية التي مضت ويطالبونا باعادة الباقي لكن ذلك يكلفنا الكثير فنحن نحصل على تمويل ونعطي تمويل بالمقابل. لذلك كنت اسأل عن هذه الطريقة لأنها تماثل مايقوم به البنك إذا أنه يعيد اصل القرض المتبقي في حال اردت سداده باكراً بعد ان يكون قد خصم شهرياً فوائده والتي هي محسوبة بطريقة متناقصة. أرجو أن يكون طلبي واضحاً أخي طارق. جزاك الله خيراً ووفقك لما يحب ويرضى
  7. السلام عليكم تقوم البنوك عادةً بمنح قروض بدفعات شهرية ثابتة وليكن لمدة 3 سنوات وكذلك سعر الفائدة ثابت لكنهم يحسبون الفوائد بطريقة تنازلية اي ان كل قسمط سيحوي جزء من الفائدة وجزء من اصل القرض, الأقساط الأولى ستحوي جزء أكبر من الفوائد مقارنةً بالسنوات الأخيرة. هل لكم بمساعدتي بحساب هذه الفوائد خلال عمر القرض من فضلكم.؟؟؟
  8. السلام عليكم رأيت سابقاً اضافة إلى برنامج اكسل تمكنك من فك حماية أي ملف اكسل, هل يوجد أداة مشابهة لوورد؟؟
  9. أخي الكريم هل تمت التجربة فقط أخبرني إن كنت مازلت محتاج شئ السلام عليكم أخي طارق, اعتذر عن التأخير, الكود يعمل بشكل ممتاز جداً, جزاك الله خيراً ووفقك لما يحب ويرضى.
  10. الأخ طارق, بارك الله فيك مجدداً, ستتم تجربة فعالية الكود يوم الأحد إن شاء الله باعتبار أننا الآن في عطلة نهاية الإسبوع ولا يوجد لدي بيانات من العمل للتجربة. لكن هل باضافة طلب قد يكون بسيطاً إن شاء الله وهوبعد القيام بعملية التقسيم, هل من الممكن اضافة صفحة معلومات بعد الصفحة الرئيسية التي تحوي البيانات الأصلية مباشرةً حيث يتم وضع اسماء صفحات العمل التي تم تقسيم البيانات إليها مع تبيان عدد المعاملات في كل صفحة, مجموع قيمة المعاملات في كل منها. الأخ aah_aah2008, جزاك الله خيراً ووفقك لما يحب ويرضى, سأقوم بتجربة ما اضفته أخي الكريم. بارك الله فيكم مجدداً.
  11. السلام عليكم الأخ طارق, جزاك الله الجنة, سأقوم بتجربة الملف وارد لك بملاحظاتي في حال وجدت. اعتذر طبعاً عن موضوع المثال وموضوع الحماية فهما غير مقصدوين طبعاً.
  12. اعتذر عن الإلحاح لكن فعلاً للأهمية وفقكم ربي لما فيه خيركم وفلاحكم.
  13. السلام عليكم يأتيني من قبل بنك خارجي صفحة فيها بيانات عملاء وطلبات شراء لأوراق مالية لهم, يجب علي تقسيم هذه الطلبات على موظفي مكتبي المتوافرين, يجب أن يأخذ التقسيم بالإعتبار عاملي العدد والقيمة للطلبات, أي أنه لو كان لدي 12 طلب وأريد تقسيمها على 3 أشخاص فإنني التقسيم يجب أن يكون 4 معاملات لكل شخص ومجموع القيم للأشخاص الثلاثة متقاربة من بعضها البعض قدر الإمكان, كل قسم يكون في ورقة عمل جديدة.عدد الأعمدة ثابت ولا مشكلة فيه لكن المشكلة في عدد الطلبات وكذلك عدد الموظفين المتاحين ( ليتم تقسيم العمل عليهم ) وبالتالي فهذين العنصرين هما عنصران متغيران. أرجو أن أجد لديكم الحل المناسب لما طلبت. لكم جزيل الشكر والإمتنان. ارفق لكم مثال عن طلبي. help.zip
  14. السلام عليكم اعتقد بأنه عليك فقط تغيير اليقونة من خصائص اﻷيقونة نفسها.
  15. السلام عليكم أخي العزيزي أيسم وأخي أبو عبد الله, جزاكم الله خيراً ووفقكم لما يحبه ويرضاه, لكن الكود من مشاركة أي أخي أيسم لن يفيدني لأنني ليس لدي معرفة كبيرة بكتابة الأكواد, أما مشاركة الأخ أبو عبد الله فهو كود جميل جداً لكن المشكلة أنه سيأكل من وقتي الكثير. بكل الأحوال, حل الأمر عن طريق رد حصلت عليه بموقع اجنبي وتم اعطائي الكود التالي Sub CombineWithSpace() Dim A As Range Dim Cell As Range Dim FirstCell As Range Dim I As Long For Each A In Selection.Areas If FirstCell Is Nothing Then Set FirstCell = A.Cells(1, 1) For I = 1 To A.Cells.Count If A.Item(I) <> FirstCell Then FirstCell = FirstCell & " " & A.Item(I) A.Item(I) = "" End If Next I Next A End Sub Sub CombineWithNoSpace() Dim A As Range Dim Cell As Range Dim FirstCell As Range Dim I As Long For Each A In Selection.Areas If FirstCell Is Nothing Then Set FirstCell = A.Cells(1, 1) For I = 1 To A.Cells.Count If A.Item(I) <> FirstCell Then FirstCell = FirstCell & A.Item(I) A.Item(I) = "" End If Next I Next A End Sub أضع الكود هنا للإفادة لي وللجميع, طبعاً يمكن تحديد اختصار للكود بعد اضافته وبالتالي سيكون لدينا كودين, واحد للدمج مع فراغ والثاني بدون فراغ. وفقكم الله ووفقنا لما يحب ويرضى
  16. جزاك الله خيراً أخي أيمن, اعرف الطريقة عن طريق الدوال لكن ذلك سيأخذ الكثير من الوقت عندما نتحدث عن كشف حساب يتكون من حوالي 5000 سطر ثم هذه التغييرات ليست ثابتة للتنفيذ المهمة بطريقة السحب للمعادلة أرجو أن يكون الأمر أوضح بالنسبة إليك أخي أيمن
  17. السلام عليكم بدايةً جزاك الله خيراً ووفقك لما يحب ويرضى. حملت المرفق لكن لايوجد فيه أي ماكرو, تأكدت من خلال دخولي إلى محرر الفيجوال بيزك, عموماً أرجو منك التأكيد على الملف وارشادي لطريقة عمله, لكن لاحظت من خلال القيم التي أوردتها كمثال بأن النتيجة ستكون في صفحة ثانية لكن الذي جعلني ألجأ لفكرة الماكرو هذه هي عدم رغبتي بالدخول في متاهة النسخ واللصق والحذف لتعديل الملف الذي أعمل عليه لأن هذا الأمر سيأخذ الكثير الكثير من وقتي. وفقك الله لما يحب ويرضى
  18. السلام عليكم ورحمة الله وبركاته أواجه حالات كثيرة في عملي حيث أنني استلم من البنوك أو الشركات الأخرى كشوف حسابات على صيغة PDF فأقوم بتحويلها إلى لاحقة اكسيل بغرض استخدامها في عملي, أواجه مشكلة وهي بأن البرنامج سيقوم بتحويل كل سطر إلى خلية وبالتالي سيكون في السطر الواحد من ملف الأكروبات, أكثر من سطر في ملف الإكيل وغالباُ ماتكون هذه المشكلة بسبب عمود النص والذي يكون فيه كلمات كثيرة كشرح للعملية الموجودة في السطر المحدد, وبالتالي فأنا بمشكلة كبيرة مفادها أنني لن أستطيع القيام بأي عمليات فلترة أو فرز ...... على هذه الصفحة لأني سأفقد البيانات الموجودة في الأسطر الباقية طيب, المطلوب من فضلكم طبعاً: أريد ماكروا يقوم بالتالي, لو حددت أكثر من خلية من ضمن عمود واحد, أن يقوم بدمج محتويات الخلايا المحددة مع اضافة فراغ واحد فيما بينهاعلى أن تظهر النتيجة في الخليا العليا, باقي الخلايا فارغة. مثال, لو كانت محتويات الخلايا الثلاثة التالية A1= How A2= Are A3= You بدون فراغات فيما بينها بعد تطبيق الماكرو المطلوب, ستكون النتيجة كالتالي A1= How Are You A2=A3=empty طيب, لو تم تحديد أكثر من خلية في سطر وحد, فإنه سيتم وضع القيم التي كانت في الخلايا المحددة بأول خلية من الخلايا المحددة مع الفصل فيما بينها بفراغ واحد مع تفريغ الخلايا الباقية مثال A1= How B1= Are C1= You بدون فراغات فيما بينها بعد تطبيق الماكرو المطلوب, ستكون النتيجة كالتالي A1= How Are You B1=C1=empty لو أردنا أن يكون الماكرو مثالياً, ( لكن هذه الحالة ليست ملحة كسابقاتها ) في حال تحديد خلايا متجاورة في أكثر من سطر وعمود, فستكون النتيجة هي جميع القيم على الترتيب للخلايا المحددة مع وجود فراغ فيما بينها مثال A1= How B1= Are C1= You A2= ? B2= what? عند تحديد الخلايا A1:D2 وتطبيق الماكرو المطلوب, فإن النتيجة هي A1= How Are You ? What? B1=C1=A2=B2=D2= empty ملاحظات على الماكرو المطلوب, في حال تحديد خلية أو خلايا فارغة, تعامل معاملة الخلايا المليئة, وذلك بأن يضاف فراغ قبلها وبعدها لأني لا أريد تعقيد العملية كثيراً عليكم. ملاحظة أخرى, طلبي كان بأن يقوم الماكرو باضافة فراغ واحد فيما بين محتويات خليتين, لو كان بالإمكان أن يكون الماكرو اختيارياً بأن يتم الدمج مع فراغ فيما بين القيم المدموجة أو بدون فراغ لأنه أحياناً تكون المشكلة برقم وبالتالي فيجب الدمج بدون فراغ. ملاحظة أخيرة, أرجو أن يكون الماكرو قابلاً للإستخدام عن طريق اختصارات الكيبورد وليس عن طريق الأزرار أو فورم وأرجو ألا يحوي الماكرو على أي كلمة عربية كون الأجهزة في المكان الي أعمل فيه لايوجد فيها أي لغة عربية بالغالب الأعظم وبالتالي سيتولد اخطاء من جراء وجود هكذا كلمات ولو كانت اسم الشيت نفسه جزاكم الله خيراً ووفقكم لما يحب ويرضى
  19. السلام عليكم بدايةً بحب ابدي اعجابي بالطريقة المذكورة أعلاه لأنها فعلاً ذكية, الفكرة أخي قائمة على نوع الخط, الأحرف اللي ذكرتها إذا تم كتابتها بخط Wingdings 3 رح تظهر على شكل أسهم, يعني لمزيد من التوضيح, روح ع الجدول الأصفر وحدد الأسهم الموجودة ثم غير نوع الخط لها لتكون ِArial ستجد بأنها نفس الأحرف الصغيرة اللي عم تسأل عنها. يمكن عمل المطلوب كذلك بدالة vlookup وفقكم الله لما يحب ويرضى
×
×
  • اضف...

Important Information