Word-də üfüqi mətnləri şaquli mətnlərə və əksinə çevirməyin 4 sürətli yolu

Bu yazıda sizə Word sənədinizdə üfüqi və şaquli mətnləri çevirməyin 4 sürətli və asan yolunu nümayiş etdirmək istərdik.

İndi və sonra, çox güman ki, sənədimizdə mətnləri üfüqi və ya şaquli olaraq təşkil edirik. Sonra üfüqi mətni şaquli mətnə ​​çevirmək şansları var. Bütün məlumatları yenidən yazmaq çox vaxt aparar və səbr tələb edərdi.

Buna görə də, biz sizə üfüqi mətni şaquli mətnə ​​və əksinə dəyişdirməyin 4 yolunu təklif etmək istəyirik, məsələn, aşağıdakılar:

1-ci hal: Şaquli mətnləri üfüqi mətnlərə çevirin

Əvvəla, şaquli və üfüqi mətnlər arasında dəyişiklik etməyin 2 üsulu var.

Metod 1: "Əvəz et" funksiyasından istifadə edin

1. Əvvəlcə hədəf mətni seçin.
2. Sonra "Ev" sekmesini vurun.
3. Sonra "Redaktə etmə" qrupuna keçin və "Əvəz et" seçiminə klikləyin. Və ya "Tap və dəyişdir" dialoq qutusunu açmaq üçün "Ctrl + H" düymələrini basa bilərsiniz.
4. İndi kursoru "Nə tapın" mətn qutusuna qoyun, "^p" daxil edin.
5. Və "Əvəz et" mətn qutusuna boşluq yazın.
6. Sonra "Hamısını dəyişdirin" düyməsini basın.
7. Açılan bir dialoq qutusu görünəcək, sadəcə "Bəli" düyməsini basın.

Metod 2: Makronu işə salın

1. Əvvəlcə "Developer" sekmesini vurun.
2. Sonra VBA redaktorunu işə salmaq üçün "Visual Basic" düyməsini basın. Alternativ yol "Alt + F11" düyməsini sıxmaqdır.
3. Sonra "Normal" layihəsinə klikləyin.
4. Və "Daxil et" düyməsini basın.
5. Normal layihədə yeni modul yaratmaq üçün “Modul” seçin.
6. Sonra redaktə sahəsini açmaq üçün modulun üzərinə iki dəfə klikləyin.
7. Aşağıdakı kodları oraya yapışdırın:

Sub ConvertVerticalToHorizontalList()
 
  With Selection.Find
    .Text = "^p"
    .Replacement.Text = " "
    .Forward = False
    .Wrap = wdFindStop
    .Format = False
    .MatchCase = False
    .MatchWholeWord = False
    .MatchWildcards = False
    .MatchSoundsLike = False
    .MatchAllWordForms = False
  End With
  Selection.Find.Execute Replace:=wdReplaceAll
End Sub

8. Nəhayət, "Çalış" düyməsini basın.

Case 2: Üfüqi mətnləri şaquli mətnlərə çevirin

Metod 1: Yenidən "Əvəz et" funksiyasına keçin

1. Başlamaq üçün, 1-ci halın 1-ci metodundakı ilk 3 addımı təkrarlayın.
2. Lakin bu dəfə “Tap və Dəyişdir” informasiya qutusunda “Nəyi tap” mətn qutusuna boşluq və “Əvəz et” qutusuna “^p” daxil edin.
3. Sonra "Hamısını dəyişdirin" düyməsini basın.

Metod 2: Makronu işə salın

1. Eynilə, 6-ci halın 2-ci metodunda ilk 1 addımı izləyin.
2. Və bu dəfə yerinə aşağıdakı kodları yapışdırın:

Sub ConvertHorizontalToVerticalList()

  With Selection.Find
    .Text = " "
    .Replacement.Text = "^p"
    .Forward = False
    .Wrap = wdFindStop
    .Format = False
    .MatchCase = False
    .MatchWholeWord = False
    .MatchWildcards = False
    .MatchSoundsLike = False
    .MatchAllWordForms = False
  End With
  Selection.Find.Execute Replace:=wdReplaceAll
End Sub

3. "Çalış" düyməsini basmağı unutmayın.

L-nizi geri alınost File

İndiki işlərdə daim rəqəmsal cihazlarla məşğul olmaq məcburiyyətindəyik, biz də kritik məlumatı itirmək riski ilə üzləşirik. Bunun qarşısını almaq üçün ehtiyat nüsxələrin alınması əla həlldir. Bununla belə, ehtiyat nüsxələmə gündəlik əzmkarlıq tələb edir. Zaman keçdikcə, faylların ehtiyat nüsxəsini çıxarmaq qərarınız gündəlik həyatın fonuna keçə bilər. Və heç bir şey gümüş güllə deyil, hətta ehtiyat nüsxələri də. Buna görə də, sizə lazım olacaq zədələnmiş Word sənədinin bərpası vasitəsi.

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 zədələnmiş xlsx təmir aləti və pdf proqram məhsullarının təmiri. Ətraflı məlumat üçün ziyarət edin www.datanumen.com