Conas cill a chliceáil faoi dhó chun bileog oibre shonraithe a oscailt in Excel?
Ar mhaith leat nascleanúint a dhéanamh go tapa chuig bileog oibre shonraithe i leabhar oibre Excel? Cuirfidh an t-alt seo modh VBA ar fáil chun bileog oibre shonraithe a oscailt trí chliceáil faoi dhó ar chill áirithe in Excel.
Cliceáil faoi dhó ar chillín chun bileog oibre shonraithe a oscailt le cód VBA
Cliceáil faoi dhó ar chillín chun bileog oibre shonraithe a oscailt le cód VBA
Déan mar a leanas le do thoil chun bileog oibre shonraithe a oscailt trí chill a chliceáil faoi dhó in Excel.
1. Cliceáil ar dheis ar an táb bileog ina bhfuil an chill a theastaíonn uait bileog oibre a oscailt trí chliceáil air. Agus ansin cliceáil Féach an cód ón roghchlár comhthéacs. Féach an pictiúr:
2. San oscailt Microsoft Visual Basic d’Fheidhmchláir fhuinneog, cóipeáil an cód VBA seo a leanas isteach i bhfuinneog an Chóid.
Cód VBA: cill cliceáil dúbailte chun bileog oibre shonraithe a oscailt in Excel
Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
'Updated by Extendoffice 20180822
Dim xArray, xAValue As Variant
Dim xFNum As Long
Dim xStr, xStrRg, xStrSheetName As String
xRgArray = Array("A1;Sheet2", "A12;Sheet3", "A4;Sheet4", "A100;Sheet5")
On Error Resume Next
For xFNum = LBound(xRgArray) To UBound(xRgArray)
xStr = ""
xStr = xRgArray(xFNum)
xAValue = ""
xAValue = Split(xStr, ";")
xStrRg = ""
xStrRg = xAValue(0)
xStrSheetName = ""
xStrSheetName = xAValue(1)
If Not Intersect(Target, Range(xStrRg)) Is Nothing Then
Sheets(xStrSheetName).Activate
End If
Next
End Sub
nótaí: Sa chód VBA, "A1; Bileog2""A12; Bileog3""A4; Bileog4""A100; Bileog5"a chiallaíonn go n-osclóidh cill cliceáil doube A1 Bileog 2, osclóidh cliceáil dúbailte A2 Bileog3 ..., athraigh iad le do thoil bunaithe ar do chuid riachtanas.
3. Brúigh an Eile + Q eochracha le chéile chun an Microsoft Visual Basic d’Fheidhmchláir fhuinneog.
As seo amach, nuair a dhéantar cliceáil dúbailte ar chill A1 sa bhileog oibre reatha, cuirfear an bhileog oibre shonraithe i ngníomh láithreach.
Airteagail ghaolmhara:
- Conas cill a chliceáil nó a chliceáil faoi dhó chun foirm úsáideora shonraithe a oscailt in Excel?
- Conas marc seiceála a chur i gcill le cliceáil faoi dhó in Excel?
- Conas dáta / am reatha a chur leis / a iontráil i gcill le cliceáil faoi dhó in Excel?
- Conas cill a chliceáil faoi dhó agus 1 a chur leis an luach cille sin in Excel?
- Conas féilire a phiocadh suas agus cill ar leith á chliceáil in Excel?
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á!