Note: The other languages of the website are Google-translated. Back to English

Sut i dynnu rhesi a cholofnau gwag o dablau yn Word?

Sut allwch chi gael gwared ar yr holl resi a cholofnau gwag o dablau yn Word? Bydd y tiwtorial hwn yn dangos sawl ffordd i chi dynnu rhesi a cholofnau gwag o dablau yn nogfen Word.

Tynnwch yr holl resi a cholofnau gwag â llaw o fyrddau

Tynnwch yr holl resi a cholofnau gwag o dablau trwy ddefnyddio cod VBA

Tynnwch yr holl resi a cholofnau gwag o dablau gydag un clicsyniad da3


Tynnwch yr holl resi a cholofnau gwag â llaw o fyrddau

Nid yw Microsoft Office Word yn darparu ffordd gyfleus i gael gwared ar resi a cholofnau gwag, ac mae angen i chi eu tynnu trwy ddewis pob rhes a cholofn wag â llaw ac yna eu dileu fesul un.

Cam 1: Dewiswch y rhes wag neu'r golofn wag rydych chi am ei dileu. Gweler y screenshot:

doc-tynnusandcols-1

Cam 3: O dan Tabl Offer, cliciwch y Gosodiad Tab;

doc-tynnusandcols-2

Cam 4: Yn y Rhesi a Cholofnau grŵp, cliciwch Delete Rows neu Dileu Colofnau.

doc-tynnusandcols-3


Tynnwch yr holl resi a cholofnau gwag o dablau trwy ddefnyddio cod VBA

Mae Swyddogaeth Macro Gair yn darparu ffordd lawer mwy cyfleus i gael gwared ar yr holl resi a cholofnau gwag o dablau mewn dogfen. Gallwch chi gael gwared ar yr holl resi a cholofnau gwag fel a ganlyn.

Cam 1: Gwasgwch “Alt-F11” i agor ffenestr Microsoft Visual Basic for Application;

Cam 2: Cliciwch Modiwlau ar y Mewnosod tabio, copïo a gludo'r cod VBA canlynol i mewn i ffenestr y Modiwl;

Cam 3: Yna cliciwch Rundoc-reverse-arwydd-6 botwm i gymhwyso'r VBA.

Y cod VBA i gael gwared ar yr holl resi a cholofnau gwag o dablau:

Is DeleteEmptyTablerowsandcolumns ()
Application.ScreenUpdating = Anghywir
Dim Tbl Fel Tabl, cel Fel Cell, i Mor Hir, n Mor Hir, fEmpty Fel Boole
Gyda ActiveDocument
Ar gyfer Pob Tbl Mewn. Tablau
n = Tbl.Columns.Count
Ar gyfer i = n I 1 Cam -1
fEmpty = Gwir
Ar gyfer Pob cel Yn Tbl.Columns (i) .Cells
Os Len (cel.Range.Text)> 2 Yna
fEmpty = Anghywir
Allanfa Ar Gyfer
Gorffennwch Os
Cel nesaf
Os fEmpty = Gwir Yna Tbl.Columns (i). Dileu
Nesaf i
Tbl nesaf
Diwedd Gyda
Gyda ActiveDocument
Ar gyfer Pob Tbl Mewn. Tablau
n = Tbl.Rows.Count
Ar gyfer i = n I 1 Cam -1
fEmpty = Gwir
Ar gyfer Pob cel Yn Tbl.Rows (i) .Cells
Os Len (cel.Range.Text)> 2 Yna
fEmpty = Anghywir
Allanfa Ar Gyfer
Gorffennwch Os
Cel nesaf
Os fEmpty = Gwir Yna Tbl.Rows (i). Dileu
Nesaf i
Tbl nesaf
Diwedd Gyda
Gosod cel = Dim byd: Gosod Tbl = Dim byd
Application.ScreenUpdating = Gwir
Is-End


Tynnwch yr holl resi a cholofnau gwag o dablau gydag un clic

Mae Kutools for Word yn darparu'r ffordd fwyaf cyfleus i chi gael gwared ar yr holl resi a cholofnau gwag o dablau yn y ddogfen. 'Ch jyst angen i chi glicio unwaith, a Kutools am Word's Delete Rows/Columns bydd cyfleustodau yn tynnu pob rhes a cholofn wag o'r holl dablau selecetd i chi yn gyflym.

