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

 Sut i gymhwyso botwm i glirio celloedd penodol yn Excel?

Fel rheol, gallwch chi ddal y Ctrl allwedd i ddewis nifer o gelloedd penodol, ac yna clirio cynnwys y gell yn ôl yr angen. Os oes angen i chi glirio'r celloedd penodol hyn o bryd i'w gilydd, gallwch greu botwm clir i'w clirio gydag un clic yn unig. Yn yr erthygl hon, byddaf yn siarad am sut i greu botwm clir i glirio rhywfaint o gynnwys celloedd penodol.

Defnyddiwch botwm i glirio cynnwys celloedd penodol gyda chod VBA


swigen dde glas saeth Defnyddiwch botwm i glirio cynnwys celloedd penodol gyda chod VBA

Yn gyntaf, dylech greu botwm siâp, ac yna cymhwyso cod, o'r diwedd, clymu'r cod i'r botwm siâp. Gwnewch fel a ganlyn:

1. Cliciwch Mewnosod > Siapiau > Petryalau i ddewis siâp petryal, ac yna llusgo'r llygoden i dynnu botwm petryal yn unrhyw le o'r ddalen yn ôl yr angen, gweler y screenshot:

botwm doc celloedd clir 1

2. Yna mewnbwn y testun a fformatio'r botwm siâp yn ôl yr angen, gweler y screenshot:

botwm doc celloedd clir 2

3. Ac yna dylech fewnosod y cod VBA, daliwch y ALT + F11 allweddi i agor y Microsoft Visual Basic ar gyfer Ceisiadau ffenestr. Cliciwch Mewnosod > Modiwlau, a gludwch y cod canlynol yn y Modiwlau Ffenestr.

Cod VBA: Clirio cynnwys celloedd o gelloedd penodol:

Sub Clearcells()
'Updateby Extendoffice
Range("A2", "A5").Clear
Range("C10", "D18").Clear
Range("B8", "B12").Clear
End Sub

Nodyn: Yn y cod uchod: A2, A5 nodi y bydd yn clirio'r celloedd yn yr ystod A2: A5, nid dim ond y ddwy gell yn unigol, gallwch ychwanegu ystodau lluosog, fel Ystod ("B8", "B12"). Clir sgript o fewn y cod i'w glirio.

4. Yna arbed a chau ffenestr y cod, ac yna cysylltu'r cod â'r botwm siâp, cliciwch ar y dde ar y botwm, a dewis Neilltuo Macro, Yn y Neilltuo Macro blwch deialog, dewiswch y Clearcells enw cod o'r Enw macro blwch rhestr, a chlicio OK botwm i adael y dialog hwn. Gweler y screenshot:

botwm doc celloedd clir 3

5. Ac yn awr, pan gliciwch y Clirio'r holl botwm, mae'r celloedd penodol a ddiffiniwyd gennych yn cael eu clirio ar unwaith, gweler y screenshot:

botwm doc celloedd clir 4


Yr Offer Cynhyrchedd Swyddfa Gorau

Mae Kutools for Excel yn Datrys y rhan fwyaf o'ch Problemau, ac yn Cynyddu Eich Cynhyrchedd 80%

  • Ailddefnyddio: Mewnosod yn gyflym fformwlâu cymhleth, siartiau ac unrhyw beth rydych chi wedi'i ddefnyddio o'r blaen; Amgryptio Celloedd gyda chyfrinair; Creu Rhestr Bostio ac anfon e-byst ...
  • Bar Fformiwla Gwych (golygu llinellau lluosog o destun a fformiwla yn hawdd); Cynllun Darllen (darllen a golygu nifer fawr o gelloedd yn hawdd); Gludo i'r Ystod Hidlo...
  • Uno Celloedd / Rhesi / Colofnau heb golli Data; Cynnwys Celloedd Hollt; Cyfuno Rhesi / Colofnau Dyblyg... Atal Celloedd Dyblyg; Cymharwch y Meysydd...
  • Dewiswch Dyblyg neu Unigryw Rhesi; Dewiswch Blank Rows (mae pob cell yn wag); Darganfyddiad Gwych a Darganfyddiad Niwlog mewn Llawer o Lyfrau Gwaith; Dewis ar Hap ...
  • Copi Union Celloedd Lluosog heb newid cyfeirnod fformiwla; Auto Creu Cyfeiriadau i Daflenni Lluosog; Mewnosod Bwledi, Blychau Gwirio a mwy ...
  • Testun Detholiad, Ychwanegu Testun, Tynnu yn ôl Swydd, Tynnwch y Gofod; Creu ac Argraffu Subtotals Paging; Trosi rhwng Cynnwys a Sylwadau Celloedd...
  • Hidlo Super (arbed a chymhwyso cynlluniau hidlo i ddalenni eraill); Trefnu Uwch yn ôl mis / wythnos / dydd, amlder a mwy; Hidlo Arbennig gan feiddgar, italig ...
  • Cyfuno Llyfrau Gwaith a Thaflenni Gwaith; Uno Tablau yn seiliedig ar golofnau allweddol; Rhannwch Ddata yn Daflenni Lluosog; Trosi Swp xls, xlsx a PDF...
  • Mwy na 300 o nodweddion pwerus. Yn cefnogi Swyddfa / Excel 2007-2019 a 365. Yn cefnogi pob iaith. Defnydd hawdd yn eich menter neu sefydliad. Nodweddion llawn treial am ddim 30 diwrnod. Gwarant arian yn ôl 60 diwrnod.
