VBA code for search ComboBox in userform Microsoft #Excel With Source Code

 Private Sub ComboBox1_Change()

Dim ws As Worksheet

Set ws = ThisWorkbook.Sheets("Sheet1")

Dim i As Integer

For i = 1 To ws.UsedRange.Rows.Count

If Me.ComboBox1.Column(0) = ws.Cells(i, 2).Value Then

Me.id_txt.Text = ws.Cells(i, 1).Value

Me.math_txt.Text = ws.Cells(i, 3).Value

Me.geo_txt.Text = ws.Cells(i, 4).Value

Me.chem_txt.Text = ws.Cells(i, 5).Value

Me.his_txt.Text = ws.Cells(i, 6).Value

Me.com_txt.Text = ws.Cells(i, 7).Value

End If

Next i

End Sub

Private Sub UserForm_Click()

End Sub

Private Sub UserForm_Initialize()

Dim lastrow, i As Integer

lastrow = Sheet1.Cells(Rows.Count, "B").End(xlUp).Row

For i = 2 To lastrow

Dim vs As String

vs = Sheet1.Cells(i, "B")

Me.ComboBox1.AddItem vs

Next i

End Sub

دليلك لتعلم اكسيل Excel 2020 من الصفر حتى الاحتراف في فيديو واحد!

فيديو يشرح برنامج الاكسل خطوة خطوة بطريقة بسيطة وسهلة للغاية. #Office #Excel - تم شرح في هذا الفيديو العديد من الأمثلة كما تضمن هذا الفيديو التالي : ☑ واجهة البرنامج والمفاهيم الأساسية. ☑ العديد من أدوات الأكسل المختلفة. ☑ التعبئة التلقائية Autofill (أرقام _ حروف - تواريخ) مع كيفية إنشاء قائمة تلقائية في حالة عدم وجودها. ☑ شرح إنشاء جداول مفصلة. ☑ اهم المعادلات الاساسية ( Sum, Average, Count, CountA,Countblank,Max, Min, IF ) وغيرهم ☑ الجمع، الضرب، القسمة، الطرح، المتوسط، دالة IF، الاكثر، الاقل وغيرهم. ☑ طريقة عمل الرسومات البيانية. ☑ أفضل الطرق لتنسيق الجداول والملفات. ☑ اكتشف بنفسك الباقي....

احترف Excel في اقل من 10 دقائق للمبتدئين والمحترفين وشرح تغيير القيم بين ملفات الاكسيل المختلفة

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