Skip to main content

Conas sraitheanna agus colúin fholamh a bhaint de tháblaí i Word?

Conas is féidir leat na sraitheanna agus na colúin fholamh uile a bhaint de tháblaí i Word? Taispeánfaidh an rang teagaisc seo roinnt bealaí duit chun sraitheanna agus colúin fholamh a bhaint de tháblaí i ndoiciméad Word.

Bain na sraitheanna agus na colúin folmha de láimh ó tháblaí

Bain na sraitheanna agus na colúin folmha go léir ó tháblaí trí chód VBA a úsáid

Bain na sraitheanna agus na colúin folmha go léir ó tháblaí le cliceáil amháinsmaoineamh maith3


Bain na sraitheanna agus na colúin folmha de láimh ó tháblaí

Ní sholáthraíonn Microsoft Office Word bealach áisiúil chun sraitheanna agus colúin fholamh a bhaint, agus ní mór duit iad a bhaint trí gach ró agus colún folamh a roghnú de láimh agus ansin iad a scriosadh ceann ar cheann.

Céim 1: Roghnaigh an tsraith folamh nó an colún folamh a theastaíonn uait a scriosadh. Féach an pictiúr:

doc-remorowsandcols-1

Céim 3: Faoi tábla Uirlisí, cliceáil an leagan amach Cluaisín;

doc-remorowsandcols-2

Céim 4: Sa Sraitheanna & Colúin grúpa, cliceáil Rothaí a scriosadh nó Scrios Colúin.

doc-remorowsandcols-3


Bain na sraitheanna agus na colúin folmha go léir ó tháblaí trí chód VBA a úsáid

Soláthraíonn Macra Feidhm Focal bealach i bhfad níos áisiúla chun na sraitheanna agus na colúin folmha go léir a bhaint de tháblaí sa doiciméad. Is féidir leat na sraitheanna agus na colúin folmha go léir a bhaint mar seo a leanas.

Céim 1: Brúigh Alt-F11 an fhuinneog Microsoft Visual Basic for Application a oscailt;

Céim 2: Cliceáil Modúil ar an Ionsáigh cluaisín, cóipeáil agus greamaigh an cód VBA seo a leanas i bhfuinneog an Mhodúil;

Céim 3: Ansin cliceáil Rithdoc-droim ar ais-chomhartha-6 cnaipe chun an VBA a chur i bhfeidhm.

An cód VBA chun na sraitheanna agus na colúin folmha go léir a bhaint de tháblaí:

Fo DeleteEmptyTablerowsandcolumns ()
Application.ScreenUpdating = Bréagach
Dim Tbl Mar Tábla, cel As Cell, i Chomh fada, n Chomh fada, chomh folamh le Boole
Le ActiveDocument
Do gach Tbl In. Táblaí
n = Tbl.Columns.Count
Do i = n Go 1 Céim -1
fEmpty = Fíor
Do gach cel I Tbl.Columns (i) .Cells
Má tá Len (cel.Range.Text)> 2 Ansin
fEmpty = Bréagach
Scoir Do
Deireadh Má
Chéad cel
Más fEmpty = Fíor Ansin Tbl.Columns (i). Scrios
Ar Aghaidh i
Ar Aghaidh Tbl
Deireadh Le
Le ActiveDocument
Do gach Tbl In. Táblaí
n = Tbl.Rows.Count
Do i = n Go 1 Céim -1
fEmpty = Fíor
Do gach cel I Tbl.Rows (i) .Cells
Má tá Len (cel.Range.Text)> 2 Ansin
fEmpty = Bréagach
Scoir Do
Deireadh Má
Chéad cel
Más fEmpty = Fíor Ansin Tbl.Rows (i). Scrios
Ar Aghaidh i
Ar Aghaidh Tbl
Deireadh Le
Socraigh cel = Ní dhéanfaidh aon ní: Socraigh Tbl = Ní dhéanfaidh aon ní
Feidhmchlár.ScreenUpdating = Fíor
Fo Deireadh


Bain na sraitheanna agus na colúin folmha go léir ó tháblaí le cliceáil amháin

Soláthraíonn Kutools for Word an bealach is áisiúla duit chun na sraitheanna agus na colúin fholamh go léir a bhaint de tháblaí sa doiciméad. Ní gá duit ach cliceáil uair amháin, agus Kutools le haghaidh Word's Delete Rows/Columns bainfidh fóntais na sraitheanna agus na colúin fholamh go léir as na táblaí uile nó selecetd duit go tapa.

Kutools le haghaidh Word, le níos mó ná  feidhmeanna úsáideacha, déanann sé do phoist níos éasca. 

Tar éis a shuiteáil Kutools for Word, déan mar atá thíos le do thoil:K Kutools Íoslódáil saor in aisce do Word Now!)

1. cliceáil Kutools Plus > Delete Rows/Columns ar an Table pane.

bain colúin sraitheanna bána as tábla 1

2. Ansin tagann dialóg amach, roghnaigh an scóip ar mhaith leat táblaí a bhaint as sa roinn Féach isteach, ansin seiceáil Rae rogha agus Ró bán rogha, nó seiceáil Colún rogha agus Ró bán rogha de réir mar is gá duit. Más mian leat gach sraitheanna agus colún bán a scriosadh, ní mór duit an oibríocht seo a chur i bhfeidhm faoi dhó.

