طلب عمل زر لفتح ورقه عمل داخل الشيت

[ramyprima]

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

[ramyprima]

اين ردودكم ؟؟؟؟؟؟؟؟؟؟؟؟؟

تم تعديل فبراير 23, 2015 بواسطه ramyprima

[ابو علي و سدرة]

جرب المرفق

Book1.rar

[ramyprima]

اخى الفاضل

 

الزر يكرر الشيت و المطلوب هو ان يفتح شيت ولا ينسخ شيت

[ياسر خليل أبو البراء]

أخي هذا السطر من الكود يقوم بإضافة ورقة عمل مع تسميتها أيضاً

Sub CreateNewSheet()
    Sheets.Add.Name = "Test"
End Sub

ولو مش عاجبك إنك تسمي الورقة (يمكن عايزها كدا وخلاص ) جرب السطر التالي

Sub CreateNewSheet()
    Sheets.Add
End Sub

ولو الأكواد دي لم تؤدي الغرض وضح بشكل تفصيلي وبملف مرفق اللي إنت عايزه

تم تعديل فبراير 24, 2015 بواسطه YasserKhalil

[ramyprima]

شكرا يا اخى العزيز على مجهودك حقيقى انا فخور بانضمامى لكم

[ياسر خليل أبو البراء]

مشكور أخي رامي .. انقر تمت الإجابة ..

تقبل تحياتي