এখানে আপনি ব্যবহার করতে পারেন একটি ভিবিএ ফাংশন:
Public Function ListMissingWords(WordsToSearch As String, TextToSearch As String) As String
Dim AllWords As Variant
Dim i As Integer
Dim TempResult As String
On Error GoTo ErrLabel
AllWords = Split(WordsToSearch, ",")
For i = LBound(AllWords) To UBound(AllWords)
If Not InStr(LCase(TextToSearch), LCase(AllWords(i))) > 0 Then
TempResult = TempResult & AllWords(i) & ","
End If
Next i
If TempResult <> "" Then
TempResult = Left(TempResult, Len(TempResult) - 1)
End If
ListMissingWords = TempResult
Exit Function
ErrLabel:
Err.Clear
End Function
এটি ঢোকাতে:
- এক্সেল এ Alt + F11 টিপুন
- আপনার ওয়ার্কবুকের নামটিতে ডান ক্লিক করুন এবং "সন্নিবেশ করান" - "মডিউল" নির্বাচন করুন
- কোড সন্নিবেশ করান
এখন আপনি এই ফাংশনটি আপনার কাজের বইতে ব্যবহার করতে পারেন:
আপনাকে আপনার ফাইলটিকে ম্যাক্রো-সক্ষম অ্যাক্সেল কার্যক্ষেত্র (.xlsm) হিসাবে সংরক্ষণ করতে হবে।