بسم الله ماشاءالله ولا حولة ولاقوة إلا بالله العلي العظيم.. شرح فوق الممتاز طريقة حضرتك هى اللى شجعتني على البرمجة وهى أول مرة لى وصلت للجزء الثاني وان شاء الله أكمل الجزء الثالث لأنى مشتركة فى القناة من أسبوع .. استمر بارك الله فيك 👍👍👍👍👍👍👍
كل سنة وحضرتك طيب وجزيل الشكر علي المجهود والشرح الوافي ونتمني دايمآ دروس من الطويلة دي الممتعة وياسلام لو دخلت عليها دروس حضرتك أيوه شرحتها قبل كده بس منفصله زي الليست بوكس والطباعة والقوائم المنسدلة المرتبطة ببعضها داخل الكومبوبوكسات ..
شكرا على عطائك ومجهودك الله يجعله في ميزان حسناتك عندي سؤال الكود تبع اماداد الصورة في النهايه بكتب jpg على طول بيطلع لي غلط راجعت كل الهطوات صحيحه بس اكتب الامتداد للصوره يجيني خطأ
يا أستاذ عندي مشكل أنه عندما أفتح الملف و أضغط على زر فتح الملف يقل لي هناك مشكل في إسم الشيت لأنه الأكسل الذي أعمل عليه بالعربي ماهو الحل لكي يدخل إلى صفحة الإكسل هذه رسالة الخطأ (variabel not defined)
تسلم ايديك استاذ تامر ممكن لو تكرمت ترسلى التصميم ده أنا بحاول أعمل زيه مش بيظبط معايا ممكن لو تكرمت تبعتلى التصميم اللى حضرتك شرحت عليه واكون شاكر لحضرتك
واضح ورائع اتمنى ان تساعدني في إشكالية عدم ظهور الصفر في بداية التكست بوكس عند الإستعلام عن بيانات الموظف في اليوزرفورم يعني عند إدخال رقم في التكست بوكس أوله صفر او صفرين او حتى ثلاثه اصفار بيقبل وبيترحل للشيت كامل مع الأصفار بدون اي إشكالية. الإشكالية عند الإستعلام عن البيانات في اليوزرفورم بيستدعي البيانات ولا تظهر الأصفار في بداية التكست بوكس أي يظهر الرقم ناقص في اليوزرفورم وانا اريد اطبع اليوزرفورم نفسه أرجو المساعده
@@tamer_elshahat باقي معي حاجه اخيره أتمنى أنك تساعدني انا عاوز احصر التكست بوكس على رقم معين وليكن مثلا تسعه أرقام لا أقل ولا أكثر يعني لوجيت ادخل مثلا خمسه أرقام او سبعه أرقام فقط انا عاوزه مايقبل ولو دخلت ثمانيه ايضا لايقبل يديني رساله يقول يجب إدخال الرقم كاملا وايضا انا عاوز ان التكست بوكس التي اعمل عليها يعني الي أدخل فيها الرقم ماتقبل غير أرقام لا تقبل حروف انا جربت عدة اكواد وقدرت اني احصر التكست بوكس برقم معين مايتجاوزه ولا كن ماقدرت الزمه برقم معين لاينقص ولا يزيد عليه يعني انا ضبطت التكست بوكس انها ماتقبل أكثر من تسعه أرقام وفعلا زبط الموضوع، ولاكن لوجيت أدخل عليها فقط اربعه ارقام او ثلاثه أرقام او سبعه أرقام بتقبل مني وينقلني على تكست بوكس ثاني وهذه هي المشكلة أتمنى أن تكون وصلتك الفكره أتمنى ان تساعدني شكرا جزيلا لك
مستر تامر بعد اذنك لو سمحت علشان البيانات تكون شبه سريه لو سمحت عايزين ندخل البرنامج بمستخدم وكلمة سر لو سمحت وشكر لمجهودك الرائع جدا جدا جدا على هذا الشرح الممتع وياريت بعد اذنك كمان اضافة زر لاغلاق وحفظ الملف كليا شكرا لحضرتك
مساء الخير أستاذي العزيز أولا جزيل الشكر على المجهود الملموس منك لخدمة الجميع وحقيقة مبهر جدا ولكن تكرما عندي بعض المشاكل عند تفعيل بعض الكودات مثل تسلسل رقم الكود ما رضى يتفعل بالرغم اني كتبت مثلك تماما وايضا عملية المسح التلقائي ما رضى يتفعل وايضا كتبت مثل ما كتب تماما ز اتمنى يكون عندك حل لهذا وجزيل الشكر ز
السلام عليكم شكرا جزيلا على الشرح الرائع لوسمحت استاذ تامر انا عاوز اضيف صورتين مش صوره وحده ( لأني حاط صورة بطاقه الموظف وعاوز اضيفها الوجه والخلف) وتحتفظ الصورتين بنفس اسم الموظف طبقت جميع الخطوات يعني أضفت نفس خطوات الصوره السابقه وما زبط الموضوع لوسمحت ممكن تشرح لي ازي اعمل
شكرا جزيلا استاذ تامر على المجهود الرهيب الى عملته وعلى شرحك المفصل والجميل . وانا طبقت كل التصميم والنتيجة عظيمة مع وجود مشكله بسيطة اود من حضرتك أن تجد ليها حل وهى انه عندما يتم اضافه بيانات للشيت أو التعديل على البيانات بدون وضع صوره تظهر رساله خطأ "&namepic & "\" &"صور\SavePicture Image1.Picture, "E:\PIC ( كود حفظ الصورة ) ارجو المساعدة في تخطى حفظ الصورة ان لم تكن موجوده
بارك الله فيك وجزاك الله خير الجزاء 💖 والله استفدنا كتير جدا ممكن بس عندي سؤال صغير ازاي اخلي(setfocus) ثابت في تكسيت بوكس زي تكسيت بوكس فاتورة الكاشير اللي بيضرب اسكنر بحيث اني اضرب بالاسكنر على طول. شكرا لحضرتك جدا 👌
شكرا أستاذ جزاك الله خيرا أنا عندي مشكلة طبقت كل ما جاء في الدرس ولكن عندي مشكلة في هذا الكود add = sheet1.Range("a10000").End(xlUp).Row + 1 سطر عليه بالأصفر ولم يحفظ البيانات أفدني جزاك الله خيرا
السلام عليكم استاذي العزيز اشكرك على هذا الفيديو الأكثر من رائع لدي سؤال أتمنى أن تساعدني بالنسبة لزر الخروج انا عاوز استخدم vbyesnocancel في زر الخروج في حال اني ضغطت على yes يحفظ العمل الذي قمت به في الملف ويخرج ويقفل الملف او التطبيق وفي حال إني ضغطت على no يخرج من الملف ويقفل التطبيق دون أن يقوم بحفظ التعديل او التغيير الذي اجريته على الملف وفي حال اني ضغطت على cancel يلغي ويجلس داخل الملف مايخرج ( يعني نفس ملف الاكسل عندما تضغط على زر الاكس في الأعلى بيديني رساله هل تريد حفظ التغييرات التي أجرتها على الملف ) وبيديني ثلاثه خيارات حفظ عدم الحفظ إلغاء الأمر اتمنى ان تساعدني ولك جزيل الشكر
فى تكست بوكس مش موجود عشان كده بيظهر الخطأ ده ممكن تستغنى عن الكود ده امسحه واستبدله بالكود ده unload me userform1.show او ان انت تكتب كود مسح لكل تكست بوكس بالطريقة دى Textbox1.value="" هتعمل كده لكل تكست بوكس
قمت بانشاء فاعدة بيانات عن طريق الاكواد واليوزرفورم بالفعل ممتازة ومحميه بكلمة مرور ولكن المشكلة في الرفع علي النت ختي عندما رفعت الملف علي مبدبا فاير وافوم بتنزيل الملف مرة اخري لايعمل الفورم نهاءيا ما العمل جزاك الله كل خير
أشكرك جدا .. فعلا قمت بعمل ما تفضلت وكانت النتيجه ممتازة .. سؤال ممكن بعيد عن موضوع الحلقه .. 001/N/2022 عايز اعمل سحب للفقرة دي .. بس اللي يتغير هو الرقم 001 بمعنى 002/N/2022 003/N/2022 004/N/2022 005/N/2022 006/N/2022 وهكذا .. يعني بمجرد اسحب الى الاسفل يتغير الرقم الثالث فقط ولا يتغير حرف ال N او 2022 ايه هي الطريقه؟؟ كامل الشكر والتقدير
جزاك الله كل خير استاذى بعد ازنك عندى مشكله ف انى اخفى الشيت واظهر اليوزر فورم عند فتح الملف بيطلعلى الخطأ دا Invalid or unqualified reference ولما بفتح محرر الاكواد ف This Workbook بيطلعل. خط اصفر ع private sub Workbook_open() r
بارك الله فيك واثابك علي علم لم تكتمه واثقل به ميزان حسناتك يوم القيامه وانا علي ذلك من الشاهدين لو سمحت استاذنا المبجل اقوم بتطبيق البرنامج علي جهاز الكمبيوتر الخاص بالعمل وعندما اقوم بنقله الي جهاز الكمبيوتر الخاص بي في المنزل لا يعمل البرنامج ارجو الافاده
السلام عليكم الكود الخاص بي مسح البيانات بعد التسجيل مش راضي يشتغل معايا مع ان انا ماشي علي الكود صح For i = 1 To 11 Controls("textbox" & i).Value = "" Next i ComboBox1.Value = "" ComboBox2.Value = "" Me.Image1.Picture = LoadPicture(none) ارجو الرد علي وشكرا علي مجهودك الكبير
فى رقم تكست بوكس مش موجود فى ترتيبه بمعنى مثلا ممكن يكون تكست بوكس ٥ مش موجود الحل انك تعمل اكواد المسح للتكست بوكس زى الكومبوبوكس تحدد كل تكست بأسمه وتعمل مسح زى الكومبوبوكس بالظبط
ماذا عند تشغيل زر حفظ البيانات يعطي البرنامج خطأ في هذه الكود For i = 1 To 11 Controls("textbox" & i).Value = "" Next i ComboBox).Value = "" ComboBoxY.Value = "" ماهو السبب
استاذي المفضل ثامر الله يبارك في اهلك و مالك و جزاك الله كل خير امين
الفيديو يحتوي على كم معلومات و كم أكواد رهيبة جدا بارك الله فيك استاذ تامر على هذا الكورس الرائع جدا
الف شكر على شرحك وتعبك الله يجزيك الف خير
عمل ممتاز بارك الله فيك أتمنى لك المزيد من الإجتهاد و التطور و الرقي في مجال البرمجة وشكرا
متشكر جدا 🌹
ruclips.net/video/y4IQcV0hO3M/видео.htmlsi=BPZcZXX10joFas41
شرحك بدون مجاملة ذلل الصعاب ..فريد من نوعك في اليوتيوب
متشكر اوى على المجامله دى 🌹🌹🌹
بجد تسلم ايدك والله ربنا يباركلك
بسم الله ماشاءالله ولا حولة ولاقوة إلا بالله العلي العظيم.. شرح فوق الممتاز طريقة حضرتك هى اللى شجعتني على البرمجة وهى أول مرة لى وصلت للجزء الثاني وان شاء الله أكمل الجزء الثالث لأنى مشتركة فى القناة من أسبوع .. استمر بارك الله فيك 👍👍👍👍👍👍👍
ان شاء الله تكملى البرنامج كله لو فى اى حاجه وقفت قدامك اكتبيلى فى التعليقات
عمل ممتاز و شرح واضح و متأني.
جزاك الله عنا خيرا.
جزانا الله وإياكم كل خير 🌹
انت بالفعل مُعلم قدير وصادق ومهذب . أحسنت ، ورمضان كريم
متشكر جدا 🌹
ما شاء الله يا استاذ شرح حضرتك كويس جدا ومبسط جزاك الله خيرا وفي انتظار الحلقة القادمة إن شاء الله
جزانا وإياكم كل خير متشكر جدا 🌹
جزاك الله خير يا استاذ
يا ريت تصصم برنامج بحث و اضافه و تعديل لاكثر من شيت بوجود اليست بوكس و شكرا جزيل الشكر
جزاكم الله خيرا
طبقت أستاذنا كل ما جاء في الكورس و كانت النتيجة مبهرة ، ألف شكر ، و ننتظر بقية الأزرار بحول الله تعالى .
الله ينور 👍👍
كل سنة وحضرتك طيب
وجزيل الشكر علي المجهود والشرح الوافي
ونتمني دايمآ دروس من الطويلة دي الممتعة وياسلام لو دخلت عليها دروس حضرتك أيوه شرحتها قبل كده بس منفصله
زي الليست بوكس والطباعة والقوائم المنسدلة المرتبطة ببعضها داخل الكومبوبوكسات ..
بصراحة حضرتك ممتاز جداً وشرحك واسلوبك رائع❤❤❤
متشكر جدا 🌹
بارك الله فيك أستاذ شرح وافي وأسلوب ممتاز أرجو اتمام ماتبقى من بحث وتعديل وإن أمكن طباعة شكرا
المجموعه كلها كامله بالترتيب
ruclips.net/p/PL8s4YIlE76XtbS-2ZlRYvH69SqYOy0j7t
جزاك الله خير وجعله في ميزان حسناتك شرح رائع و انتظر منك فيديو جديد بباقي التفاصيل باقرب وقت ان شاء الله
ان شاء الله قريب 🌹
احسنت اخي
بارك الله فيك وجزاك الله خيرا
جزانا الله وإياكم كل خير 🌹
بارك الله عيدكم أستاذ
الله يعطيك الصحة الكل تمام
جعل الله مجهوداتكم في ميزان حسناتكم آمين
اجمل لايك من بغداد لحضرتك . ارجوا الاستمرار
روعه
شكرا جزيلا افضل شرح شفته
درس راىع. حفظكم الله
متشكر جدا 🌹
الله يبارك لك تمام
ربنا يضع لك في ميزان حسناتك شكرا جزاك الله خيرا
جزانا وإياكم كل خير 🌹
احسنت بارك الله فيك..
شروحات جدآ راقية ومفيدة
استفدت كثيراً رغم إني متابع جديد.
بالتوفيق ان شاء الله
الله يرحم والديك
كنت في الموعد بارك الله فيكم وعيد اضحى 🐏مبارك لك وللجميع ♥🇩🇿
كل عام وانت بخير 🌹
جزاك الله عنا كل خير و جعله في ميزان حسناتكم
جزانا الله وإياكم كل خير 🌹
الله يجزيك الخير
استمر عاشت ايدك جعل الله مجهودك في ميزان حسناتكم
متشكر جدا 🌹🌹🌹
الله يسعدك روعة جزاك الله خير
جزانا الله وإياكم كل خير 🌹
اكثر من رائع
شكراً 🌹
رائع وفقك الله
متشكر جدا 🌹🌹🌹
وفقك الله أستاذ تامر
متشكر جدا 🌹
شكرا لك استاذنا الكبير
🌹🌹🌹
مشكور جدا استاذ تامر على الشرح البسيط .. اجرك على الله ....وكثر الله من امثالك
متشكر جدا 🌹🌹🌹
شرح جميل ماشاء الله ماشاء الله ربنا يبارك فيك ممكن الأكواد البرمجية فى ملف
لتجنب الاخطاء
رابط التحميل فى الفيديو النالى لشرح البرنامج
الله ينور أستاذ تامر شرح واضح كفيت ووفيت ان شاء الله ربنا يجعله في ميزان حسناتك الله يجزاك كل خير.
متشكر جدا 🌹🌹🌹
شكرا لك على الابداع
ولكن اتمنى اذا تقدر تنزل فيديو لنظام مركز طبي يعني كيف أقطع سند معاينة عند الدكتور وبعدها الفحوصات مع حفظها تلقائي في الجهاز
تسلم ايديك يا معلم فعلا انت مبدع 👍
متشكر جدا 🌹🌹🌹
@@tamer_elshahat
لا شكر على واجب...
بس تمنيت ان يكون كود زر حفظ البيانات يستخدم lastrow وليس تحديد قيمة معينة من الصفوف
طبعاً شرجك كلش جميل
ممكن تنزل كورس في البرمجة في الفيجول بيسك عن معنى الاكواد
أخوك من العراق
جزاك الله عنا كل خير ، عيدكم مبارك و كل عام و أنت و الأهل بألف خير ، و نفع بك .
جزانا وإياكم كل خير 🌹
ربنا يبارك في عمرك يا رب
طبقت ونتائج جميلة
ممتاز جداً 👍👍👍
احسنت وموفق ان شاء الله
شكراً 🌹
شرح اكثر من رائع بارك الله فيك يا ريت حضرتك تبعتلى الملف النهائى علشان كل ازرار العلامات و والاقواص مش شغالة والله زرار الكنتول والشيفت مش شغالين كمان
جزاك الله خيرا استاذ تامر
استأذن حضرتك انا مشيت علي الخطوات و الصورة مش راضية تظهر لما بضيفها
ممكن حضرتك توضحلي الحل لو تكرمت
حمل الملف وشوف الاكواد مكتوبة ازاى لو فى حرف واحد فى الكود كاتبه غلط مش هتشتغل
كل عام وانت بخير يا استاذ ، بارك الله فيك ، كلنا داعمين لحضرتك و لقناتك
متشكر جدا 🌹🌹
شكرا جزيلا لك اريد ان اشير إلى ملاحظة بان المتغير الذي سميته openpic غير معرف يعني محددتيش طبيعته يعني مكتبتيش عبارة dim ......as.....integer
جزاك الله خير الجزاء ، شرح جميل
جزانا وإياكم كل خير 🌹
ي استاذي واذا معي بيانات من سابقه كييف ادخلهن في الاكسل وبعدين اذا به موظف جديد يتم ادخاله بهذه الطريق الذي شرحتها
شاكرين تعاونكم
شكرآ ليك.شرحك ممتاز
متشكر جدا 🌹
شكرا
دكتور في excel, تحية تقدير من أخوك منير من الجزائر
اهلا بيك اخ منير 🌹🌹🌹
شكرا على عطائك ومجهودك الله يجعله في ميزان حسناتك عندي سؤال الكود تبع اماداد الصورة في النهايه بكتب jpg على طول بيطلع لي غلط راجعت كل الهطوات صحيحه بس اكتب الامتداد للصوره يجيني خطأ
بتحط دوت قبل امتداد الصورة
.jpg
بارك الله فيك اخي الكريم وكل عام وانت بالف خير مجهود أكثر من رائع جزاك الله خير الجزاء
متشكر جدا 🌹
جزاك الله خير الجزاء والله يحفظك وتزور مكه حاج😊
ياليت بس كود لو رحلت بيانات والصوره فاضيه
امين يارب متشكر جدا 🌹
انا شارح الكلام فى فيديوهات شرح البرنامج تابع للنهاية
تمام شكرا لك على تواضعك الكريم ورك عليا
استاذي العزيز هل يوجد كود تحميل صورتين
اكون لك من الشاكرين لانا عندي صورتين قبل وبعد وشكرا لك
كيف نربط ادخال بيانات وتحاليل المريض في الاستقبال وظهورها في المعمل للعمل عليها؟؟؟ ؟
في نسخة أوفيس 2010 بالعربي لا يوجد الحدث Active ماهو البديل
غير اوفيس ٢٠١٠ ل ٢٠١٣ او ٢٠١٦
❤️❤️❤️
شكرا على الشرح الممتع ولكن واجهتني مشكله ان البرنامج لايرفع سوى الصور بامتداد jpg رغم اني كتبت الكود كما هو .... تحياتي
اى صور عندك حولها ل jpg او jpeg عشان تقدر ترفعها
في الحقيقة درس مرهق جدا وملىء بالمشاكل اعدت اعداد البرنامج اكثر من مرة تضييع للوقت في الحقيقة
ايه المشاكل الى بتقابلك
@@tamer_elshahat الكثير لما اكملت البرنامج زر الحفظ لم يعد يشتغل رغم انه كان يشتغل
الاكسل عندك عربى ولا انجليزى واصدار كام وحفظت الملف بصيغة الماكرو ولا لا
@@tamer_elshahat ليس هذا اول برنامج اعمله اعلم جيدا ما افعل
حمل الملف واشتغل عليه رابط تحميل الملف هتلاقيه فى الفيديو تقريبا قبل الاخير
يا أستاذ عندي مشكل أنه عندما أفتح الملف و أضغط على زر فتح الملف يقل لي هناك مشكل في إسم الشيت لأنه الأكسل الذي أعمل عليه بالعربي ماهو الحل لكي يدخل إلى صفحة الإكسل هذه رسالة الخطأ (variabel not defined)
اتفرج على الفيديو ده
ruclips.net/video/Ogyhv3C3SyU/видео.html
تسلم ايديك استاذ تامر ممكن لو تكرمت ترسلى التصميم ده
أنا بحاول أعمل زيه مش بيظبط معايا ممكن لو تكرمت تبعتلى التصميم اللى حضرتك شرحت عليه واكون شاكر لحضرتك
ruclips.net/video/x2FujuZvmrI/видео.html
واضح ورائع
اتمنى ان تساعدني في إشكالية عدم ظهور الصفر في بداية التكست بوكس عند الإستعلام عن بيانات الموظف في اليوزرفورم
يعني عند إدخال رقم في التكست بوكس أوله صفر او صفرين او حتى ثلاثه اصفار بيقبل وبيترحل للشيت كامل مع الأصفار بدون اي إشكالية.
الإشكالية عند الإستعلام عن البيانات في اليوزرفورم بيستدعي البيانات ولا تظهر الأصفار في بداية التكست بوكس أي يظهر الرقم ناقص في اليوزرفورم وانا اريد اطبع اليوزرفورم نفسه
أرجو المساعده
انا رديت عليك على الايميل
هتخش على الشيت نفسه وهتظلل عمود الرقم كله وهتغير تنسيق العمود هتخليه text
ruclips.net/user/shorts5idvbUlUbfc?feature=share3
@@tamer_elshahat قوة القوه افديك
أشهد لله انك مبدع
كملي ( يعني من زمان) وانا أجرب واحاول واسئل واستفسر ولا احد قدر انه يفيدني
شكرا جزيلا
@@tamer_elshahat
باقي معي حاجه اخيره أتمنى أنك تساعدني
انا عاوز احصر التكست بوكس على رقم معين وليكن مثلا تسعه أرقام لا أقل ولا أكثر
يعني لوجيت ادخل مثلا خمسه أرقام او سبعه أرقام فقط انا عاوزه مايقبل ولو دخلت ثمانيه ايضا لايقبل يديني رساله يقول يجب إدخال الرقم كاملا
وايضا انا عاوز ان التكست بوكس التي اعمل عليها يعني الي أدخل فيها الرقم ماتقبل غير أرقام
لا تقبل حروف
انا جربت عدة اكواد وقدرت اني احصر التكست بوكس برقم معين مايتجاوزه ولا كن ماقدرت الزمه برقم معين لاينقص ولا يزيد عليه
يعني انا ضبطت التكست بوكس انها ماتقبل أكثر من تسعه أرقام
وفعلا زبط الموضوع،
ولاكن لوجيت أدخل عليها فقط اربعه ارقام او ثلاثه أرقام او سبعه أرقام بتقبل مني وينقلني على تكست بوكس ثاني وهذه هي المشكلة
أتمنى أن تكون وصلتك الفكره
أتمنى ان تساعدني
شكرا جزيلا لك
مستر تامر بعد اذنك لو سمحت علشان البيانات تكون شبه سريه لو سمحت عايزين ندخل البرنامج بمستخدم وكلمة سر لو سمحت وشكر لمجهودك الرائع جدا جدا جدا على هذا الشرح الممتع وياريت بعد اذنك كمان اضافة زر لاغلاق وحفظ الملف كليا شكرا لحضرتك
اتفرج على الفيديو ده
ruclips.net/video/kIQ5YhaAWnI/видео.html
مساء الخير أستاذي العزيز أولا جزيل الشكر على المجهود الملموس منك لخدمة الجميع وحقيقة مبهر جدا
ولكن تكرما عندي بعض المشاكل عند تفعيل بعض الكودات مثل تسلسل رقم الكود ما رضى يتفعل بالرغم اني كتبت مثلك تماما وايضا عملية المسح التلقائي ما رضى يتفعل وايضا كتبت مثل ما كتب تماما ز اتمنى يكون عندك حل لهذا وجزيل الشكر ز
اتأكد انك كاتب الاكواد بشكل صحيح حمل الملف وراجع على الاكواد وقارنها بالى انت كاتبه
البرنامج تشكر عليه جدا الله يوفقك بس صادفتني مشكلة لو انا عايز احط في البرنامج صورتين صوره قبل وصوره بعد هل ممكن كود ارجو تساعدني استاذ تامر
هتعمل ٢ image
واحده هتحفظها بكود الموظف والتانيه بأسم الموظف
بجرب
مام شكرا استاذي كل ذوق ظبط معاي البرنامج
الله يجعل هذا العمل في ميزان حسناتك
الله يعطيك العافية عندي مشكله بالاكواد
اتفرج على الفيديو ده فى حل لمعظم المشاكل
ruclips.net/video/Ogyhv3C3SyU/видео.html
انا سمعت تلات اجزاء في جزء رابع قبل الفيديو بتاع حل مشاكل الاكواد ممكن حضرتك تبعتلي لو سمحت اللينك بتاعه وجزاك الله كل خير
دى المجموعه كلها من البدايه للنهايه بالترتيب
ruclips.net/p/PL8s4YIlE76XtbS-2ZlRYvH69SqYOy0j7t
جزاك الله خيراً
ممكن توضيح طريقة إضافة تقويم في اليوزر فورم، بحيث يتم الاختيار منه تاريخ اليوم أو أي تاريخ سابق أو لاحق.
السلام عليكم
شكرا جزيلا على الشرح الرائع
لوسمحت استاذ تامر
انا عاوز اضيف صورتين مش صوره وحده ( لأني حاط صورة بطاقه الموظف وعاوز اضيفها الوجه والخلف)
وتحتفظ الصورتين بنفس اسم الموظف
طبقت جميع الخطوات
يعني أضفت نفس خطوات الصوره السابقه وما زبط الموضوع
لوسمحت ممكن تشرح لي ازي اعمل
هتعمل متغير تانى زى ماغير الصوره الاولى وهتسميه اسم مختلف واستخدم نفس الكود مع تغير اسم المتفير ورقم عمود امتداد الصوره
@@tamer_elshahat
عملت نفس ماقلت بس مازبط إحتمال اني لخبطت في المتغير
السلام عليكم انا اواجه نفس المشكة نقل الصورة الى الملف والشيت أيضا مسح البيانا من الفورك عند اضافة جديدة
حمل الملف وشوف الاكواد مكتوبه ازاى وقارنها بالى انت كاتبه
شكرا جزيلا استاذ تامر على المجهود الرهيب الى عملته وعلى شرحك المفصل والجميل . وانا طبقت كل التصميم والنتيجة عظيمة مع وجود مشكله بسيطة اود من حضرتك أن تجد ليها حل وهى انه عندما يتم اضافه بيانات للشيت أو التعديل على البيانات بدون وضع صوره تظهر رساله خطأ "&namepic & "\" &"صور\SavePicture Image1.Picture, "E:\PIC ( كود حفظ الصورة ) ارجو المساعدة في تخطى حفظ الصورة ان لم تكن موجوده
اتفرج على الحلقة دى
ruclips.net/video/Ogyhv3C3SyU/видео.html
حبذا أستاذنا الكريم أن تضيف زر خاص بالطباعة إذا ممكن مع خيارات الطباعة .... جزاك الله خيرا .
حاضر ان شاء الله
التعليق الخامس من فضلك رد عليا او اعمل القاعدة واحنا نكمل البيانات
المشكلة فى كلمة ورقة عملت كما قلت سيادتكم ولكن دائما خطأ ديبق
بارك الله فيك وجزاك الله خير الجزاء 💖
والله استفدنا كتير جدا ممكن بس عندي سؤال صغير ازاي اخلي(setfocus) ثابت في تكسيت بوكس زي تكسيت بوكس فاتورة الكاشير اللي بيضرب اسكنر بحيث اني اضرب بالاسكنر على طول. شكرا لحضرتك جدا 👌
منا شارحها في الفيديو
هتخش على شاشة محرر الاكواد من اليوزرفورم نفسه على الحدث اكتف
وهتحدد التكست بوكس زى كده
Textbox2.setfocus
@@tamer_elshahat شكرا جزيلا لحضرتك 🌹
ألف شكر .. شرح بسيط و ممتع جدا
استفسار.. عندما اكتب
Controls("textbox" & i).Value = ""
يحدث خطأ و باللون الأصفر.. لماذا؟
فى تكست بوكس رقمه مس موجود فى ترتيبه ممكن تلغى الكود ده خالص وتعمل مسح لكل تكست بوكس لوحده زى الكومبوبوكس بالظبط
استاذي الفاضل اولا مشكور على مجهودك انا عملت كل الخطوات ولكن في اخر خطوه وهي عند حفظ اليانات يعمل لي خطا
طالما عملت حلقة تكراريه لازم تقفلها انت عامل for i
لازم فى اخر الكود تعمل Nixt i
شكرا أستاذ جزاك الله خيرا أنا عندي مشكلة طبقت كل ما جاء في الدرس ولكن عندي مشكلة في هذا الكود add = sheet1.Range("a10000").End(xlUp).Row + 1 سطر عليه بالأصفر ولم يحفظ البيانات أفدني جزاك الله خيرا
لو الاكسل عندك عربى غير كلمة sheet ل ورقه
انا نفس الخطا وحولت ورقه وماظبط
اتفرج على الفيديو ده
ruclips.net/video/Ogyhv3C3SyU/видео.html
Worksheets(“اسم الشيت”) حطها في البدايه والباقي نفس الكود
لو أستطيع أن أعطي لك الف ليك لفعلتها
متشكر جدا ☺️🌹
🌹🌹🌹🌹🌹🌹🌹🌹🌹🌹🌹🌹🌹🌹🌹🌹🌹
شكرا الله يعطيك العافيه
بس كود رفع الصوره مارضي يظبط معي يظهر لي خطأ وينكتب باللون الاحمر
ruclips.net/video/Ogyhv3C3SyU/видео.html
السلام عليكم
استاذي العزيز اشكرك على هذا الفيديو الأكثر من رائع
لدي سؤال أتمنى أن تساعدني
بالنسبة لزر الخروج
انا عاوز استخدم vbyesnocancel في زر الخروج
في حال اني ضغطت على yes يحفظ العمل الذي قمت به في الملف ويخرج ويقفل الملف او التطبيق
وفي حال إني ضغطت على no
يخرج من الملف ويقفل التطبيق دون أن يقوم بحفظ التعديل او التغيير الذي اجريته على الملف
وفي حال اني ضغطت على cancel يلغي ويجلس داخل الملف مايخرج
( يعني نفس ملف الاكسل عندما تضغط على زر الاكس في الأعلى بيديني رساله هل تريد حفظ التغييرات التي أجرتها على الملف ) وبيديني ثلاثه خيارات
حفظ عدم الحفظ إلغاء الأمر
اتمنى ان تساعدني ولك جزيل الشكر
اين الجزء الاول ..اريد ان اخذ الكورس من بدايته وشكرا
دى المجموعة كلها من البداية للنهايه
ruclips.net/p/PL8s4YIlE76XtbS-2ZlRYvH69SqYOy0j7t
لوسمحت. نريد نفس الشرح واجهه عربي
اتفضل
ruclips.net/video/C9IJyHWFkjg/видео.html
تسلم وجزاك الله خير
تم التطبيق مثلما حضرتك قولت وعملت
بس المشكله عندي الكومبو بوكس والليست بوكس ادوس انتر مش بيمشي ورا بعضه بالترتيب الرجاء الحل لو سمحت
اخي العزيز بارك الله بيك عندي مشكلة في كود مسح محتويات الخانات عند اعطاء حفظ
يظهر خطا في الكود
controls("textbox" & i).value = " "
فى تكست بوكس مش موجود عشان كده بيظهر الخطأ ده
ممكن تستغنى عن الكود ده امسحه واستبدله بالكود ده
unload me
userform1.show
او ان انت تكتب كود مسح لكل تكست بوكس بالطريقة دى
Textbox1.value=""
هتعمل كده لكل تكست بوكس
السلام عليكم استاذ اني طبقت نفس الخطوات لاضافة الصورة وتفتح قائمة اضافة الصورة وعند الضغط على زر open يرجع للفريم ولاتظهر الصورة ما الخطاء
اتأكد من كتابة الاكواد بشكل صحيح
قمت بانشاء فاعدة بيانات عن طريق الاكواد واليوزرفورم بالفعل ممتازة ومحميه بكلمة مرور ولكن المشكلة في الرفع علي النت
ختي عندما رفعت الملف علي مبدبا فاير وافوم بتنزيل الملف مرة اخري لايعمل الفورم نهاءيا ما العمل جزاك الله كل خير
اخي العزيز اولا بارك الله فيك ثانيا اذا ضغط اضافة جديد أجد المعلومات القديمة لم تحذف رغم تطبيقي للكود
كنت عايز اسال حضرتك سؤال لما باجى اعمل الكومبوبوكس واجى أحول اتجاه السهم مش بيتحول ومش بيردى يجى علي ترو اصلاا
انت بتقف على اليوزرفورم نفسه مش الكومبوبوكس
اقفل الملف وافتحه تانى متفتحش معاه اى ملفات وجرب ممكن يكون كان فى تهنيجه هو الاكسل عندك اصدار كام
أشكرك جدا .. فعلا قمت بعمل ما تفضلت وكانت النتيجه ممتازة ..
سؤال ممكن بعيد عن موضوع الحلقه ..
001/N/2022
عايز اعمل سحب للفقرة دي .. بس اللي يتغير هو الرقم 001 بمعنى
002/N/2022
003/N/2022
004/N/2022
005/N/2022
006/N/2022
وهكذا ..
يعني بمجرد اسحب الى الاسفل يتغير الرقم الثالث فقط ولا يتغير حرف ال N او 2022
ايه هي الطريقه؟؟
كامل الشكر والتقدير
هتعلم على الخليه الاولى والثانيه وهتسحبهم بعد ماتخلى الاولى ١ والثانيه ٢
صباح الخير يا استاذ
لو تكرمت كود قاعدة if داخل قاعدة if لو تشرح لنا ازاي استخداماتها مع المعرفات لان ذا الموضوع مسبب لي ازمة
يعطيك العافية استاذ ، الملف بس يخلص و حبيت احفظو على فلاشة و انقلو على لابتوب تاني ، بيشتغل او لازم نعمل شي ؟
هيشتغل عادى بس تتأكد ان الجهاز التانى الماكرو متفعل فيه
ربنا يوفقك ويسعدك 💐
عندي مشكله
لما كتبت الكود ده
savepicture image 1
بيظهرلي خطاء ولما بحزفو بتحفظ البيانات في الشيت لكن مش بتحفظ في الفولدر
انا منزل الكود تقدر تحمله من صندوق الوصف اسفل الفيديو ممكن تكون كاتب حاجه غلط
جزاك الله كل خير استاذى بعد ازنك عندى مشكله ف انى اخفى الشيت واظهر اليوزر فورم عند فتح الملف بيطلعلى الخطأ دا Invalid or unqualified reference ولما بفتح محرر الاكواد ف This Workbook بيطلعل. خط اصفر ع private sub Workbook_open() r
بارك الله فيك واثابك علي علم لم تكتمه واثقل به ميزان حسناتك يوم القيامه وانا علي ذلك من الشاهدين
لو سمحت استاذنا المبجل اقوم بتطبيق البرنامج علي جهاز الكمبيوتر الخاص بالعمل وعندما اقوم بنقله الي جهاز الكمبيوتر الخاص بي في المنزل لا يعمل البرنامج ارجو الافاده
اتأكد انك مفعل الماكرو وانك حافظ الملف بصيغة الماكرو
السلام عليكم الكود الخاص بي مسح البيانات بعد التسجيل مش راضي يشتغل معايا مع ان انا ماشي علي الكود صح
For i = 1 To 11
Controls("textbox" & i).Value = ""
Next i
ComboBox1.Value = ""
ComboBox2.Value = ""
Me.Image1.Picture = LoadPicture(none)
ارجو الرد علي وشكرا علي مجهودك الكبير
فى رقم تكست بوكس مش موجود فى ترتيبه بمعنى مثلا ممكن يكون تكست بوكس ٥ مش موجود
الحل انك تعمل اكواد المسح للتكست بوكس زى الكومبوبوكس تحدد كل تكست بأسمه وتعمل مسح زى الكومبوبوكس بالظبط
ماذا عند تشغيل زر حفظ البيانات يعطي البرنامج خطأ في هذه الكود
For i = 1 To 11
Controls("textbox" & i).Value = ""
Next i
ComboBox).Value = ""
ComboBoxY.Value = ""
ماهو السبب
انت عامل حلقة تكراريه من تكست بوكس ١ الى ١١
فى تكست بوكس مش موجود عشان كده ظهر الخطأ ده
امسح الكود ده كله واكتب الكود ده
Unload me
Userform1.show