tab kte 201905

Mae Tab Office yn Dod â rhyngwyneb Tabbed i'r Swyddfa, a Gwneud Eich Gwaith yn Haws o lawer

  • Galluogi golygu a darllen tabbed yn Word, Excel, PowerPoint, Cyhoeddwr, Mynediad, Visio a Phrosiect.
  • Agor a chreu dogfennau lluosog mewn tabiau newydd o'r un ffenestr, yn hytrach nag mewn ffenestri newydd.
  • Yn cynyddu eich cynhyrchiant 50%, ac yn lleihau cannoedd o gliciau llygoden i chi bob dydd!
gwaelod officetab
sylwadau (60)
Dim sgôr eto. Byddwch y cyntaf i sgorio!
Lleihawyd y sylw hwn gan y safonwr ar y wefan
RHOWCH FFORMIWLAAU AR GYFER ARBED A CLIR
Lleihawyd y sylw hwn gan y safonwr ar y wefan
Mae hyn hefyd yn clirio unrhyw fformatio'r gell. Sut ydw i'n gwneud hyn os ydw i am gadw fformiwlâu a fformatio fel cysgodi neu ffiniau
Lleihawyd y sylw hwn gan y safonwr ar y wefan
newid y gorchymyn o "clir" i "clearcontents" i ddileu'r mewnbynnau testun yn unig
Lleihawyd y sylw hwn gan y safonwr ar y wefan
beth am y lliw?
Lleihawyd y sylw hwn gan y safonwr ar y wefan
Diolch!
Lleihawyd y sylw hwn gan y safonwr ar y wefan
Diolch yn fawr iawn am y wybodaeth yma!!

Awgrym arall: ychwanegais flwch testun. I gyfuno'r blwch testun gyda'r siâp, dewisais y blwch testun, ei ddal i lawr SHIFT, ac yna dewisais y siâp. Gyda'r ddau wedi'u dewis fe wnes i dde-glicio a dewis GRWP, yna GROUP, eto.

Pan fydd y rhain yn cael eu grwpio, gallwch barhau i newid y testun a fformatio arall.

