كمال على طارق

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

السلام عليكم .. أساتذتى الأحباء ...ولأنى حاولت أن أجعل الخلية H4 بصفحة Entry عند البحث بإسم الحاج ان تقوم بكتابة الإسم كاملاً بمجرد كتابة أول حرف أو أى حرف من الإسم فلم أنجح فى ذلك .. فهل يمكنك مساعدتى بذلك بارك الله فيك او جعل الخلية H4 كقائمة منسدلة تأخذ القائمة من الصفحة التى يتم اختيارها من قائمة الخلية J4 من جميع أسماء الحجاج من كل صفحات الملف ... ولكم جزيل الشكر نموذج ادخال بيانات الحجاج داخل الشيت.xlsm

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

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

مجهود ممتاز بارك الله فيك وزادك الله من فضله واختصار رائع للكود

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

السلام عليكم أساتذتى وأحبائى الكرام , أتمنى للجميع دوام الصحة والعافية .. الرجاء من سيادتكم مساعدتى بتعديل كود الترحيل لكى يقوم بالترحيل للصفحة المحددة والموضحة بالخلية J4 الموجودة بصفحة Entry ولكم جزيل الشكر وبارك الله فى جهودكم Private Sub cmdAdd_Click() Dim M As Integer M = Sheet2.Range("B500").End(xlUp).Row + 1 Sheet2.Cells(M, "B").Value = Sheet1.Range("G6").Value Sheet2.Cells(M, "C").Value = Sheet1.Range("G8").Value Sheet2.Cells(M, "D").Value = Sheet1.Range("G10").Value Sheet2.Cells(M, "E").Value = Sheet1.Range("G12").Value Sheet2.Cells(M, "F").Value = Sheet1.Range("J6").Value Sheet2.Cells(M, "G").Value = Sheet1.Range("J8").Value Sheet2.Cells(M, "H").Value = Sheet1.Range("J10").Value Sheet2.Cells(M, "I").Value = Sheet1.Range("J12").Value Sheet2.Cells(M, "k").Value = Sheet1.Range("J14").Value Sheet2.Cells(M, "J").Value = Sheet1.Range("G14").Value Sheet2.Cells(M, "M").Value = Sheet1.Range("J16").Value Sheet2.Cells(M, "L").Value = Sheet1.Range("G16").Value Sheet1.Range("G6").Value = "" Sheet1.Range("G8").Value = "" Sheet1.Range("G10").Value = "" Sheet1.Range("G12").Value = "" Sheet1.Range("J6").Value = "" Sheet1.Range("J8").Value = "" Sheet1.Range("J10").Value = "" Sheet1.Range("J12").Value = "" Sheet1.Range("G14").Value = "" Sheet1.Range("J14").Value = "" Sheet1.Range("G16").Value = "" MsgBox "تم ترحيل بيانات الموظف بنجاح" End Sub نموذج ادخال بيانات الحجاج داخل الشيت.xlsm

وعليكم السلام- تفضل بما انك لم تقم برفع ملف توضيحى للمطلوب يكل دقة Book.xlsx

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

أحسنت استاذنا الكريم وزادك الله من فضله بالتأكيد عمل ممتاز جعله الله فى ميزان حسناتك

وعليكم السلام -yaser_m من فضلك لا تقوم برفع مشاركة جانبية بمشاركة قديمة .. عليك برفع مشاركة جديدة ومستقلة توضح به المطلوب بكل دقة مع تدعيم كلامك بملف اكسيل للشرح والتوضيح فلا يمكن العمل على التخمين وتجنباً لإهدار وقت كل من يطلع ععلى مشاركتك دون جدوى أو أهمية !!!!

السلام عليكم كان عليك استخدام خاصية البحث بالمنتدى قبل رفع مشاركتك فالمنتدى كنوز -تفضل على الرغم انك لم تقم برفع ملف اكسيل موضح به المطلوب بكل دقة https://www.officena.net/ib/topic/22735-طباعة-الشهادات-المدرسية/ وهذا أيضاً برنامج صانع الشهادات المدرسية https://www.jo-teachers.com/forum/t9644

وعليكم السلام لابد ان تقوم برفع ملف الإكسيل موضح عليه المطلوب بكل دقة , فلا يمكن العمل على التخمين كما انه لا يمكن العمل من خلال صورة !!!

وعليكم السلام

ارفع من فضلك ملف موضح به المطلوب بكل دقة فلا يمكن العمل على التخمين وتجنباً لإهدار وقت الأساتذة دون جدوى ... وبما انك لم تقم برفع ملف فسيتم الرد عليك أيضاً بدون ملف-تفضل https://www.officeforworld.com/2023/09/sumifs-excel.html

وعليكم السلام https://www.youtube.com/watch?v=FjdXihG9B6o

وعليكم السلام -كيف تنتظر المساعدة من أحدبدون رفع ملف موضح به المطلوب بكل دقة ,,لا يمكن العمل على التخمين وتجنباً لإهدار وقت كل من يطلع على مشاركتك دون جدوى أو أهمية مثلى أنا الأن !!!!

وعليكم السلام ارفع من فضلك الملف فلا يمكن العمل على التخمين وتوضيح المطلوب بكل دقة تجنباص لإهدار وقت الأساتذة !!

السلام عليكم وبها نبدأ ..لابد من رفع ملف توضيحى للمطلوب بكل دقة فلا يمكن العمل على التخمين !!!!

وعليكم السلام -يمكنك بهذا https://stackoverflow.com/questions/67474397/alternative-of-filter-function-on-non-office-365

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

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

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

انتبه من فضلك فالمنتدى تعليمى من المقام الأول وليس لتقديم البرامج الجاهزة فعليك بتصميم ما تريده بنفسك واذا تعثرت بجزئية فعليك برفعها هنا !!!

تفضل على الرغم كان عليك من البداية أيضاً استخدام خاصية البحث بالمنتدى فطلبك موجود وتم تناوله من قبل