تری فهرست بزرگی از نام ها در یک کاربرگ اکسل دارد. برخی از آنها فقط نام هستند، اما برخی از آنها کلماتی در داخل پرانتز دارند. متأسفانه، برخی از کلمات داخل پرانتز دارای براکت بسته نیستند و تری باید به صورت دستی براکت بسته را اضافه کند. او فکر می کند که آیا راهی وجود دارد که بتواند با استفاده از جستجوی کارت وحشی، یک براکت اضافه کند و جایگزین کند.
پاسخ کوتاه این است که شما نمی توانید این کار را با استفاده از جستجو و جایگزینی، چه کارت وحشی یا معمولی، انجام دهید. با این حال، می توانید از یک فرمول برای اضافه کردن براکت های گم شده استفاده کنید. موارد زیر تنها یک نمونه از نوع فرمولی است که می توانید استفاده کنید:
=IF(AND(NOT(ISERROR(SEARCH("[",A1))),NOT(RIGHT(A1,1)="]")),A1&"]",A1)
ترفند این است که بررسی کنید سلول (در این مورد A1) دارای یک براکت چپ در آن است یا خیر و اگر وجود دارد، براکت سمت راست را بررسی کنید. اگر براکت سمت راست پیدا نشد، یکی را به محتویات سلول اضافه می‌کنید. در اینجا یک تغییر دیگر از همان موضوع فرمولی وجود دارد:
=IF(ISERROR(FIND("[",A1)),A1,IF(ISERROR(FIND("]",A1)),A1&"]",A1))
اگر مجبور هستید تعداد زیادی سلول را به‌طور منظم بررسی کنید تا براکت‌های از دست رفته را بررسی کنید، ممکن است بخواهید یک ماکرو ایجاد کنید که محدوده‌ای از سلول‌ها را بررسی می‌کند و در صورت نیاز یک براکت سمت راست اضافه می‌کند. در اینجا مثالی از نحوه فرموله کردن چنین ماکرویی آورده شده است:
Sub Close_Bracket()
Dim c As Range
Const csLBrk As String = "["
Const csRBrk As String = "]"
On Error Resume Next
For Each c In Selection.Cells
If InStr(1, c.Value, csLBrk) > 0 And _
InStr(1, c.Value, csRBrk) = 0 Then
c.Value = c.Value & csRBrk
End If
Next c
End Sub
برای استفاده از ماکرو، کافی است محدوده سلول هایی را که می خواهید تحت تأثیر قرار دهید انتخاب کنید و سپس آن را اجرا کنید. سلول ها در محل مورد بررسی قرار می گیرند و در صورت نیاز اصلاح می شوند.
