Ձեր Word փաստաթղթում աղյուսակի բջիջներում անցանկալի տարածությունները հեռացնելու 3 արդյունավետ եղանակ

Հաջորդ հոդվածում մենք ցանկանում ենք ձեզ առաջարկել 3 արդյունավետ միջոց ՝ ձեր Word փաստաթղթում աղյուսակի բջիջներում անցանկալի տարածությունները հեռացնելու համար:

Մեկ -մեկ, մենք պետք է ներդնենք աղյուսակ ՝ տեքստեր և տվյալներ պահելու համար: Բայց տեքստեր և տվյալներ մուտքագրելուց հետո մենք հաճախ ստիպված ենք լինում կարգավորել սեղանի չափը: Եվ երբեմն, մենք կստանանք աղյուսակ, որտեղ բջիջներում առկա են անցանկալի տարածություններ `դրա չափը հարմարեցնելուց հետո, ինչպես օրինակ ՝ ստորև.

Վերոնշյալ օրինակում յուրաքանչյուր բջիջում տեքստի տակ կա դատարկ տող: Բայց մենք չենք կարող ազատվել դրանից պարզապես «leteնջել» սեղմելով: Փոխարենը, մենք պետք է օգտագործենք այլ լուծումներ:

Մեթոդ 1. Ձեռքով նեղացրեք տողի բարձրությունը

1. Նախ և առաջ, ստուգեք, թե արդյոք բջիջներում կան հեռացվող դատարկ տողեր: Եթե կան, նախ ջնջեք դրանք:
2. Այնուհետև կուրսորը դրեք սեղանի տողի ներքևի տողում: Սպասեք, մինչև կուրսորը փոխվի կրկնակի հորիզոնական գծերի նշանի ՝ 2 սլաքով:
3. Հաջորդը կտտացրեք և ներքևի տողը քաշեք մինչև անցանկալի տարածության անհետացումը:
4. Կրկնեք 2 -րդ և 3 -րդ քայլերը աղյուսակի այլ տողերի վրա, որոնց բարձրությունը պետք է չափափոխվի:

Ահա արդյունքը.

Մեթոդ 2. Անջատեք «Նշեք բարձրություն» գործառույթը

1. Առաջին հերթին, կտտացրեք վերևի ձախ մասում գտնվող խաչի նշանին ՝ ամբողջ աղյուսակը ընտրելու համար:
2. Դրանից հետո աջ կտտացրեք և ընտրեք «Աղյուսակի հատկությունները»:
3. «Աղյուսակի հատկություններ» վանդակում: Նախ կտտացրեք «Տող» ներդիրին:
4. Հաջորդը մաքրեք «Նշեք բարձրությունը» վանդակը:
5. Ի վերջո, կտտացրեք «Լավ»:

Էֆեկտը նույնն է, ինչ 1 -ին մեթոդում:

Մեթոդ 3. Օգտագործեք Word մակրո

1. Սկսելու համար սեղմեք «Մշակող», ապա «Visual Basic»՝ VBA խմբագրիչը բացելու համար: Եթե «Մշակող» ներդիրը հասանելի չէ ժապավենում, դրա փոխարեն սեղմեք «Alt+F11»:
2. Հաջորդը, գնացեք նոր մոդուլ ստեղծելու համար: Կտտացրեք «Նորմալ» ձախ սյունակում:
3. Այնուհետեւ կտտացրեք «Տեղադրեք» ցանկի բարում:
4. Բացվող ընտրացանկում ընտրեք «Մոդուլ»:
5. Հաջորդը կրկնակի սեղմեք մոդուլի վրա ՝ այն բացելու համար:
6. Այժմ տեղադրեք հետևյալ ծածկագրերը կոդավորման տարածքում.

Sub RemoveSpacesInTables()
  Dim objTable As Table
  Dim objDoc As Document
 
  Set objDoc = ActiveDocument
 
  With objDoc
    If .Tables.Count > 0 Then
      For Each objTable In .Tables
        objTable.Select
        Selection.Rows.HeightRule = wdRowHeightAuto
        Selection.Rows.Height = InchesToPoints(0)
      Next objTable
    Else
      MsgBox ("This document contains no table.")
    End If
  End With
End Sub

7. Վերջապես, կտտացրեք «Գործարկել» կամ գործարկեք ծածկագրերը ՝ սեղմելով «F5»:

Այս մակրոը պետք է աշխատի փաստաթղթի բոլոր սեղանների վրա և հեռացնի ավելորդ տարածությունները:

3 մեթոդների համեմատություն

Մի անգամ փաստաթուղթը կոռումպացված է

Հաճախ պատահում է, որ ժամանակ առ ժամանակ վնասված փաստաթուղթ եք ստանում։ Այնուամենայնիվ, հենց որ ձեր փաստաթուղթը վնասվում է, դա նաև այն պահն է, երբ վախը սկսում է ի հայտ գալ։ Հետևաբար, անվտանգության համար ամենաարագ գործողությունը վերանորոգման գործիք ձեռք բերելն է։ շտկել docx- ը որպեսզի այն կանխվի հետագա վնասներից:

Հեղինակի ներածություն.

Վերա Չենը տվյալների վերականգնման փորձագետ է DataNumen, Inc., որը տվյալների վերականգման տեխնոլոգիաների համաշխարհային առաջատարն է, այդ թվում վերականգնել Excel- ը և pdf նորոգել ծրագրային արտադրանքները: Լրացուցիչ տեղեկությունների համար այցելեք www.datanumen.com