omar elhosseini

الاخ asaz تحياتى لم استطع الوصول لرابط الموضوع وضعت لك الملف بالمرفقات ملف لاستاذنا على السحيب به الطريقة التى اشرت اليها بالنسبة للحفظ من قائمة : ملف / حفظ بأسم ثم اختار نوع الملف المحفوظ ( csv ) تحياتى ______________.rar

لاخ ن-1 تحياتى الدالة السابقة مصممة لتعمل مع العملات التى اجزائها الف جزء حسب طلب الاخ مجيد وما تقصده انت دالة تعمل مع العملات التى اجزائها مائة جزء ولكن لابأس توجد دالة اخر للاستاذ ابو هانى جزاه الله كل خير المرفقات بها ملف به اكواد الدالة اذا اردت ان تكون طريقة عملها بنفس اسلوب الدلة السابقة لتعمل مع كل الملفات : قم بحفظ الملف من القائمة : ملف / حفظ بأسم وفى اخر القائمة المنسدلة المسماة (حفظ بنوع) اختار النوع (xla) هو اخر نوع فى المجموعة لاتنسى بعد تحديد النوع ان تحدد مكان الحفظ سينتج ملف "AddIn" ذو نهاية (xla) ثم اتبع الخطوات فى المشاركة السابقة رقم 5 تحياتى _______2.rar

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

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

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

بسم الله الرحمن الرحيم الاخ أحمد العيسى انظر الى تاريخ مشاركتك اخى ستجد ان اليوم هو اليوم الثالث لها اخى ونحن لسنا ازرار تضغط عليها فتجيب ولا نقصد التجاهل وعدم الرد لنا حياتنا الخاصة وظروفنا التى قد تشغلنا عنكم وطالما انت مهتم بهذا الموضوع كان لى موضوع عن (تخطى الغرب مستوى امان الماكرو) عن هذا البرنامح واذا كنا نلوم بعض فلماذا لم تشترك بالموضوع اذا كنت متابعا جيدا للمنتدى . والبرنامج قمت سابقا بتحميله من المنتدى من مشاركة للاخ "smail d" ولكن لم استطع الوصل اليها الان لاشير لك عنها وايضا يوجد مشاركة عن هذا البرنامج بالمنتدى للاخ فلسطينى فمن منا المقصر وسبب انشغالى اخى هو لكم اقوم بتجهيز موضوع ارى انه جيد وهام وسيتم طرحه اليوم او غدا فى الموضوع "الحلول الذكية" وسياعد الكثيرين من الاعضاء فى حل كثير من المشاكل التى تقابلهم اورجو رأيك عند طرح الموضوع فقد يشفع لى تأخرى فى الرد واليك الملف بالمرفقات تحياتى للجميع XLtoEXE.rar

