مجدى يونس

الاخ العزيز وعليكم السلام ورحمة الله وبركاتة افتح موضوعك فى موضوع جديد

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

ابعتلى الرابط

الاخ ابو عصام الغالى وعليكم السلام ورحمة الله وبركاتة اهلا بك بالمنتدى هذا هو ملف الاكسل حاول مع شرح الفيديوهات التجربة مع الملف المرسل مع تعديل البيانات حسب طلبك وعموما انتظر فيديو لشرح كيفية التعديل على الملف والفورم ليناسب موضوعك تابع بافى الفيديوهات مع التطبيق على الملف بعد تعديلة الاخوة الزملاء اليكم الدرس الثالث كيفية عمل زر بحث مع ادخال الاكواد اكواد زر بحث Private Sub TextBox12_Change() Set sh12 = Sheets("بيانات") LR = sh12.[a2000].End(xlUp).Row For Each cl In sh12.Range("a5:a100" & LR) If (Val(Me.TextBox12)) = cl Then Me.TextBox1 = cl.Offset(0, 0) Me.TextBox2 = cl.Offset(0, 1) Me.TextBox3 = cl.Offset(0, 2) Me.TextBox4 = cl.Offset(0, 3) Me.TextBox5 = cl.Offset(0, 4) Me.TextBox6 = cl.Offset(0, 5) Me.TextBox7 = cl.Offset(0, 6) Me.TextBox8 = cl.Offset(0, 7) Me.TextBox9 = cl.Offset(0, 8) Me.TextBox10 = cl.Offset(0, 9) Me.TextBox11 = cl.Offset(0, 10) End If Next End Sub كود زر اغلاق الفورم Private Sub CommandButton4_Click() End End Sub الفيديو ادخال بيانات واستعلام وتعديل وبحث.rar

شكرا لك اخى الفاضل افكار جديدة فى انتظار المزيد

شكرا لك الشرح على الاوفيس 2016 عندك رابط لتحميلة

الاخ الوش نتمنى تعديل الاسم الى اللغة العربية حسب قواعد المنتدى هذا ملف اكسل ترحيل ناجح وراسب وغ.rar

الاخ ابو ليلة شكرا لك

الاخوة الزملاء اليكم الدرس الثانى كيفية عمل زر اضافة مع ادخال الاكواد الفيديو الكود المستحدم فى الشرح Dim iRow As Long Dim ws As Worksheet Set ws = Worksheets("بيانات") iRow = ws.Cells(Rows.Count, 1) _ .End(xlUp).Offset(1, 0).Row ws.Cells(iRow, 1).Value = Me.TextBox1.Value ws.Cells(iRow, 2).Value = Me.TextBox2.Value ws.Cells(iRow, 3).Value = Me.TextBox3.Value ws.Cells(iRow, 4).Value = Me.TextBox4.Value ws.Cells(iRow, 5).Value = Me.TextBox5.Value ws.Cells(iRow, 6).Value = Me.TextBox6.Value ws.Cells(iRow, 7).Value = Me.TextBox7.Value ws.Cells(iRow, 8).Value = Me.TextBox8.Value ws.Cells(iRow, 9).Value = Me.TextBox9.Value ws.Cells(iRow, 10).Value = Me.TextBox10.Value ws.Cells(iRow, 11).Value = Me.TextBox11.Value Me.TextBox1.Value = "" Me.TextBox2.Value = "" Me.TextBox3.Value = "" Me.TextBox4.Value = "" Me.TextBox5.Value = "" Me.TextBox6.Value = "" Me.TextBox7.Value = "" Me.TextBox8.Value = "" Me.TextBox9.Value = "" Me.TextBox10.Value = "" Me.TextBox11.Value = "" Me.TextBox1.SetFocus

الاخ bmos شكرا لك الاخ جلال الجمال وجزاك الله خير

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

شكرا للجميع ونأسف لعدم وجود الاخ هانى

الاخ جلال شكرا لك

ماهو المطلوب

الاخ احمد نتمنى تعديل الاسم للغة العربية حسب قواعد المنتدى انظر الملف على السريع بطريقتين اضافة ورقة عمل.rar

الاخ مزهر سعيد اهلا بك بالمنتدى ويكفينا ان ربنا يجازينا خير شكرا لك

انظر الرابط التالى نتمنى تعديل اسمك للغة العربية حسب قواعد المنتدى

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

الاخ جلال الجمال شكرا لك للاسف الاعادة بتاخد وفت اخر لان الرفع على اليو تيوب بياخد وقت للرفع والنت فى مصر ضعيف

الاخ العزيز النت قطع عندى ده سبب التاخير انظر الملف بعد اضافة عواميد وصفوف على فكرة الملف بتاعك مالى العواميد والسطور وده سبب المشكلةانا دخلت على الرابط هو المطلوب New Microsoft Excel Worksheet.rar

ادراح مجموعة عواميد وصفوف

ححمل الملف شاهد الفيديو https://www.youtube.com/watch?v=wvIY_L7fvjs&feature=youtu.be

اعمل نسخ من الشيت الخاص بك لعدد الصفوق المطلوبة ثم قف فى المكان المطلوب اضافة الصفوف قم كليك يمين بالماوس واختار ادراج خلايا منسوخة

الاخ جلال الجمال جذاك الله خير مجهود تشكر عليه

العضو العزيز نتمنى تعديل اسمك للغة العربية حسب قواعد المنتدى وكتابة اسم الموضوع حسب الطلب تم تعديل العنوان