أكاديمية الصقر للتدريب

لوحة التميز الأسبوعي
العضو المتميز المشرف المتميز المراقب المتميز المدير المتميز الموضوع المتميز القسم المتميز
العضو المتميز المشرف المتميز المراقب المتميز المدير المتميز الموضوع المتميز القسم المتميز
هانى على ali mohamed ali-- لا تميز خلال هذه الفترة لا تميز خلال هذه الفترة منع ادخال البيانات بعدة شروط اكسيل اسئله واجابات


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





إدراج أزرار

السلام عليكم أحبتي رمضان كريم و أتمنى أن يكون للجميع بصحة و عافية عند في الملف المرفق في شيت (بحث) : أريد طباعة شهادة ..



07-05-2020 03:48 مساء
ayoub2007
عضو فعال
rating
معلومات الكاتب ▼
تاريخ الإنضمام : 24-11-2017
رقم العضوية : 1867
المشاركات : 157
الجنس : ذكر
تاريخ الميلاد : 23-12-1970
يتابعهم : 3
يتابعونه : 1
قوة السمعة : 106
 offline 

السلام عليكم أحبتي
رمضان كريم و أتمنى أن يكون للجميع بصحة و عافية
عند في الملف المرفق في شيت (بحث) :
أريد طباعة شهادة مدرسية أو استدعاء أو........ للتلميذ الذي بحثت عنه و ذلك
بالضغط على واحد من الأزرار ( حسب المرغوب فيه)
فمثلا: بحثت عن تلميذ أريد أن أطبع له شهادة مدرسية فبالضغط على زر شهادة مدرسية
يطلعني مباشرة لشيت الشهادة المدرسية و بها معلومات التلميذ .
و نفس الشيئ مع باقي الأزار
و شكرا
 
 
  Rap.xlsx   تحميل xlsx مرات التحميل :(4)
الحجم :(154.825) KB


08-05-2020 12:25 صباحا
مشاهدة مشاركة منفردة [1]
YasserKhalil
مراقب عام
معلومات الكاتب ▼
تاريخ الإنضمام : 21-08-2017
رقم العضوية : 3
المشاركات : 10444
الجنس : ذكر
تاريخ الميلاد : 1-10-1978
الدعوات : 24
يتابعهم : 1
يتابعونه : 535
قوة السمعة : 36522
عدد الإجابات: 254
 offline 
look/images/icons/i1.gif إدراج أزرار
وعليكم السلام أخي الكريم أيوب
الصراحة الموضوع غير واضح والمطلوب يحتاج لمزيد من التفاصيل

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

لربط أوراق العمل بماكرو واحد فقط ، ضع الماكرو التالي في موديول عادي
Sub MainMacro()
    Dim ws As Worksheet, sh As Worksheet, shName As String
    Set ws = ThisWorkbook.Worksheets("بحث")
    shName = ws.Shapes(Application.Caller).TextFrame.Characters.Text
    If Evaluate("ISREF('" & shName & "'!A1)") Then Set sh = ThisWorkbook.Worksheets(shName)
    If Not sh Is Nothing Then Application.Goto sh.Range("A1")
End Sub


ثم على كل شكل من الأشكال الموجودة في ورقة العمل "بحث" .. الأربعة أزرار أو أشكال الذين تم ذكرهم ، اعمل كليك يمين ثم Assign Macro ثم اختر اسم الماكرو MainMacro ..
الماكرو سيمكنك من الانتقال لهذه الأوراق

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

ld8cK_ZISsOmbnFm

 
 


08-05-2020 10:56 صباحا
مشاهدة مشاركة منفردة [2]
YasserKhalil
مراقب عام
معلومات الكاتب ▼
تاريخ الإنضمام : 21-08-2017
رقم العضوية : 3
المشاركات : 10444
الجنس : ذكر
تاريخ الميلاد : 1-10-1978
الدعوات : 24
يتابعهم : 1
يتابعونه : 535
قوة السمعة : 36522
عدد الإجابات: 254
 offline 
look/images/icons/i1.gif إدراج أزرار
بارك الله فيك أخي العزيز أحمد يوسف ومشكور على متابعتك للموضوعات المختلفة
تقبل تحياتي

08-05-2020 01:42 مساء
مشاهدة مشاركة منفردة [3]
ayoub2007
عضو فعال
rating
معلومات الكاتب ▼
تاريخ الإنضمام : 24-11-2017
رقم العضوية : 1867
المشاركات : 157
الجنس : ذكر
تاريخ الميلاد : 23-12-1970
يتابعهم : 3
يتابعونه : 1
قوة السمعة : 106
 offline 
look/images/icons/i1.gif إدراج أزرار
بارك الله فيك أستاذ ياسر
نصف الموضوع اتحل
النصف الثاني أنه لما أتنقل مثلا لشيت "استدعاء" أجد عليه كل معلومات التلميذ كما في الصورة المرفقة و شكرا
ان لم يكن هذا ممكنا أريد طرقة عمل فورم بحث و طباعة ( شهادة مدرسية -شهادة تسجيل-استدعاء -عقوبة من الدرجة الأولى )
شكرا لكم و رمضان كريم
 
  صورة1.png   تحميل png صورة1.png مرات التحميل :(2)
الحجم :(201.225) KB
 


08-05-2020 04:57 مساء
مشاهدة مشاركة منفردة [4]
YasserKhalil
مراقب عام
معلومات الكاتب ▼
تاريخ الإنضمام : 21-08-2017
رقم العضوية : 3
المشاركات : 10444
الجنس : ذكر
تاريخ الميلاد : 1-10-1978
الدعوات : 24
يتابعهم : 1
يتابعونه : 535
قوة السمعة : 36522
عدد الإجابات: 254
 offline 
look/images/icons/i1.gif إدراج أزرار
الموضوع والمشكلة يجب أن تكون محددة أكثر ويوجد تفاصيل كافية وضع بعض الصور بشكل النتائج المتوقعة
لم أفهم المطلوب ولا أحب العمل على التخمين فهو مضيعة للوقت والجهد

08-05-2020 11:30 مساء
مشاهدة مشاركة منفردة [5]
ayoub2007
عضو فعال
rating
معلومات الكاتب ▼
تاريخ الإنضمام : 24-11-2017
رقم العضوية : 1867
المشاركات : 157
الجنس : ذكر
تاريخ الميلاد : 23-12-1970
يتابعهم : 3
يتابعونه : 1
قوة السمعة : 106
 offline 
look/images/icons/i1.gif إدراج أزرار
أستاذ ياسر المطلوب ما هو مكتوب باللون الأحمر في الصورة المرفقة كمثال لزر الاستدعاء
اتمنى ان يكون هذا واضحا و ان لا أكون قد ازعجتكم  وشكرا 

09-05-2020 12:40 صباحا
مشاهدة مشاركة منفردة [6]
YasserKhalil
مراقب عام
معلومات الكاتب ▼
تاريخ الإنضمام : 21-08-2017
رقم العضوية : 3
المشاركات : 10444
الجنس : ذكر
تاريخ الميلاد : 1-10-1978
الدعوات : 24
يتابعهم : 1
يتابعونه : 535
قوة السمعة : 36522
عدد الإجابات: 254
 offline 
look/images/icons/i1.gif إدراج أزرار
ممكن توضح بالصور لأني مش فاهم المطلوب كويس .. استخدم الصور في الشرح وضع بعض النتائج المتوقعة
إنت ممكن تستخدم معادلات بسيطة زي VLOOKUP في الأوراق اللي هتتعامل معاها




الكلمات الدلالية
إدراج ، أزرار ،


 










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

الساعة الآن 06:06 صباحا