تحياتى للجميع لقد قمت بتعديل صيغ المدى الاول والثانى واستبعاد رؤوس الاعمدة ليسهل التوضيح فسيكون الملف الذى بالمرفقات يعمل مع ارقام فقط فى عمود اسم الصورة لسهولة الشرح عليه اما الملف السابق فهو يعمل مع الارقم او وصف للصور او اسم للصورة فى عمود اسم الصورة اولا : فكرة عمل الملف تعتمد الفكرة على عدد 2 مدى ديناميكى وهما Name RefersToLocal Picture =OFFSET(الصور!$B$2;الالبوم!$A$2-1;0;1;1) PictureList =OFFSET(الصور!$A$2;0;0;COUNTA(الصور!$A$2:$A$30000);1) المدى الثانى المسمى ( PictureList ) يعمل فى الورقة التى بها كل الصور المسماه (الصور) على العمود (A) بدأ من الصف الثانى طالما خلية العمود (A) تحتوى على رقم مسلسل ولا علاقة له بالصور ويتحدد عدد صفوف هذا المدى حسب وجود بيانات فى العمود (A) وعلى الاكثر 30000 صف كما هو محدد فى صيغة المدى =OFFSET(الصور!$A$2;0;0;COUNTA(الصور!$A$2:$A$30000);1) المدى الاول المسمى ( Picture) =OFFSET(الصور!$B$2;الالبوم!$A$2-1;0;1;1) وهو ايضا يعمل فى نفس الورقة التى بها كل الصور المسماه (الصور) على العمود (B) وهو يأخذ الرقم من القائمة المنسدلة ومنه يحدد نطاق خلية واحدة التى تحتوى على صورة مقابلة لهذا الرقم فى العمود (B) ما سبق سهل تنفيذه لعمل النطاقات المحددة والان نأتى الى اهم نقطتين وهما كيف ننشأ الملف وما هو سر ذلك النقطة الاولى : ادراج الصور فى الورقة الثانية المسماه (الصور) يجب ادراج الصور فى العمود (B) بدأ من الخلية (B2) من قائمة ادراج ثم صورة ويجب مع الملف الموجود فى المرفقات ان يحتوى العمود الاول على ارقام مسلسلة مقابل الصور اما الملف الاول فيمكن ان يحتوى على ارقام او اسم الصورة فى العمود الاول نأتى الى النقطة الثانية : وهى بسيطة جدا ولكن قد تغيب عن الذهن الا وهى قم بنسخ اى صورة من الورقة الثانية الى الورقة الاولى فى اى مكان واضبط حجم الصورة لاحظ ان الصور المنسوخة لاتهمنا فى شئ ولكن القصد منها تحديد حجم الاطار الذى سيتم من خلاله عرض الصور وقم بوضعها ايضا فى اى مكان تريد الاهم من ذلك هو قم بأختيار الصورة المنسوخة الوحيدة الموجودة فى الورقة الاولى وفى شريط الصيغ قم بتسميتها بأسم المدى الاول (Picture) يعنى وانت مختار الصورة اكتب فى شريط الصيغ الاتى =Picture وبكدة تكون هذه الصور هى نطاق معرض الصور الطائر ويمكنك تحريكها الى اى مكان او تغير حجمها وهذه هى اهم خطوة فى الموضوع ليعمل الملف بدون اى اكواد وبكل سهولة ويمكن توظيف الفكرة بطرق مختلفة مع مجموعة دوال (LOOKUP) ليكون اى استعراض للبيانات مصحوبا بصورة اتمنى ان اكون استطعت التوضيح توجد هدية لأعضاء المنتدى فى موضوعى (الحلول الذكية لمشاكل الإكسيل) ضمن (شريط أوفيسنا للأدوات الذكية) سيتم اضافة الايقونة الماسية (الحل المريح والسريع لنقل الاكواد بين الملفات بضغطة زر واحدة فقط ) إن شاء الله غدا فقد قاربت على الانتهاء تحياتى للجميع المرفق ملف البوم الصور معدل للشرح Show_Pictures1.rar

استاذنا علي السحيب اسف على عدم التوضيح امس كنت مرتبط بموعد وفى عجالة سأوضح فكرة عمل الملف تحياتى

اخى مجيد لتعمل داله التفقيط يجب نقل كود الداله الى الملف المراد العمل عليه ولكنك تريد ان تعمل الداله مع جميع الملفات ولذلك عملت لك دالة ابو هانى للتفقيط على شكل ملف "AddIn" لتكون الدالة متاحة لجميع الملفات على هذا الجهاز 1 - قم بفك الضغط عن الملف المرفق 2 - قم بنسخ الملف الى هذا المسار C:\Program Files\Microsoft Office\OFFICE11\Library 3 - من قائمة ادوات اختار وظائف اضافية 4 - ستجد بند بأسم ( التفقيط ) ضع علامة الصح عليه ثم اضغط زر موافق 5 - بذلك تكون الداله متاح لاى ملف موجود على الجهاز مع ملاحظة انه اذا تم نقل الملف الى جهاز اخر لن تعمل الا بتنفيذ الخطوات السابقة عليه الصيغة المستخدمة مع دالة ابو هانى للتفقيط هى =NoToTxt2(D5;"دينار";"درهم ") ضع الصيغة فى اى خلية ادخل الارقام فى الخلية الموجود فى الصيغة وهى الخلية (D5) فى انتظار النتيجة تحياتى _______.rar

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