I ddadgrwpio, de-gliciwch eich botwm newydd a dewis GROUP > UNGROUP.
Lleihawyd y sylw hwn gan y safonwr ar y wefan
Neu, mae de-glicio ar y siâp yn caniatáu ichi newid fformatio a thestun.
Lleihawyd y sylw hwn gan y safonwr ar y wefan
Thx ar gyfer y cod hwn. Sut i glirio cynnwys celloedd neu'n ddelfrydol ei llenwi â gwerth 0 mewn dalen warchodedig gyda dim ond ychydig o gelloedd y gellir eu golygu? Thx am help ar ot.
Lleihawyd y sylw hwn gan y safonwr ar y wefan
Yn lle'r gorchymyn clir, byddai llinell enghreifftiol o'r uchod yn edrych fel:
Ystod ("A2: A5") = 0
Lleihawyd y sylw hwn gan y safonwr ar y wefan
allwch chi wneud i hwn weithio dros sawl tudalen?
Lleihawyd y sylw hwn gan y safonwr ar y wefan
Mae hyn yn clirio'r ffin hefyd, beth alla i ei wneud?
Lleihawyd y sylw hwn gan y safonwr ar y wefan
newid yn glir i gynnwys clir yna bydd y fformatio yn aros yr un fath ar ôl clirio. testun yn unig fydd wedi mynd nid borderi a lliwio ac ati
Lleihawyd y sylw hwn gan y safonwr ar y wefan
Helo. Beth yw'r ffordd orau o greu botymau ar wahân i glirio cynnwys pob rhes ar wahân? ee mae'r peiriant dal data yn hapus gyda mewnbynnau pob rhes arall, ond yna mae angen clirio rhesi 3, rhes 6 a rhes 7. Beth yw'r ffordd fwyaf effeithlon i greu botymau i'w clirio yn y modd hwn, hy rhes yn unig?
Lleihawyd y sylw hwn gan y safonwr ar y wefan
Helo, Rhowch fotwm ar ben rhes 3,6,7. Neilltuwch yr un marco ag uchod ar bob botwm i glirio'r rhes benodol honno yn unig.
Lleihawyd y sylw hwn gan y safonwr ar y wefan
Mae gen i lyfr gwaith gyda 11 tab, ynghyd ag un ar y dechrau wedi'i nodi fel "Start Here". Rwyf am greu un botwm yn y tab hwnnw a fydd yn clirio hyd at 9 cell unigol o'i gynnwys, neu rhowch "0" ynddo o fewn pob un o'r tabiau hyn. Nid yw'r celloedd yr wyf am eu clirio o reidrwydd yn byw yn yr un man ar bob tudalen. A yw hyn yn bosibl a sut mae'n cael ei wneud? Rwy'n cymryd y gellir gwneud hyn yn VisualBasic, ond a fyddai'n haws i neoffyt ei greu gan ddefnyddio Macros?
Lleihawyd y sylw hwn gan y safonwr ar y wefan
mae gen i'r un cwestiwn
Lleihawyd y sylw hwn gan y safonwr ar y wefan
Defnyddiwch hwn fel templed sgript:
Is-gelloedd clir()
'Updateby Extendoffice 20161008
Ystod ("b11:d22").ClearContents 'mae'r llinell hon yn cyfeirio at y dudalen gyda'r botwm macro.
Ystod ("'Mynediad Sgôr Eval'! D2:AA2").ClearContents 'mae'r llinell hon yn cyfeirio at dab ac amrediad gwahanol.
Is-End


Lleihawyd y sylw hwn gan y safonwr ar y wefan
yn syml fe wnes i yr un peth yn y daflen waith roedd yn gweithio pan fyddaf yn amddiffyn y daflen mae'n dangos gwall 1004, unrhyw awgrym yn yr achos hwn?
Lleihawyd y sylw hwn gan y safonwr ar y wefan
Helo Radheshyam,
I redeg y cod uchod mewn taflen waith amddiffyn, cymhwyswch y cod isod: (Sylwer: newidiwch y testun "cyfrinair" i'r cyfrinair sy'n amddiffyn eich dalen)
Sub ClearcellsAProtect()
Dim xWS Fel Taflen Waith
Dim xPsw Fel Llinyn
Gosod xWS = ActiveSheet
xPsw = "cyfrinair"
Ar Ail-ddechrau Gwall Nesaf
xWS.Unprotect Password:=xPsw
Ystod ("A2", "A5"). Clir
Ystod ("C10", "D18"). Clir
Ystod ("B8", "B12"). Clir
xWS.Protect Password:=xPsw
Is-End

Ceisiwch, gobeithio y gall eich helpu!
Lleihawyd y sylw hwn gan y safonwr ar y wefan
Heia,

