السلام عليكم
لاحظت كثرة الأسئلة حول كيفية البحث بتجاهل أنواع الألف (ا أ إ آ) فقررت إنشاء موضوع أشرح فيه هذه الطريقة مع وضع مثال بسيط.
مثلا عندما أبحث عن كلمة أحمد يكفي أن أكتب: احمد فتظهر الأسماء المكتوبة بالهمزة و بغير همزة.
و غيرها مع باقي الأنواع.
الكود المستعمل:
Dim rst As String, x As String, CrtTxt As String
Dim i As Integer, RC As Integer
Dim homm As String
homm = Me.t2.Text
Me.t3.Value = homm
CrtTxt = "Like ""*" & Me.t3 & "*"""