بسم الله الرحمن الرحيم الاخ lord الاخ nse تحياتى للجميع استاذنا علي السحيب تحياتى لك يعتمد ربط ألبوم الصور بالقائمة المنسدلة على النطاق الديناميكى "Dynamic Ranges" المسمى "PictureList" =OFFSET(الصور!$A$1;1;0;COUNTA(الصور!$A:$A)-1;1) ملحوظة : فى ورقة الالبوم الصورة المتغيرة يمكن نقلها الى اى مكان حتى لو كان ورقة اخرى وستعمل ايضا . تحياتى للجميع

الاخ rashad شاهد المرفق تحياتى _____________.rar

بسم الله الرحمن الرحيم تحياتى للجميع ( ده انت كسرت العمود ) اخى lord الملف بالمرفقات واستخدامة سهل جدا الملف يحتوى على ورقتين الورقة الثانية المسماه ( الصور ) يتم تخزين الصور بها فى العمود " B " امام الارقام الفارغة قف فى خلية فارغة فى العمود " B " امام اخر رقم فارغ ومن قائمة ( ادراج ) ثم (صور) ثم (من ملف) وقم باختيار اى صورة تريد وضعها فى الالبوم اظن سهل جدا حتى الان الورقة الاولى المسماه ( الالبوم) هو معرض الصور او البوم الصور يحتوى على قائمة منسدلة يمكنك اختيار اسم الصورة المراد عرضها ويحتوى ايضا على زر زيادة ونقصان لاستعراض الصور تباعا تحياتى Show_Pictures.rar

الاخ مجيد تحياتى لك ضع الكود المستخدم بالمنتدى لمحاولة عمل اللازم عليه تحياتى

شرفنى مروركم الكريم تحياتى

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

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

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

الاخ محمد خالد تحياتى لك كان فى الموضوع الرئيسى (التحكم بأشرطة الادوات والقوائم المنبثقة) فى المشاركة رقم 1 كان هناك شرح يتضمن ما تطلب ولكن تم الغاءه من الموقع المستضيف والان اعدت تحميل الشرح على موقع أوفيسنا ليكون متاحا للجميع وسوف تجد اجابة سؤالك فى نهاية المثال رقم 2 واسم شريط تاب الاوراق "PLY" ملحوظة 1 - ارجو ان يكون اى استفسار بخصوص هذا الموضوع فى صفحة الموضوع الرئيسية (التحكم بأشرطة الادوات والقوائم المنبثقة) 2 - ارجو ان لا تنسى عند حجب اى شريط ادوات ان تقوم بإظهارة مره اخرى عند غلق الملف بوضع امر اظهاره فى حدث الغلق . تحياتى

الشرح

بسم الله الرحمن الرحيم تحياتى للحميع الاخ الكريم harv نحن بكم ذهبا ............ ودونككم يذهب الذهب الاخوة الاعزاء بخصوص المشاركة الاولى من هذا الموضوع وبها الملف المرفق المسمى "Omar.rar" كان بها شرح لأستخدامات هذا الملف ولكن تم ازالتة من الموقع المستضيف واليكم الشرح على موقع أوفيسنا ليكون تحت امركم دائما

بسم الله الرحمن الرحيم الاخ محمد خالد تحياتى لك انظر هذا الرابط http://www.officena.net/ib/index.php?s=&am...ost&p=61133

بسم الله الرحمن الرحيم الاخ محمد خالد تحياتى لك الصيغة المستخدم حتى تسطيع ايقاف عمل مفتاح محدد او مجموعة مفاتيح فمثلا عندما نريد الغاء عمل مفتاح HOME نستخدم الامر الاتى Application.OnKey "{HOME}", "" واليك اخى فى الملف المرفق قائمة بمعظم المفاتيح التى يمكن استخدامها فى الاكسيل Keys.rar تحياتى

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

شكرا اخى lord