بحث مخصص من جوجل فى أوفيسنا
Custom Search
|
البحث في الموقع
Showing results for tags 'نص'.
تم العثور علي 3 نتائج
-
السلام عليكم اخواني أعضاء المنتدى الافاضل كيف يمكن تضليل جزء من نص في داخل خلية أكسل مثلا لو فرضنا يوجد جملتين 1- محمد تلميذ ذكي و 2- محمد تلميذ نضيف المطلوب / أريد أن أضلل كلمة تلميذ أينما وجدت داخل العمود؟
-
ارجو من الاخوان الاكارم مساعدتي في تصميم مربع بحث في النموذج مع العلم اني بحث ولم اصل لنتيجة ووجدت شروحات وامثلة ولم استطع التطبيق في برنامجي ارجو التكرم والاطلاع على المثال المرفق( وفي النموذج AA شرح للمطلوب ) واضافة مربع البحث في المثال المرفق ولكم اجمل تحية وسلام ابو ريماس Database3.rar
-
السلام عليكم Option Explicit ' بسم الله الرحمن الرحيم " ' ********************* " ' دالة استخراج النص او الارقام " '==============================================" ' False = مهمل او Kh_Number اذا كان " ' تقوم باستخراج النص " ' True = Kh_Number اذا كان " ' تقوم باستخراج الارقام " '==============================================" '----------------------------------------------------------------- Function Kh_Replace_Text(ByVal Kh_Sub As String, Optional Kh_Number As Boolean) Dim Num As Byte, C As Integer Dim Sn As String, Re As String, Md As String Sn = Trim(Kh_Sub) For Num = 0 To 9 Sn = Replace(Sn, Num, "") Next Num If Kh_Number Then Re = Trim(Kh_Sub) Do While C < Len(Trim(Sn)) C = C + 1 Md = Mid(Sn, C, 1) Re = Replace(Re, Md, "") Loop Kh_Replace_Text = CDbl(Re) Else Kh_Replace_Text = Trim(Sn) End If End Function دالة استخراج النص او الارقام.rar
