Conas bileog i bhfolach a chóipeáil in Excel?
In Excel, is féidir linn bileog a bhogadh agus a chóipeáil go leabhar oibre reatha nó eile go tapa agus go héasca, ach an ndearna tú iarracht riamh bileog i bhfolach a chóipeáil chuig leabhar oibre gníomhach? An t-alt seo, tabharfaidh mé cód VBA isteach chun go bhféadfá bileog shonrach i bhfolach a chóipeáil chuig comhad gníomhach Excel.
Cóipeáil bileog oibre i bhfolach chuig leabhar oibre gníomhach le cód VBA
Cóipeáil bileog oibre i bhfolach chuig leabhar oibre gníomhach le cód VBA
Chun bileog i bhfolach a chóipeáil ó leabhar oibre, agus ainm a thabhairt dó, is féidir leis an gcód VBA seo a leanas fabhar a dhéanamh duit:
1. Coinnigh síos an ALT + F11 eochracha a oscailt Microsoft Visual Basic d’Fheidhmchláir fhuinneog.
2. Cliceáil Ionsáigh > Modúil, agus greamaigh an cód seo a leanas sa Modúil Fuinneog.
Cód VBA: Cóipeáil bileog oibre i bhfolach chuig leabhar oibre gníomhach:
Sub DupSheet()
'Updateby Extendoffice 20161109
Dim Actsheet As String
Application.ScreenUpdating = False
On Error Resume Next
ActiveWorkbook.Sheets("Sheet12").Visible = True
ActiveWorkbook.Sheets("Sheet12").Copy _
after:=ActiveWorkbook.Sheets("Sheet12")
ActNm = ActiveSheet.Name
ActiveSheet.Name = InputBox("Enter the name for the new sheet.")
Sheets(ActiveSheet.Name).Visible = True
ActiveWorkbook.Sheets("Sheet12").Visible = False
Application.ScreenUpdating = True
End Sub
nótaí: Sa chód thuas, Bileog 12 an bhfuil an bhileog i bhfolach a theastaíonn uait a chóipeáil, athraigh í le do riachtanas.
3. Agus ansin brúigh F5 eochair chun an cód seo a rith, tiocfaidh bosca pras amach le cur i gcuimhne duit ainm a shonrú don chóip nua den bhileog oibre i bhfolach, féach an scáileán:
4. Ansin cliceáil OK cnaipe, agus cóipeáladh an bhileog i bhfolach leis an ainm nua sa leabhar oibre gníomhach ag an am céanna.
Uirlisí Táirgiúlachta Oifige is Fearr
Supercharge Do Scileanna Excel le Kutools le haghaidh Excel, agus Éifeachtúlacht Taithí Cosúil Ná Roimhe. Kutools le haghaidh Excel Tairiscintí Níos mó ná 300 Ardghnéithe chun Táirgiúlacht a Treisiú agus Sábháil Am. Cliceáil anseo chun an ghné is mó a theastaíonn uait a fháil ...
Tugann Tab Oifige comhéadan Tabbed chuig Office, agus Déan Do Obair 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á!