Ide: Lòt lang yo se Google-tradui. Ou ka vizite a English vèsyon nan lyen sa a.
Ouvri yon sesyon
x
or
x
x
enskri
x

or

Ki jan yo retire ranje vid ak kolòn soti nan tab nan Pawòl?

Kouman ou ka retire tout ranje vid yo ak kolòn soti nan tab nan Pawòl? Tutorial sa a pral montre w plizyè fason yo retire ranje vid ak kolòn soti nan tab nan dokiman Pawòl.

Manyèlman retire tout ranje vid ak kolòn soti nan tab

Retire tout ranje ak kolòn vid ki soti nan tab yo lè l sèvi avèk VBA kòd

Retire tout ranje ak kolòn vid ki soti nan tab avèk yon sèl klike soubon lide3

byen vit retire tout ranje vid ak kolòn nan tab nan Pawòl

Jounal Retire Ems Rows Cols sèvis piblik nan Kutools pou Pawòl ka byen vit retire tout kolòn vid ak ranje tab nan dokiman an Pawòl tout ak yon sèl klike sou. Klike sou jou jijman gratis 45!
doc retire ranje ranje kolòn
Kutools pou Pawòl: ak plizyè douzèn sou la men Pawòl ajoute-ins, gratis eseye pa gen okenn limit nan jou 45.

Manyèlman retire tout ranje vid ak kolòn soti nan tab

Microsoft Office Word pa bay yon fason pratik yo retire ranje vid ak kolòn, epi ou bezwen retire yo pa manyèlman chwazi chak ranje vid ak kolòn ak Lè sa a efase yo youn pa youn.

Etap 1: Chwazi ranje vid la oswa kolòn vid ou vle efase. Al gade nan Ekran:

doc-removerowsandcols-1

Etap 3: Anba Tablo Zouti, klike sou la Layout Tab;

doc-removerowsandcols-2

Etap 4: Nan la Ranje & Kolòn gwoup, klike sou Efase ranje oswa Efase Columns.

doc-removerowsandcols-3


Retire tout ranje ak kolòn vid ki soti nan tab yo lè l sèvi avèk VBA kòd

Fonksyon an Macro nan Pawòl bay yon fason pi plis pratik yo retire tout ranje vid ak kolòn soti nan tab nan dokiman. Ou ka retire tout ranje vid ak kolòn jan sa a.

Etap 1: Press "Alt-F11" yo louvri Microsoft vizyèl Debaz la pou fenèt aplikasyon;

Etap 2: Klike sou Modil sou Antre tab, kopye epi kole kòd VBA sa yo nan fenèt modil la;

Etap 3: Lè sa a, klike sou kouridoc-inverse-sign-6 bouton pou aplike VBA a.

Kòd la VBA yo retire tout ranje vid ak kolòn soti nan tab:

Sub DeleteEmptyTablerowsandcolumns ()
Application.ScreenUpdating = fo
Dim Tbl Kòm Table, sel kòm Telefòn, mwen Kòm Long, n Kòm Long, fEmpty Kòm Boolean
Avèk ActiveDocument
Pou chak Tbl nan .Tabl
n = Tbl.Columns.Count
Pou mwen = n Pou 1 Etap -1
fEmpty = Vrè
Pou chak sel Nan Tbl.Columns (mwen) .Cells
Si Len (cel.Range.Text)> 2 Lè sa a ,.
fEmpty = fo
Sòti pou
Fen Si
Next sel
Si fEmpty = Vrè Lè sa a, Tbl.Columns (mwen) .Delete
Next mwen
Next Tbl
Fen ak
Avèk ActiveDocument
Pou chak Tbl nan .Tabl
n = Tbl.Rows.Count
Pou mwen = n Pou 1 Etap -1
fEmpty = Vrè
Pou chak sel nan Tbl.Rows (mwen) .Cells
Si Len (cel.Range.Text)> 2 Lè sa a ,.
fEmpty = fo
Sòti pou
Fen Si
Next sel
Si fEmpty = Vrè Lè sa a, Tbl.Rows (mwen) .Delete
Next mwen
Next Tbl
Fen ak
Mete sel = Pa gen anyen: Mete Tbl = Pa gen anyen
Application.ScreenUpdating = Vrè
Fen Gwoup


Retire tout ranje ak kolòn vid ki soti nan tab avèk yon sèl klike sou

Kutools pou Pawòl bay ou fason ki pi bon yo retire tout ranje vid ak kolòn soti nan tab nan dokiman. Ou jis bezwen klike sou yon fwa, ak Kutools pou Pawòl's Remve Empty Rows Cols Utility pral retire tout ranje vid ak kolòn ki soti nan tout oswa selecetd tab pou ou byen vit.