Kutools am Word, gyda mwy na 100 swyddogaethau defnyddiol, yn gwneud eich swyddi yn haws. 

Ar ôl gosod Kutools for Word, gwnewch fel isod:(Kutools i'w lawrlwytho am ddim ar gyfer Word Nawr!)

1. Cliciwch Kutools Byd Gwaith > Delete Rows/Columns ar y Table pane.

doc yn tynnu colofnau rhesi gwag o dabl 1

2. Yna mae deialog yn ymddangos, dewiswch y cwmpas rydych chi am dynnu tablau ohono yn yr adran Edrych i mewn, yna gwiriwch Row opsiwn a Rhes wag opsiwn, neu wirio Colofn opsiwn a Rhes wag opsiwn yn ôl yr angen. Os ydych chi am ddileu'r holl resi a cholofnau gwag, mae angen i chi gymhwyso'r llawdriniaeth hon ddwywaith.

mae kutools doc yn tynnu rhesi gwag 2  mae kutools doc yn tynnu rhesi gwag 3 

Nawr mae deialog yn galw allan i'ch atgoffa faint o dablau sydd wedi cael eu trin, cliciwch OK i gau, ac mae'r rhesi a'r colofnau gwag wedi'u tynnu o fyrddau.
mae kutools doc yn tynnu rhesi gwag 4

Awgrym.Os ydych chi am dynnu rhesi gwag o ddalen Excel, mae'r Dileu Rhesi Gwag gall cyfleustodau Kutools ar gyfer Excel eich helpu chi.


Offer Cynhyrchedd Geiriau a Argymhellir

 

Kutools Ar gyfer Word - Mwy Na 100 Nodweddion Uwch Ar gyfer Word, Arbedwch Eich 50% Amser

  • Gellir gwneud gweithrediadau cymhleth ac ailadroddus brosesu un-amser mewn eiliadau.
  • Mewnosodwch ddelweddau lluosog ar draws ffolderau yn nogfen Word ar unwaith.
  • Uno a chyfuno ffeiliau Word lluosog ar draws ffolderau yn un gyda'r drefn a ddymunir gennych.
  • Rhannwch y ddogfen gyfredol yn ddogfennau ar wahân yn ôl pennawd, toriad adran neu feini prawf eraill.
  • Trosi ffeiliau rhwng Doc a Docx, Docx a PDF, casglu offer ar gyfer trawsnewid a dewis cyffredin, ac ati ...
sylwadau (15)
Dim sgôr eto. Byddwch y cyntaf i sgorio!
Lleihawyd y sylw hwn gan y safonwr ar y wefan
Helo datblygwyr - mae gen i'r macro hwn sy'n eistedd mewn botwm ac wrth glicio (y macro) mae'n tynnu'r tabl yn union uwchben y botwm. A ellir trwsio hyn fel bod y macro yn gweithio unwaith yn unig? h.y. os oes 2 dabl yn y ddogfen dim ond 1 sy'n cael ei ddileu - yna mae'r macro yn peidio â gweithio... allwch chi gynghori? Is tablDileu() ' ' tableDileu Macro nTables Fel Cyfanrif nTables = ActiveDocument.Tables.Count ActiveDocument.Tables(nTables).Dileu ' Diwedd Is
Lleihawyd y sylw hwn gan y safonwr ar y wefan
[dyfynbris]Helo ddatblygwyr - mae gen i'r macro hwn sy'n eistedd mewn botwm a phan gaiff ei glicio (y macro) mae'n tynnu'r tabl yn union uwchben y botwm. A ellir trwsio hyn fel bod y macro yn gweithio unwaith yn unig? h.y. os oes 2 dabl yn y ddogfen dim ond 1 sy'n cael ei ddileu - yna mae'r macro yn peidio â gweithio... allwch chi gynghori? Is tablDileu() Dim nTables Fel Cyfanrif nTables = ActiveDocument.Tables.Count ActiveDocument.Tables(nTables).Dileu End IsGan Andy Harris[/quote] Ceisiwch ddefnyddio'r VBA hwn i ddileu pob tabl o'r ddogfen gyfredol yn Word. Is-dabl Dileu() Dim aTable Fel Tabl Ar Gyfer Pob Tabl Yn ActiveDocument.Tables aTable.Dileu Nesaf Diwedd Is
Lleihawyd y sylw hwn gan y safonwr ar y wefan
Diolch am y macro. Roedd yn gweithio fel swyn!
Lleihawyd y sylw hwn gan y safonwr ar y wefan
diolch am y macro, roedd yn ddefnyddiol iawn ..
Lleihawyd y sylw hwn gan y safonwr ar y wefan
A oes macro a fydd yn dileu rhes os mai dim ond un o'r celloedd yn y rhes honno sy'n wag neu'n cynnwys sero?
Lleihawyd y sylw hwn gan y safonwr ar y wefan
Diolch am y cod, defnyddiol iawn.
Lleihawyd y sylw hwn gan y safonwr ar y wefan
Helo Bawb, rwy'n edrych am swyddogaeth yn y gair lle, os byddaf yn dileu gair penodol yna dylai gael gwared ar y rhes honno hefyd.
Lleihawyd y sylw hwn gan y safonwr ar y wefan
Helo, mae'r macro yn gweithio, OND:

Ar ôl dileu pob rhes, mae holl golofnau'r tablau gyda rhesi gwag yn agor yn eang iawn.

Sut alla i drwsio'r cod fel nad yw hyn yn digwydd?


Rwy'n defnyddio Office 2016.


Diolch yn fawr!
Lleihawyd y sylw hwn gan y safonwr ar y wefan
Rydych chi'n gwybod y gallwch chi newid maint y tabl yn union? dim ond hidlo a didoli'ch data i'r brig gwirio faint o resi sydd â data, clicio offer tabl a chlicio newid maint ac addasu'r rhif olaf i beth bynnag sydd ei angen NEU ewch i waelod y tabl y gell olaf un a defnyddio'r triongl glas tinc i llusgo a newid maint,
Lleihawyd y sylw hwn gan y safonwr ar y wefan
Ac eithrio mae gen i ddogfen tudalen lluosog gyda thabl gyda gwybodaeth amrywiol ym mhob un. Ar ben hynny, mae'n ddogfen uno mor wahanol bob wythnos. Dwi angen dull awtomataidd :)
Lleihawyd y sylw hwn gan y safonwr ar y wefan
Rydych chi newydd arbed zillion o oriau o rwystredigaeth i mi, DIOLCH!
Lleihawyd y sylw hwn gan y safonwr ar y wefan
Deuthum o hyd i'r macro hwn ac mae'n gweithio'n wych o ran bwrdd gyda rhesi gwag sengl.
A yw'n bosibl ei newid i weithio ar fwrdd gyda rhesi hollt hefyd?
Hoffwn ddiolch yn fawr iawn os oes gennych chi ateb i mi.
Lleihawyd y sylw hwn gan y safonwr ar y wefan
Helo, shimon, nid wyf yn deall eich cwestiwn, rhowch enghreifftiau i mi neu disgrifiwch y cwestiwn gyda mwy o fanylion.
Lleihawyd y sylw hwn gan y safonwr ar y wefan
Bonjour,

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

Quelqu'un ateb une s'il vous pleit ?
Lleihawyd y sylw hwn gan y safonwr ar y wefan
Helo, diolch am y CODE, fe weithiodd ar ddogfen gydag un bwrdd yn unig.

ond wrth ei lansio ar ddogfen Word gyda thablau gwahanol o wahanol feintiau, cefais y gwall hwn : "Gwall amser rhedeg '5992' Methu cyrchu colofnau unigol yn y casgliad hwn oherwydd bod gan y tabl lled celloedd cymysg"

A all unrhyw un helpu, os gwelwch yn dda
Nid oes unrhyw sylwadau wedi'u postio yma eto
Gadewch eich sylwadau
Postio fel Gwestai
×
Graddiwch y swydd hon:
0   Cymeriadau
Lleoliadau a Awgrymir