Sut i gael gwared ar yr holl fotymau neu fotymau Gorchymyn yn Excel?
Mae'r erthygl hon yn sôn am gael gwared ar yr holl fotymau rheoli ffurflenni neu fotymau gorchymyn o ddalen weithredol yn Excel.
Tynnwch yr holl fotymau gan gynnwys botymau rheoli ffurflenni a botymau gorchymyn trwy eu dewis i gyd
Tynnwch yr holl fotymau gan gynnwys botymau rheoli ffurflenni a botymau gorchymyn yn ôl cod VBA
Tynnwch yr holl fotymau rheoli ffurf neu fotymau gorchymyn gyda chod VBA
Tynnwch yr holl fotymau gan gynnwys botymau rheoli ffurflenni a botymau gorchymyn trwy eu dewis i gyd
Gwnewch fel a ganlyn i gael gwared ar yr holl fotymau (gan gynnwys botymau rheoli ffurflenni a botymau gorchymyn) o'r daflen waith weithredol.
1. Galluogi'r Modd Dylunio trwy glicio Datblygwr > Modd Dylunio. Gweler y screenshot:
2. Dewiswch un o'r botymau gorchymyn a gwasgwch y Ctrl + A allweddi i ddewis pob botwm yn y daflen waith gyfredol.
3. Gwasgwch y Dileu allwedd i ddileu'r holl fotymau a ddewiswyd.
Nodyn: Os oes gwrthrychau eraill yn y daflen waith hon, fe'u dewisir hefyd.
Tynnwch yr holl fotymau gan gynnwys botymau rheoli ffurflenni a botymau gorchymyn yn ôl cod VBA
Ar ben hynny, gallwch wneud cais o dan sgript VBA i dynnu pob botwm o'r daflen waith gyfredol yn Excel.
1. Mae agor y daflen waith yn cynnwys y botymau rydych chi am eu tynnu, ac yna pwyswch y Alt + F11 allweddi i agor y Microsoft Visual Basic ar gyfer Ceisiadau ffenestr.
2. Yn y Microsoft Visual Basic ar gyfer Ceisiadau ffenestr, cliciwch Mewnosod > Modiwlau, yna copïwch isod god VBA i mewn i ffenestr y Cod.
Cod VBA: Tynnwch yr holl fotymau o'r ddalen weithredol
Sub Clear_ButtonsActiveSheet()
Dim I As Long
Dim xOLE As Object
On Error Resume Next
ActiveSheet.Buttons.Delete
For Each xOLE In ActiveSheet.OLEObjects
If TypeName(xOLE.Object) = "CommandButton" Then
xOLE.Delete
End If
Next
End Sub3. Gwasgwch y F5 allwedd i redeg y cod. Yna mae'r holl fotymau gan gynnwys botymau rheoli ffurflenni a botymau gorchymyn yn cael eu tynnu o'r daflen waith gyfredol ar unwaith.
Tynnwch yr holl fotymau rheoli ffurf neu fotymau gorchymyn gyda chod VBA
Os mai dim ond yr holl fotymau rheoli ffurflenni neu'r holl fotymau gorchymyn yr ydych am eu tynnu o'r ddalen weithredol. Gallwch roi cynnig ar y codau VBA isod i'w gyflawni.
1. Mae agor y daflen waith yn cynnwys y botymau rydych chi am eu tynnu, ac yna pwyswch y Alt + F11 allweddi i agor y Microsoft Visual Basic ar gyfer Ceisiadau ffenestr.
2. Yn y Microsoft Visual Basic ar gyfer Ceisiadau ffenestr, cliciwch Mewnosod > Modiwlau, yna copïwch isod god VBA i mewn i ffenestr y Cod.
Cod VBA: Tynnwch yr holl fotymau rheoli ffurflenni o'r ddalen weithredol
Sub Clear_ButtonsActiveSheet()
ActiveSheet.Buttons.Delete
End SubCod VBA: Tynnwch yr holl fotymau gorchymyn o'r ddalen weithredol
Sub Clear_ButtonsActiveSheet()
Dim xOLE As Object
On Error Resume Next
For Each xOLE In ActiveSheet.OLEObjects
If TypeName(xOLE.Object) = "CommandButton" Then
xOLE.Delete
End If
Next
End Sub3. Gwasgwch y F5 allwedd i redeg y cod.
Yna tynnir yr holl fotymau rheoli ffurflenni neu'r holl fotymau gorchymyn o'r daflen waith gyfredol ar unwaith.
Erthyglau cysylltiedig:
- Sut i fewnosod rhes newydd wag yn awtomatig gan Command Button yn Excel?
- Sut i ddefnyddio Botwm Gorchymyn i gadw taflen waith weithredol fel ffeil PDF yn Excel?
- Sut i ddiweddaru neu fewnosod dyddiad ac amser (cyfredol) gan Botwm Gorchymyn yn Excel?
- Sut i ddefnyddio Botwm Gorchymyn i newid gwerth celloedd penodol yn Excel?
Offer Cynhyrchiant Swyddfa Gorau
Supercharge Eich Sgiliau Excel gyda Kutools ar gyfer Excel, a Phrofiad Effeithlonrwydd Fel Erioed Erioed. Kutools ar gyfer Excel Yn Cynnig Dros 300 o Nodweddion Uwch i Hybu Cynhyrchiant ac Arbed Amser. Cliciwch Yma i Gael Y Nodwedd Sydd Ei Angen Y Mwyaf...
Mae Office Tab yn dod â rhyngwyneb Tabbed i Office, ac yn 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!