Kutools pou Pawòl, ak plis pase 100 fonksyon sou la men, fè travay ou pi fasil.

Apre enstale Kutools pou Pawòl, tanpri fè kòm anba a:(Kutools Download gratis pou Pawòl kounye a!)

1. Klike sou Enterprise > Remove empty rows and Cols sou Table fenèt.

doc retire ranje ranje kolòn soti nan tab 1

2. Lè sa a, yon dyalòg Pops soti pou ou pou asire ke ranje ranje ak kolòn soti nan tout tab nan dokiman an antye, klike sou Wi kontinye, yon lòt dyalòg Pops soti nan fè ou sonje kantite ranje efase ak kolòn. Klike sou Ok yo fèmen li.

doc retire ranje ranje kolòn soti nan tab 2 doc flèch dwa doc retire ranje ranje kolòn soti nan tab 3

Koulye a, ranje yo vid ak kolòn yo te retire nan tab.

doc retire ranje ranje kolòn soti nan tab 4
doc flèch desann
doc retire ranje ranje kolòn soti nan tab 5

Ide.Si ou vle retire ranje vid soti nan fèy Excel, a Efase ranje Blank sèvis piblik nan Kutools pou Excel ka ede w.

Nan Excel, ou ka efase ranje vid pa chwazi yo youn pa youn Lè sa a, efase, men si gen dè santèn de ranje vid atravè workbook a, ki jan ou ka byen vit retire tout ranje vid? Isit la, a Efase ranje Blank sèvis piblik nan Kutools pou Excel se vize pou retire ranje vid nan Excel, ou ka chwazi yo retire ranje vid nan chwazi ranje, chwazi fèy, fèy aktyèl oswa tout fèy nan liv travay la ki ka fè ou yon favè bèl.
Klike sou jou jijman gratis 60!
doc efase ranje vid
Kutools pou Excel: ak plis pase 200 sou la meni Excel ajoute-ins, gratis eseye ki pa gen okenn limit nan jou 60.

Tabbed Navigasyon & koreksyon dokiman Pawòl plizyè / liv Excel kòm Firefox, Chrome, Entènèt Eksplore 10!

Ou ka abitye wè paj miltip nan Firefox / Chrome / IE, ak chanje ant yo pa klike sou onglè korespondan fasil. Isit la, Biwo Tab sipòte pwosesis menm jan an, ki pèmèt ou browse plizyè dokiman Pawòl oswa Excel workbooks nan yon sèl fenèt Pawòl oswa fenèt Excel, epi fasil chanje ant yo pa klike sou onglè yo.
Klike pou jijman gratis nan Biwo Tab!

Browse plizyè mo dokiman nan yon fenèt tankou Firefox
Say something here...
symbols left.
You are guest ( Sign Up? )
or post as a guest, but your post won't be published automatically.
Loading comment... The comment will be refreshed after 00:00.
  • To post as a guest, your comment is unpublished.
    heisenberg · 4 years ago
    thanks for the macro, it was really helpful..
  • To post as a guest, your comment is unpublished.
    Ken Grace · 4 years ago
    Thanks for the macro. It worked like a charm!
  • To post as a guest, your comment is unpublished.
    Andy Harris · 5 years ago
    Hello developers - I have this macro which sits in a button and when clicked (the macro) removes the table directly above the button. Can this be fixed so that the macro only works once? Ie. if there are 2 tables in the document only 1 is deleted - then the macro ceases to work... can you advise?

    Sub tableDelete()
    '
    ' tableDelete Macro
    'Dim nTables As Integer
    nTables = ActiveDocument.Tables.Count
    ActiveDocument.Tables(nTables).Delete

    '

    End Sub
    • To post as a guest, your comment is unpublished.
      Jay Chivo · 5 years ago
      [quote name="Andy Harris"]Hello developers - I have this macro which sits in a button and when clicked (the macro) removes the table directly above the button. Can this be fixed so that the macro only works once? Ie. if there are 2 tables in the document only 1 is deleted - then the macro ceases to work... can you advise?

      Sub tableDelete()

      Dim nTables As Integer
      nTables = ActiveDocument.Tables.Count
      ActiveDocument.Tables(nTables).Delete

      End Sub[/quote]

      Please try to use this VBA to delete all tables from current document in Word.

      [i]Sub tableDelete()

      Dim aTable As Table

      For Each aTable In ActiveDocument.Tables
      aTable.Delete
      Next

      End Sub[/i]