اسلام سيد

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

السلام عليكم ورحمة الله وبركاته مشكله في الكود هذا كود لعمل hyper link الارتباط التشعبي من فديو علي اليوتيوب (سلسله تعلم اونلاين ) لكن الكود عند تنفيذة لا يعمل معى ويعطى خلال فى الاوامر Sub listallsheets2() Dim sht As Worksheet Dim i As interger i = 2 for each sht in work sheets i = i + 1 Active Sheet.Hyperlinks.Add _ anchor:=cells(i,2), _ address:="", _ sub address:=sht.name&"!a1", _ Text todisplay:=sht.Name nextsht End Sub الارتباط التشعبي.rar

السلام عليكم والله يا استاذ / زاكي موضوع رائع ولو تم ... لجعلنا الاكسيل به ( القرآن الكريم ) نسمعه طيله فترة العمل جزاكم الله خيرا

السلام عليكم جزاكم الله خيرا يا استاذ خالد عمل رائع وجار دراسة البرنامج ويرجى الانتباة الى تعديل اسم الظهور من اللغه الاجنبيه الى اللغه العربيه ( من قواعد المنتدى)

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

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

جزاكم الله خيرا وزادكم من فضله

شكرا لكم على محاولتكم مساعدتى

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

السلام عليكم ورحمة الله وبركاته كيف يمكن ازالة ال table من اكثر من ورقة عمل فى الاكسيل مره واحده

السلام عليكم ورحمة الله وبركاته تقبل الله منكم استاذنا الغالى / مجدى يونس اسال الله ان يفتح لك ابواب رحماته وان يديم عليك الصحه والعافيه لاتنسانا من صالح دعاؤكم

جزاكم الله خيرا ** استاذنا الفاضل ** أبوخليل **

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

للرفع

السلام عليكم الف مليار مبروك استاذ الغالى عباد ( ابو نصار ) لم انسى انك اول من ساعدتى فى اجابة اول سؤال لى على المنتدى http://www.officena.net/ib/index.php?showtopic=44696&hl= فجزاك الله خيرا .........الى الامام دوما...........ولا تحرمنا من وافر علمك

السلام عليكم ورحمة الله وبركاته هل يمكن استيراد بيانات من الاكسيل الى الاكسيس بطريقه متتاليه فى نفس المكان ؟؟؟؟؟؟ التوضيح : عندى ملف اكسيل به حوالى 90000 سطر هل يمكن استيرادهم الى الاكسيس وحفظهم بشرط اريد ان اضيف عليهم بصفه مستمرة (اضيف على 90000 ) فى نفس صفحه الاكسيس لتكون الاضافه الجديده متتاليه اسفل ال 90000 سطر ملاحظه : إن الاضافه تكون ايضا عن طرق الاستيراد من شيت اكسيل يبدأ بالاضافه (ليس به إلا الجديد) كيف يحدث ذالك وجزاكم الله خيرا ؟؟؟؟؟؟؟؟؟؟؟؟؟؟

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

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

السلام عليكم تسلم الايادى يا استاذ قنديل

كل عام انتم بخير

السلام عليكم الاخوة الكرام هذة اكواد للاستاذ الفاضل / عباد ابو نصار لجعل الاكسيل يقوم بالحفظ كل 60 ثانية يقوم بحفظ الملف كل دقيقة هذه الأكواد في مودويل Public Rm As Double Public Const C_Con = 60 Public Const Sc_W = "Ex" Public Sub St_A() Rm = Now + TimeSerial(0, 0, C_Con) Application.OnTime EarliestTime:=Rm, Procedure:=Sc_W, Schedule:=True End Sub Sub Ex() Application.DisplayAlerts = False ThisWorkbook.Save Application.DisplayAlerts = True St_A End Sub وهذه في حدث Thisworkbook Private Sub Workbook_Deactivate() Call St_A End Sub Private Sub Workbook_Open() Call St_A End Sub وممكن الرجوع الى اصل الموضوع http://www.officena.net/ib/index.php?showtopic=45107&hl

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

السلام عليكم استاذ شوقى ربيع فكرة جميله جدا بارك الله فيك

السلام عليكم ورحمة الله وبركاته بعد اذن الاستاذ / قنديل الصياد الين اليابانى.rar

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