البحث فى الخلايا عن طريق الدالة InStr

شرح التعامل مع الدالة InStr


البحث بالدالة Instr

بحث عن نص او حرف فى وسط نص
Dim pos As Integer
pos = InStr( 1, "yaser Ali Munir", "M", vbBinaryCompare )



بحث عن نص داخل خلية من خلية اخرى
Dim pos As Integer
pos = InStr( 1, range("A2").value, range("B2").value, vbBinaryCompare )



بحث عن نص داخل خلية من صندوق نصوص
Dim pos As Integer
pos = InStr( 1, range("A2").value, TEXTBOX1.value, vbBinaryCompare )


vbBinaryCompare
vbTextCompare
vbDatabaseCompare