Pa god ddylwn i ei ddefnyddio os mai dim ond un gell sydd angen i mi ei chlirio yn lle ystod o gelloedd?
Lleihawyd y sylw hwn gan y safonwr ar y wefan
Helo, Jennifer,
I glirio un gell yn unig, does ond angen i chi newid y cod VBA fel hyn: (Sylwer: newidiwch y gell A2 i'r gell rydych chi am ei chlirio)

Is-gelloedd clir()
Ystod ("A2").Clir
Is-End

Ceisiwch, gobeithio y gall eich helpu!
Lleihawyd y sylw hwn gan y safonwr ar y wefan
A oes ffordd i mi gadw'r diferion rhestr dilysu data ar y celloedd. Er enghraifft mae fy cwymp rhestr yn cynnwys Ie neu Na a hoffwn ailosod y celloedd yn wag ond cadw fy nilysiad data yn y cefndir
Lleihawyd y sylw hwn gan y safonwr ar y wefan
gallwch ddefnyddio = clir.


canys eg.

Ystod ("A2", "A5") = Clir
Lleihawyd y sylw hwn gan y safonwr ar y wefan
Nid yw'n gweithio ar gelloedd wedi'u huno. :(
Lleihawyd y sylw hwn gan y safonwr ar y wefan
disodli .Clear gan=""
Lleihawyd y sylw hwn gan y safonwr ar y wefan
Ar gyfer celloedd wedi'u huno, ydych chi'n golygu mai Ystod yw'r fformatio er enghraifft ("A25", "B25", "C25")="" ?
Lleihawyd y sylw hwn gan y safonwr ar y wefan
Rhowch gynnig ar hyn,

Er enghraifft: Y celloedd unedig yw colofnau A a B. Rydych chi eisiau clirio rhesi 2 i 5. Byddai'n edrych fel yr isod.

Is-gelloedd clir()
Ystod ("A2:B2", "A5:B5").Cynnwys Clir
Is-End
Lleihawyd y sylw hwn gan y safonwr ar y wefan
Sut i wneud ar Google Sheets os gwelwch yn dda?
Lleihawyd y sylw hwn gan y safonwr ar y wefan
Mae'n celar popeth gan gynnwys y llinellau ffin a fformat Celloedd, rwyf am i glirio'r Data yn unig.
Lleihawyd y sylw hwn gan y safonwr ar y wefan
Helo, Karam,
I glirio'r data yn unig a chadw fformatio'r gell, cymhwyswch y cod isod:

Is-gelloedd clir()
Ystod ("A2", "A5").Cynnwys Clir
Ystod ("C10", "D18").Cynnwys Clir
Ystod ("B8", "B12").Cynnwys Clir
Is-End

Ceisiwch, gobeithio y gall eich helpu!
Lleihawyd y sylw hwn gan y safonwr ar y wefan
Diolch skyyang
Nawr mae'n gweithio'n iawn
Lleihawyd y sylw hwn gan y safonwr ar y wefan
diolch i chi
Lleihawyd y sylw hwn gan y safonwr ar y wefan
Mae'n ymddangos nad yw'r fformatio hwn yn gweithio i mi, yn parhau i roi "gwall llunio: Disgwyliedig: diwedd datganiad" i mi
Lleihawyd y sylw hwn gan y safonwr ar y wefan
Diolch yn fawr skyyang. Dyna'n union yr oeddwn yn edrych amdano, i ddileu'r cynnwys ond NID y fformatio. Diolch eto.
Lleihawyd y sylw hwn gan y safonwr ar y wefan
Diolch am hyn. A oes ffordd i roi mwy nag un botwm clir ar un daflen waith? Diolch!
Lleihawyd y sylw hwn gan y safonwr ar y wefan
nid yw'n gweithio
Lleihawyd y sylw hwn gan y safonwr ar y wefan
pan fydd y botwm gorchymyn rwy'n pwyso dileu mae hefyd yn dileu'r celloedd di-dor ac mae gen i fformiwla ynddynt yn barod ac nid wyf am ddileu'r rheini
Lleihawyd y sylw hwn gan y safonwr ar y wefan
Rhowch farco i ddangos yn glir os yw cynnwys y gell yn llai na 4 rhif digidol. Diolch
Lleihawyd y sylw hwn gan y safonwr ar y wefan
Helo! Yn gweithio'n wych i mi gyda'r cod hwn fel y soniasoch:

Is-gelloedd clir()
Ystod ("A2", "A5").Cynnwys Clir
Ystod ("C10", "D18").Cynnwys Clir
Ystod ("B8", "B12").Cynnwys Clir
Is-End

Fodd bynnag, rwyf am gadw'r rhif "0" neu'r canrannau "0" ar gyfer rhai celloedd. Hefyd, cadwch y lliw a ddewiswyd yn flaenorol. Y rheswm am hyn yw fy mod yn defnyddio'r celloedd hyn fel celloedd mewnbwn ac eisiau defnyddio'r botwm i glirio celloedd mewnbwn penodol.


Ddiolch i mewn ddyrchaf!
Lleihawyd y sylw hwn gan y safonwr ar y wefan
Rwy'n ceisio clirio rhai celloedd ar draws sawl tab. Sut alla i gyflawni hyn? Rwyf wedi adeiladu rhestr wirio sydd tua 100 cwestiwn o hyd ar sawl tab, ac mae'n anodd mynd yn ôl a dileu'r adborth o bob cell.
Nid oes unrhyw sylwadau wedi'u postio yma eto
Llwytho mwy o
Gadewch eich sylwadau
Postio fel Gwestai
×
Graddiwch y swydd hon:
0   Cymeriadau
Lleoliadau a Awgrymir