حمادة عمر

السلام عليكم الاخ الكريم / عبد الغني(aspiran) بارك الله فيك مرورك دائما يسعدني كثيرا شرفتني اخي بحضورك الجميل جزاك الله خيرا

السلام عليكم الاخ الكريم / جلال محمد بارك الله فيك مرور يسعدني كثيرا جزاك الله خيرا

السلام عليكم اخي احمد عبد الناصر ... جزاك الله خيرا بالفعل كود في غاية الجمال

بارك الله فيك اخي الكريم وجزاك الله خيرا

السلام عليكم الاخ الكريم / hesham rayan بارك الله فيك جزيل شكري وامتناني لمروركم وابداء رأيكم جزاك الله خيرا الآن : اكسيل 2003 ( 19 ) صوت اكسيل 2007 ( 13 ) صوت اكسيل 2010 ( 9 ) صوت اكسيل 2013 ( 3 ) صوت

السلام عليكم بارك الله فيك اولا : اقدم كل الشكر لاخي الحبيب / ضاحي الغريب ... جزاه الله خيرا فهو دائما سباق لفعل الخير دائما وجزيل شكري علي ذكره اسمي دائما ... بارك الله فيه الاخ الكريم / hossam kamel شاهد الرابط التالي بعنوان ( طريقة عمل فورم فاتورة ووضع اكوادها وترحيلها واستدعائها وطباعتها !! خطوة خطوة ) http://www.officena.net/ib/index.php?showtopic=46420 وبه شرح لاكواد الترحيل من الفورم ... سطر سطر ... ارجو ان يفيدك اخي الكريم مادمت تريد فهم الاكواد وتعديلها بنفسك جزاك الله خيرا

السلام عليكم الاخ الفاضل / الصاوي حسن بارك الله فيك مرورك يسعدني دائما اخي صاوي جزاك الله خيرا

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

السلام عليكم احببت ان اضيف بعض الروابط للموضوع للاستفادة لمن يبحث عن هذا النوع من الاكواد رابطين بهم اكواد راائعة فمثلا (( كيف نجعل الملف ينتحر و يحدف نفسه من الجهاز تلقائيا ! )) .... واكواد اخري مفيدة جدا http://www.officena.net/ib/index.php?showtopic=45608&hl=%D9%8A%D9%86%D8%AA%D8%AD%D8%B1#entry269390 http://www.officena.net/ib/index.php?showtopic=45970&hl=%D9%8A%D9%86%D8%AA%D8%AD%D8%B1#entry272932 والكشر موصول للاستاذ القدير / زياد علي ... جزاه الله خيرا

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

السلام عليكم الاستاذ القدير / احمد يعقوب بارك الله فيك طريقة جميله ومجهود راائع حقا جزاك الله خيرا

السلام عليكم الاخ الكريم / أيوب بارك الله فيك الاخ الحبيب / شوقي ربيع ... جزاك الله خيرا بالفعل حل جميل وحركة حلوة واظن انه يفي بالغرض مع اخفاء ملف الاكسيل وجعله visible مع ظهور الفورم خاصتك وبعد اذنك ... يمكنك اخي / ايوب ايضا باستخدم الكود الموجود في الملف المرفق والخاص بتصغير ملف الاكسيل بجوار الساعة في الفترة التي تريدها واظهاره بعد انتهاء عمليه الاستدعاء جزاك الله خيرا تصغير الملف2003.rar 2007تصغير_الفورم إلى جوار_ الساعة.rar

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

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

السلام عليكم الاخ الكريم / حسام غباشى بارك الله فيك اولا لا اعلم اين المشكله لديك ... ولكن الملف يعمل لدي بالطريقة الصحيحة المطلوبه استفسار ... ماهو اصدار الاوفيس لديك ؟؟ وعلي العموم ... قم بتحميل المرفقات وعلي حسب اصدار الاوفيس لديك قم بفك ضغط الملف وفقط قم بالضغط عليه بعد فك الضغط 2 كليك وسيتم ارجاع الاعدادات الاصلية للاكسيل لديك ( باذن الله ) وستحل المشكله اكسيل 2003 MyBasicExcel_2003.rar اكسيل 2007 ، اكسيل 2010 MyBasicExcel_10.rar MyBasicExcel_12.rar جزاك الله خيرا

السلام عليكم الاخ الكريم / هاني مصطفي بارك الله فيك وكل الشكر والتقدير لشخصكم الكريم جزاك الله خيرا

السلام عليكم الاخ الكريم / هاني مصطفي بارك الله فيك جزاك الله خيرا

السلام عليكم الاخ الكريم / هاني مصطفي بارك الله فيك جزاك الله خيرا

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

السلام عليكم الاستاذ القدير العلامة الخبير / عبدالله باقشير بارك الله فيك استاذنا القدير كل الردود بعد ردك تساوي لاشئ فلقد اجبت فأحسنت فأبدعت فأوجزت والمرفق خاصتي هو باستخدامي احد اعمالك استاذنا واضافة لطلب آخر للاخ / محمد مصراوي ... في الموضوع الاساسي وفي الملف الموجود بهذا الموضوع طلبه بكود للانتقال للصفحات سأقدم له هذا الكود من اعمالك ايضا ( كود الانتقال للصفحات ليستخدمه في ملفه ) Sub GO_TO() On Error Resume Next Application.CommandBars("Workbook Tabs").Controls("More Sheets...").Execute If Err.Number > 0 Then Err.Clear Application.CommandBars("Workbook Tabs").ShowPopup End If ActiveWindow.ScrollColumn = 1 ActiveWindow.ScrollRow = 1 On Error GoTo 0 End Sub جزاك الله خيرا

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

السلام عليكم الاخ الكريم / هاني مصطفي بارك الله فيك وجزيل شكري وامتناني علي كلماتك الراائعة وثقتك الغاليه جزاك الله خيرا

السلام عليكم الاخ الكريم / هاني مصطفي جمعة مباركة بارك الله فيك تقبل تحياتي جزاك الله خيرا

السلام عليكم الاخ الكريم / هاني مصطفي بارك الله فيك استخدم اخي الكود التالي في حدث الفورم Initialize كالتالي : Private Sub UserForm_Initialize() On Error Resume Next Sheets("Sheet1").Select Dim mycol As Collection Dim myrng As Range Set mycol = New Collection For Each myrng In Range("a1:a10000") mycol.Add myrng.Value, myrng.Text Next myrng For i = 1 To mycol.Count Me.ComboBox1.AddItem mycol(i) Next i End Sub ارجو ان يكون هذا هو طلبك كما تريد جزاك الله خيرا HANY++.rar

السلام عليكم الاخ الكريم / محمد مصراوى بارك الله فيك ارجو ان انبهك حضرتك بانه تم الرد في الموضوع الاساسي حيث انك قمت بوضع موضوع جديد به نفس الطلب ... واظن انه يعتبر مكرر http://www.officena.net/ib/index.php?showtopic=46480&hl= جرب المرفق التالي به فورم آخر لاضافة شيت جديد كما تريد باسم العميل الذي تريده من احد اعمال الاستاذ القدير / عبد الله باقشير ... تم اضافة الجزء الخاص بترحيل اسم العميل الي صفحة العملاء جرب ذلك ... جزاك الله خيرا اضافة ورقة عبر فورم11.rar