Word sənədinizdəki mötərizələri və daxili boşluqları toplu şəkildə silməyin 2 yolu

İndi paylaş:

Aşağıdakı bu məqalədə biz sizə Word sənədinizdə mötərizələri və daxili boşluqları toplu silməyin 2 yolunu təklif edəcəyik. 

İndi və sonra insanlar hər cür məqsədlər üçün sözləri qeyd etmək üçün mötərizədə istifadə etməyi xoşlayırlar. Bununla belə, bir müddət sonra siz bütün mötərizələri silmək qərarına gələ bilərsiniz, ancaq onların sənədinizin ətrafına səpələnmiş çox olduğunu tapmaq üçün. Düzünü desəm, onları bir-bir silmək sonsuza qədər çəkə bilər. Üstəlik, bəzi xüsusi ehtiyaclardan ötəri, bir cüt mötərizə arasındakı bütün boşluqları da silməli ola bilərsiniz.Word Sənədinizdə Mötərizələr və Daxili Boşluqları Toplu Silin

Buna görə özünüzü daha praktik həllər ilə təchiz etmək üçün bu məqaləni oxumalısınız.

Metod 1: "Qabaqcıl Tap" əmrində Joker işarələrdən istifadə edin

  1. Əvvəlcə "Ev" sekmesini vurun və "Tap" əmrində açılan düyməni basın.
  2. Sonra açılan menyuda "Qabaqcıl Tap" seçin və "Tap və dəyişdirin" informasiya qutusunu açın."Ana səhifə"->"Tap" düyməsindəki Ok düyməsini klikləyin->"Qabaqcıl Tap" seçin
  3. Məsələn, bütün kvadrat mötərizələri tapmaq istəyirsinizsə, daxil edin "\[*\]”(dırnaq işarələri olmadan) “Nəyi tapın” mətn qutusunda.
  4. Sonra daha çox seçim göstərmək üçün "Daha çox" düyməsini basın.
  5. "Yol işarələrindən istifadə et" qutusunu yoxlayın.
  6. Sonra "Tap" sekmesini vurun və "Əsas sənəd" seçin. Siz bütün kvadrat mötərizələri və əlavə olunmuş mətnlərin seçimdə olduğunu görəcəksiniz, məsələn:"Nə tapın" mətn qutusuna sətirləri daxil edin-> "Jarvardlardan istifadə edin" qutusunu yoxlayın-> "Tap" düyməsini basın-> "Əsas sənəd" seçin
  7. İndi "Nə tapın" mətn qutusunu təmizləyin və "daxil edin"[[\] ]”(dırnaq işarələri olmadan).
  8. "Tap" düyməsini basın və bu dəfə "Cari Seçim" seçin. Siz bütün kvadrat mötərizələri və içərisindəki bütün boşluqları aşağıdakı kimi seçimdə tapacaqsınız:"Nə tapın" mətn qutusuna sətirləri daxil edin-> "Tap" düyməsini basın-> "Cari seçim" seçin
  9. Kvadrat mötərizələrdən və içindəki bütün boşluqlardan xilas olmaq üçün "Sil" düyməsini basın.
  10. Bununla belə, boşluq saxlamaq istəyirsinizsə, sadəcə 7-ci addımdakı sətirləri “ ilə əvəz edin.[[\]]".Yalnız kvadrat mötərizələrin seçilməsinin təsiri

Aşağıdakı cədvəldə onları və ya daxili boşluqları tapmaq üçün sətirlərlə birlikdə bir neçə növ çox istifadə olunan ayırıcılar var.

Mötərizədə Mötərizələr və bütün qapalı mətnləri tapmaq üçün sətirlər Mötərizələr və içəridəki bütün boşluqları tapmaq üçün sətirlər Yalnız mötərizələri tapmaq üçün sətirlər
Kvadrat Mötərizələr

[]

\[*\] [[\] ] [[\]]
Parantezlər

()

\(*\) [(\) ] [(\)]
Braketlər (Buruq Mötərizələr)