bain kutools sraitheanna bán as 2  bain kutools sraitheanna bán as 3 

Anois tagann dialóg amach le cur i gcuimhne duit cé mhéad tábla ar déileáladh leo, cliceáil OK le dúnadh, agus baineadh na sraitheanna agus na colúin bhána ó tháblaí.
bain kutools sraitheanna bán as 4

Leid.Más mian leat sraitheanna bána a bhaint de bhileog Excel, beidh an Scrios Sraitheanna Bána is féidir le fóntais Kutools for Excel cabhrú leat.

Uirlisí Táirgiúlachta Oifige is Fearr

Kutools le haghaidh Word - Elevate Your Word Experience with Over 100 Gnéithe Suntasacha!

🤖 Cúntóir Kutools AI: athraigh do chuid scríbhinn le AI - Gin Ábhar  /  Athscríobh Téacs  /  Déan achoimre ar Dhoiciméid  /  Fiosraigh le haghaidh Faisnéise bunaithe ar Doiciméad, ar fad laistigh de Word

📘 Máistreacht Doiciméad: Leathanaigh Scoilte  /  Cumaisc Doiciméid  /  Roghnú Easpórtála i bhFormáidí Éagsúla (PDF/TXT/DOC/HTML...)  /  Baisc a thiontú go PDF  /  Easpórtáil Leathanaigh mar Íomhánna  /  Priontáil Comhaid Il ag an am céanna...

Eagarthóireacht na nÁbhar: Faigh Baisc agus Ionadaigh thar Chomhaid Il  /  Athraigh Méid Gach Pictiúr  /  Trasnaigh Rónna Tábla agus Colúin  /  Tiontaigh Tábla go Téacs...

🧹 Effortless Glan: Sguab as Spásanna Breise  /  Sosanna Alt  /  Gach Ceanntásca  /  Boscaí Téacs  /  Hipearnasc  / Le haghaidh tuilleadh uirlisí a bhaint, ceann chuig ár Bain Grúpa...

Ionsáigh Cruthaitheach: cuir isteach Míle Deighilteoir  /  Boscaí Seiceála  /  Cnaipí Raidió  /  Cód QR  /  barcode  /  Tábla Líne Trasnánach  /  Fotheideal Cothromóid  /  Fotheideal Íomhá  /  Fotheideal Tábla  /  Pictiúir Il  / Faigh amach níos mó sa Cuir isteach Grúpa...

🔍 Roghanna Beachtais: Pionta leathanaigh ar leith  /  táblaí  /  cruthanna  /  míreanna ceannteideal  / Feabhsaigh an loingseoireacht le níos mó Roghnaigh gnéithe...

Feabhsuithe Réalta: Déan nascleanúint go tapa chuig aon láthair  /  cuir isteach téacs athchleachtach go huathoibríoch  /  scoránaigh gan uaim idir fuinneoga doiciméad  /  11 Uirlisí Tiontaithe...

???? Ar mhaith leat triail a bhaint as na gnéithe seo? Kutools le haghaidh Word cuireann a Triail saor in aisce 60 lá, gan teorainneacha! 🚀
 
Comments (16)
No ratings yet. Be the first to rate!
This comment was minimized by the moderator on the site
Hi
Many many thanks. Its 100% worked.
This comment was minimized by the moderator on the site
Hi, thanks for the CODE, it worked on a document with only one table.

but when launching it on a word document with different tables from different sizes, i got this error : "Run-time error '5992' Cannot access individual columns in this collection because the table has mixed cell widths"

Can anybody help, please
This comment was minimized by the moderator on the site
Bonjour,

Quand j'exécute le programme, l'erreur suivante s'affiche " Erreur de compilation : Instruction incorrecte à l'extérieur d'une procédure"

Quelqu'un a une solution s'il vous plait ?
This comment was minimized by the moderator on the site
I found this macro and it works great when it comes to a table with single empty rows.
Is it possible to change it to work on a table with split rows as well?
I would very much thank you if you have a solution for me.
This comment was minimized by the moderator on the site
Hi, shimon, I don't not understand your question, please give me examples or describe the question with more details.
This comment was minimized by the moderator on the site
You just saved me a zillion hours of frustration, THANK YOU!
This comment was minimized by the moderator on the site
u know you can just resize the table right? just filter and sort your data to top check how many rows have data, click table tools and the click resize and adjust the last number to whatever you need OR go to the bottom of the table the very last cell and use the tine blue triangle to drag and resize,
This comment was minimized by the moderator on the site
Except I have multiple page document with a table with varying information in each. Furthermore, it is a merge document so different each week. I need an automated method :)
This comment was minimized by the moderator on the site
Hi, the macro is working, BUT:

After deleting all rows, all the columns of the tables with empty rows open up very wide.

How can i fix the code so that this does not happens?


I am using Office 2016.


Thank you!
This comment was minimized by the moderator on the site
Hi All, I am looking for function in word wherein, if I remove specific word then it should remove that row as well.
This comment was minimized by the moderator on the site
Thanks for the code, really useful.
This comment was minimized by the moderator on the site
Is there a macro that will delete a row if only one of the cells in that row is empty or contains a zero?
There are no comments posted here yet
Load More
Please leave your comments in English
Posting as Guest
×
Rate this post:
0   Characters
Suggested Locations