شعبان فليفل قام بنشر أبريل 11, 2017 مشاركة قام بنشر أبريل 11, 2017 Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean) Application.EnableEvents = False Application.DisplayAlerts = False If Target.Column <> 3 Or Target.Count > 1 Then Exit Sub lr = Sheets("Projects").Range("c" & Rows.Count).End(xlUp).Rows.Value Sheets("Sample").Copy after:=Sheets(Sheets.Count) On Error Resume Next x = Len(Sheets(lr).Name) If IsEmpty(x) Then ActiveSheet.Name = lr ActiveSheet.Range("C2") = lr Else Answer = MsgBox("This sheet is allredy exit" & Chr(10) & "do you wnat to replace it?", vbYesNo) If Answer = 6 Then Sheets(lr).Delete ActiveSheet.Name = lr ActiveSheet.Range("C2") = lr Else ActiveSheet.Delete End If End If Application.EnableEvents = True Application.DisplayAlerts = True End Sub برجاء المساعدة في تحويل هذا الكود إلي زر Projects الكود بالملف المرفق في صفحة الـ مشاريع التنفيذ.rar رابط هذا التعليق شارك More sharing options...
شعبان فليفل قام بنشر أبريل 13, 2017 الكاتب مشاركة قام بنشر أبريل 13, 2017 أرجو المساعدة من أصحاب الخبرة منتظر الرد رابط هذا التعليق شارك More sharing options...
شوقي ربيع قام بنشر أبريل 13, 2017 مشاركة قام بنشر أبريل 13, 2017 هذا الكود يعتمد على حدث DoubleClick الخاص بورقة العمل لذى لايمكن ان تربطه بزر لانه لايمكننا معرفة الخلية التي تم الضط المزدوج عليها الا من خلال هذا الحدث يمكن فقط ربطه بزر في حالة ما اذا اردة تنفيذه على خلية معينة تحياتي رابط هذا التعليق شارك More sharing options...
شعبان فليفل قام بنشر أبريل 16, 2017 الكاتب مشاركة قام بنشر أبريل 16, 2017 جزاكم الله خيراً علي الرد كل ما أحتاج إليه إني بدل ما أضغط علي الخليه مرتين علشان أعمل إضافة لعميل جديد اعمل زر يقوم بنفس عمل الكود رابط هذا التعليق شارك More sharing options...
شعبان فليفل قام بنشر أبريل 19, 2017 الكاتب مشاركة قام بنشر أبريل 19, 2017 الاخوة الأفاضل رجاء لو مفيش طريقة أو حل تعرفوني رابط هذا التعليق شارك More sharing options...
حمادة عمر قام بنشر أبريل 19, 2017 مشاركة قام بنشر أبريل 19, 2017 السلام عليكم الاخ الكريم / شعبان فليفل بارك الله فيك وبعد اذن اخي الحبيب / شوقي ربيع .. جزاه الله خيرا شاهد الطريقة التالية في الملف المرفق وهي تعتمد علي وجود ( زر عائم ) يقوم بتنفيذ الامر المطلوب لا يظهر الا عند الوقوف في خانة الملاحظات في العمود K امام اسم العميل الجديد الذي تم اضافته شاهد الطريقة واخبرني بالنتائج تقبل خالص تحياتي مشاريع التنفيذ1.rar 4 رابط هذا التعليق شارك More sharing options...
شعبان فليفل قام بنشر أبريل 19, 2017 الكاتب مشاركة قام بنشر أبريل 19, 2017 (معدل) الأخ الفاضل حمادة عمر طريقة رائعة سلمت يداك طلب صغير ممكن الزر العائم لا يظهر إلا بعد إدخال اسم العميل ولو أمكن شرح للكود علشان محتاج أطبق نفس الطريقة علي كود آخر جزاكم الله خيراً تم تعديل أبريل 19, 2017 بواسطه شعبان فليفل رابط هذا التعليق شارك More sharing options...
شعبان فليفل قام بنشر أبريل 20, 2017 الكاتب مشاركة قام بنشر أبريل 20, 2017 الأخ الفاضل حمادة عمر لو أمكن الزر العائم لا يظهر إلا بعد إدخال اسم العميل بمعني أنه لايظهر في الخلايا الفارغه رابط هذا التعليق شارك More sharing options...
حمادة عمر قام بنشر أبريل 20, 2017 مشاركة قام بنشر أبريل 20, 2017 السلام عليكم الاخ الكريم / شعبان فليفل بارك الله فيك تفضل اخي الكريم المطلوب بالملف المرفق .. وبالنسبة للشرح ان ما زلت تحتاج اليه فقط اخبرني مشاريع التنفيذ12.rar 3 رابط هذا التعليق شارك More sharing options...
شعبان فليفل قام بنشر أبريل 20, 2017 الكاتب مشاركة قام بنشر أبريل 20, 2017 سلمت يداك أخلي الفاضل حماده عمر لو مفيش فيها إزعاج ليك لو تشرحلي الكود كامل أكون شاكر وممنون لحضرتك رابط هذا التعليق شارك More sharing options...
حمادة عمر قام بنشر أبريل 20, 2017 مشاركة قام بنشر أبريل 20, 2017 السلام عليكم الاخ الكريم / شعبان فليفل بارك الله فيك تفضل اخي الكريم .. شرح للكود المستخدم الطريقة سطر سطر اتمني أن يفي بما تريد وارجو من الله أن أكون قد وفقت في شرح المطلوب كما ينبغي تقبل خالص تحياتي شرح كود عمل زر عائم سطر سطر .rar 5 رابط هذا التعليق شارك More sharing options...
سما محمد قام بنشر أبريل 21, 2017 مشاركة قام بنشر أبريل 21, 2017 طريقتك أستاذنا / حمادة عمر لانجد نجد لها وصفا فكم انت راااااااااااااااائع فى اجاباتك وشرحك جزاك الله خيرا 1 رابط هذا التعليق شارك More sharing options...
شعبان فليفل قام بنشر أبريل 22, 2017 الكاتب مشاركة قام بنشر أبريل 22, 2017 الأخ الفاضل حمادة عمر طريقة رائعة في الشرح كم أنت رائع ومبدع جزاكم الله خيرا 1 رابط هذا التعليق شارك More sharing options...
حمادة عمر قام بنشر أبريل 22, 2017 مشاركة قام بنشر أبريل 22, 2017 جزاكم الله خيرا اخواني الاحباء الاستاذة / سما محمد الاستاذ / شعبان فليفل تقبلا خالص تحياتي 1 رابط هذا التعليق شارك More sharing options...
شعبان فليفل قام بنشر أبريل 22, 2017 الكاتب مشاركة قام بنشر أبريل 22, 2017 الأخ الفاضل حمادة عمر لو تقدر تساعدني في هذه المشكلة أكون شاكر ليك دا رابط الموضوع https://www.officena.net/ib/topic/76818-محتاج-دالة/#comment-492264 رابط هذا التعليق شارك More sharing options...
شعبان فليفل قام بنشر أبريل 29, 2017 الكاتب مشاركة قام بنشر أبريل 29, 2017 الأخ الفاضل حمادة عمر مشكلة صغيرة بتظهر لما بحدد الخلايا اللي فيها الزر المخفي بيظهر الخطأ ده رابط هذا التعليق شارك 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.