{}

\{*\} [{\} ] [{\}]
Açılı Mötərizələr

<>

\<*\> [<\> ] [<\>]

Metod 2: VBA kodlarını işə salın

  1. Əvvəlcə VBA redaktorunu açmaq üçün “Alt+ F11” düyməsini sıxın.
  2. Sonra "Normal" və sonra "Daxil et" sekmesini basın.
  3. "Modul" seçin."Normal"->"Daxil et"->"Modul" üzərinə klikləyin
  4. Sonra onu açmaq üçün üzərinə iki dəfə vurun.
  5. Və orada aşağıdakı kodları yapışdırın:
Sub DeleteDelimiters(objFind As Find, strLeftDelimiter As String, strRightDelimiter As String, bDeleteSpace As Boolean)
  Dim strFind1 As String
  Dim strFind2 As String
 
  strFind1 = "\" & strLeftDelimiter & "*\" & strRightDelimiter
  If (bDeleteSpace) Then
    strFind2 = "[" & strLeftDelimiter & "\" & strRightDelimiter & " ]"
  Else
    strFind2 = "[" & strLeftDelimiter & "\" & strRightDelimiter & "]"
  End If
 
  Selection.HomeKey Unit:=wdStory
  objFind.ClearFormatting
  objFind.Replacement.Text = ""
 
  While objFind.Execute(FindText:=strFind1, MatchWildcards:=True)
    objFind.Execute FindText:=strFind2, MatchWildcards:=True, _
      ReplaceWith:="", Replace:=wdReplaceAll, Wrap:=wdFindStop
  Wend

End Sub


Sub DeleteBracketsAndSpace()
  Application.ScreenUpdating = False
 
  '  Delet all square brackets and the space in it.
  Call DeleteDelimiters(Selection.Find, "[", "]", True)
 
  '  Delet all parenthesis and the space in it.
  Call DeleteDelimiters(Selection.Find, "(", ")", True)
 
  '  Delet all braces and the space in it.
  Call DeleteDelimiters(Selection.Find, "{", "}", True)
 
  '  Delet all angle brackets and the space in it.
  Call DeleteDelimiters(Selection.Find, "<", ">", Ture)
 
  Application.ScreenUpdating = True
End Sub
  1. İndi “DeleteBracketsAndSpace” makrounda sənədinizdə olan mötərizələri silmək üçün lazım olan sətirləri saxlayın və bütün lazımsız kod sətirlərini silin.

Yalnız mötərizələrdən xilas olmaq istəyirsinizsə, kodları bir az dəyişdirməlisiniz. Tutaq ki, sənədinizdə kvadrat mötərizələr var. Sonra “DeleteDelimiters (Seçim.Tap, “[“, “]”, Doğru)” sətrinə keçin və “Doğru"Üçün"Saxta".

  1. Nəhayət, "Çalıştır" düyməsini basın.Kodları yapışdırın-> "Çalış" düyməsini basın

Word məsələlərini həll edin

Düzünü desəm, Word həqiqətən də bir çox işi yerinə yetirməyə qadirdir. Bununla belə, o, qüsursuz deyil. Problem yarandıqda, nəticə dağıdıcı ola bilər. Buna görə də, Word-də hər hansı kiçik problemi heç vaxt nəzərdən qaçıra bilmərik, çünki bu, sizi ölü Sözə apara bilər pozulmuş docx fayllar. Ən yaxşı həll yolu Word sənədlərinizi bərpa etmək üçün təkmil təmir aləti əldə etməkdir.

Müəllif Giriş:

Vera Çen məlumatların bərpası üzrə mütəxəssisdir DataNumendaxil olmaqla məlumatların bərpası texnologiyaları üzrə dünya lideri olan , Inc xlsx təmiri və pdf proqram məhsullarının təmiri. Ətraflı məlumat üçün ziyarət edin www.datanumen.com

İndi paylaş:

Şərhlər bağlıdır.