asd2000 قام بنشر مايو 4, 2020 مشاركة قام بنشر مايو 4, 2020 مساء الخير عندي كود والحمد لله يعمل ولكن مشكلتي كل مره اشغل الماكرو يدوي او اضع له زر انا ارغب بان يشتغل الماكرو تلقائي لان الملف اللي عندي كبير والصفحات كثيره مرفق لكم مستند اتمني التعديل عليه ليعمل الماكرو عند فتح الاكسل شاكر لكم 9.xlsm رابط هذا التعليق شارك More sharing options...
أفضل إجابة عبدالفتاح في بي اكسيل قام بنشر مايو 4, 2020 أفضل إجابة مشاركة قام بنشر مايو 4, 2020 ضع الكود في حدث this workbook Private Sub Workbook_Open() Dim c As Range For Each c In Range("c2:c4") c.Formula = "=TickerChart|Live!'QO." & c.Offset(, -2).Value & ".TAD$lasttradeprice'" Next c Dim d As Range For Each d In Range("d2:d4") d.Formula = "=TickerChart|Live!'QO." & d.Offset(, -3).Value & ".TAD$lasttradeprice'" Next d Dim e As Range For Each e In Range("e2:e4") e.Formula = "=TickerChart|Live!'QO." & e.Offset(, -4).Value & ".TAD$lasttradeprice'" Next e End Sub 9.xlsm 1 1 رابط هذا التعليق شارك More sharing options...
عبدالفتاح في بي اكسيل قام بنشر مايو 5, 2020 مشاركة قام بنشر مايو 5, 2020 اعذرني اخي ضع الكود في حدث الملف نفسه Private Sub Workbook_ open رابط هذا التعليق شارك More sharing options...
asd2000 قام بنشر مايو 5, 2020 الكاتب مشاركة قام بنشر مايو 5, 2020 للاسف جميع المحاولات فشلت لايمكن تشغيل الماكرو تلقائي اتمني تفيدوني اين الخلل رابط هذا التعليق شارك More sharing options...
عبدالفتاح في بي اكسيل قام بنشر مايو 5, 2020 مشاركة قام بنشر مايو 5, 2020 لابد ان يعمل اي شي مرتبط بالورقة عندما تفتحها سيعمل ويمكنك تجربة اكواد بسيطة وتقوم بتجربتها ربما مشكلتك مع الموقع المرتبط به قد يوجد شيء غير مفعل لذلك لا تتغير البيانات عند فتح ورقة العمل رابط هذا التعليق شارك More sharing options...
الردود الموصى بها
Join the conversation
You can post now and register later. If you have an account, sign in now to post with your account.