Conas feidhmeanna gearrtha, cóipeála agus greamaigh in Excel a dhíchumasú?
Má tá leabhar oibre agat le sonraí tábhachtacha is gá duit a chosaint ó bheith gearrtha, cóipeáilte agus greamaithe. Conas é a bhaint amach? Soláthraíonn an t-alt seo modh VBA duit na feidhmeanna gearrtha, cóipeála agus greamaigh a dhíchumasú ag an am céanna i leabhar oibre Excel.
Díchumasaigh feidhmeanna gearrtha, cóipeála agus greamaigh le cód VBA
Díchumasaigh feidhmeanna gearrtha, cóipeála agus greamaigh le cód VBA
Déan mar a leanas le do thoil chun na feidhmeanna gearrtha, cóipeála agus greamaigh a dhíchumasú i leabhar oibre Excel.
1. Sa leabhar oibre ní mór duit na feidhmeanna gearrtha, cóipeála agus greamaigh a dhíchumasú, brúigh an Eile + F11 eochracha ag an am céanna chun an Microsoft Visual Basic d’Fheidhmchláir fhuinneog.
2. Sa Microsoft Visual Basic d’Fheidhmchláir fuinneog, cliceáil faoi dhó le do thoil An Leabhar Oibre seo ar chlé tionscadal pána, agus ansin cóipeáil agus greamaigh an cód VBA thíos sa An Leabhar Oibre seo (Cód) fuinneog. Féach an pictiúr:
Cód VBA: Díchumasaigh na feidhmeanna gearrtha, cóipeála agus greamaigh ag an am céanna in Excel
Private Sub Workbook_Activate()
Application.CutCopyMode = False
Application.OnKey "^c", ""
Application.CellDragAndDrop = False
End Sub
Private Sub Workbook_Deactivate()
Application.CellDragAndDrop = True
Application.OnKey "^c"
Application.CutCopyMode = False
End Sub
Private Sub Workbook_WindowActivate(ByVal Wn As Window)
Application.CutCopyMode = False
Application.OnKey "^c", ""
Application.CellDragAndDrop = False
End Sub
Private Sub Workbook_WindowDeactivate(ByVal Wn As Window)
Application.CellDragAndDrop = True
Application.OnKey "^c"
Application.CutCopyMode = False
End Sub
Private Sub Workbook_SheetSelectionChange(ByVal Sh As Object, ByVal Target As Range)
Application.CutCopyMode = False
End Sub
Private Sub Workbook_SheetActivate(ByVal Sh As Object)
Application.OnKey "^c", ""
Application.CellDragAndDrop = False
Application.CutCopyMode = False
End Sub
Private Sub Workbook_SheetDeactivate(ByVal Sh As Object)
Application.CutCopyMode = False
End Sub
3. Ansin brúigh an Eile + Q eochracha chun imeacht as an Microsoft Visual Basic d’Fheidhmchláir fhuinneog.
Anois ní féidir leat sonraí a ghearradh nó a chóipeáil ón leabhar oibre seo, idir an dá linn, ní féidir sonraí a chóipeáil tú ó bhileoga nó leabhair oibre eile a ghreamú isteach sa leabhar oibre seo.
nótaí: Tá an fheidhm tarraing agus titim díchumasaithe freisin tar éis an cód VBA thuas a rith.
Earraí gaolmhara:
- Conas cliceáil ar dheis ar chluaisín bileog in Excel a dhíchumasú?
- Conas an roghchlár cliceáil ar dheis a dhíchumasú i mbileog oibre shonraithe nó i leabhar oibre iomlán in Excel?
- Conas an modh eagarthóireachta a chosc nó a dhíchumasú trí chliceáil faoi dhó ar chill in Excel?
Uirlisí Táirgiúlachta Oifige is Fearr
Supercharge Do Scileanna Excel le Kutools for Excel, agus Éifeachtúlacht Taithí Cosúil Riamh Roimhe. Kutools for Excel Tairiscintí os cionn 300 Ardghné chun Táirgiúlacht a Mhéadú agus Am a Shábháil. Cliceáil anseo chun an ghné is mó a theastaíonn uait a fháil ...
Office Tab Tugann sé comhéadan Tabbed chuig Oifig, agus Déan do chuid Oibre i bhfad níos éasca
- Cumasaigh eagarthóireacht agus léamh tabbed i Word, Excel, PowerPoint, Foilsitheoir, Rochtain, Visio agus Tionscadal.
- Oscail agus cruthaigh cáipéisí iolracha i gcluaisíní nua den fhuinneog chéanna, seachas i bhfuinneoga nua.
- Méadaíonn do tháirgiúlacht 50%, agus laghdaíonn sé na céadta cad a tharlaíonn nuair luch duit gach lá!














