ابن الملك

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

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

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

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

اساتذتى الكرام البقيه في حياتكم فى وفاه الاستاذ الكبير عماد الحسامى وسبحان من له الدوام يرجى المساعده فى الملف المرفق وشكرا Passwords.rar

اساتذتى الكرام مرفق لحضراتكم ملف عباره عن شيت اكسيل يتم فيه كتابه الشيكات المصدره من طرفنا و بعد ذلك عند الضغط على زرار Export يتم ترحيل البيانات الى ملف أكسيل اخر وهو البنك وذلك لمتابعه ما من هذه الشيكات تم صرفه من البنك ولكن هناك شروط : 1- ان لا يكون الشيك مكتوب عليه Not Signed أى تحت التوقيع أو Void بصراحه عاجبانى قوى الحته دى 2- ان يتم تحويل ال Pound الى الشيت المسمى Pound 3- ان يتم تحويل ال Dollar الى الشيت المسمى Dollar 4- ان يتم تحويل ال Euro الى الشيت المسمى Euro 5- أذا كان سيريال الشيك من رقم معين الى رقم معين - مذكر بالكود - و العمله Pound يتم ترحيل بيانات السيريال الى شيت Tax الكود يعمل بطريقه جيدة ولكن به أخطاء كثيره هل يمكن مساعدتى ؟؟؟؟؟ وشكرا لكم جزيلا Officena.rar

الساده اساتذتى فى أوفيسنا "أنا عندى ملف أكسيل نزلته بس مش عارف أستخدمه بيقولى قال ايه " عاوز حاجه أسمها VBA Converters - وانا فى حقيقه الامر مش عارف يطلع ايه البتاع ده مرفق لحضراتكم الملف و الرساله اللى بتطلع لى Excel.rar

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

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

الاستاذ مختار تحياتى وبعتذر عن تأخر الرد ولكن هذا حقيقى وليس افتراء ربنا يبارك فيكم وفى كل المنتدى امين . وكل عام وانتم بخير .

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

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

أستاذ مختار تحياتى ليك مرفق لحضرتك الفايل بعد أضافة الكود اللى حضرتك أضفتة " بجد الله ينور " ولكن هل من الممكن اختيار أكثر من ملف بدل من ملف واحد ؟؟؟؟ وهل لو الملف قيد التشغيل أو " للقراءة فقط " هل يتم حذفة ؟؟؟ لانة كثيرا ما يعلق عندنا ملفات على الرغم اننا لا نستخدمها الا أن الويندوز يراها تحت التشغيل ولهذا لا يقبل حذفها او تعديل اسمها !!! وشكرا لتعبك Browse & Delete Folder.rar

أساتذتى فى منتدى اوفيسنا ,,, تحية طيبة ليكم مرفق ملف بة طريقة لعمل بحث عن مجلد ثم حذفة بالكامل هدية صغيرة اشارك بيها معاكم ولكن لسة مش قادر اظبط انى اخلية يعمل بحث وحذف لملف ... بس مش مشكلة هتتدبر وان شاء الله خير . ​ Browse & Delete Folder.rar

الاساتذة الكرام فى منتدى اوفيسنا هو ينفع اعمل قائمة منبقة من قائمة منبثقة الاستاذ على الشيخ . حضرتك عملت Popup Menu > Lower > Upper ممكن اعمل اختيار تانى من جوة Lower بمعنى <<<< Class Menu 1- اختيار رقم 1 2- أختيار رقم 2 أ - أختيار رقم 1 منبثق من أختيار رقم 2 ب- أختيار رقم 2 منبثق من اختيار رقم 2 ج - أختيار رقم 3 منبثق من اختيار رقم 3 3- أختيار رقم 3 4- أختيار رقم 4 أنا طولت اوى معلش

شكرا ليك كتير يا أ على وشكرا لمرور كل السادة الافاضل .

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

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

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

UP

UP

up

up

أساتذتنا الكرام فى أوفيسنا ♥ عندى سؤال جديد هو فى طريقة مثلا على الا كسيل للتحكم بأخفاء وأظهار الملفات و تغيير خصائص ملف مثلا يبقى " قرأءة فقط " أو " مخفى " الخ ...... انا لقيت كود بس كل ما أنسخة على الاكسيل مش بيشتغل هو دة الكود كود تفعيل إظهار الملفات المخفية أو Hidden Files : Dim lResult Private Sub Command1_Click () lResult = RegCreateKey(HKEY_CURRENT_USER, "Software\Microsoft\Windows\CurrentVersion\Explorer\Advanced", hKeyHandle) lResult = RegSetValueEx(hKeyHandle, "Hidden", 0&, REG_DWORD, 1, 4) lResult = RegCloseKey(hKeyHandle) Label1.Caption = "Last Action : Show Hidden Folders Enabled" End Sub أما كود التعطيل لإظهار الملفات المخفية أو Hidden Files : Dim lResult Private Sub Command1_Click () lResult = RegCreateKey(HKEY_CURRENT_USER, "Software\Microsoft\Windows\CurrentVersion\Explorer\Advanced", hKeyHandle) lResult = RegSetValueEx(hKeyHandle, "Hidden", 0&, REG_DWORD, 2, 4) lResult = RegCloseKey(hKeyHandle) Label1.Caption = "Last Action : Show Hidden Folders Disabled" End Sub وشكرا

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