Sut i glicio dwbl ar gell i agor taflen waith benodol yn Excel?
Ydych chi eisiau llywio'n gyflym i daflen waith benodol mewn llyfr gwaith Excel? Bydd yr erthygl hon yn darparu dull VBA i agor taflen waith benodol trwy glicio ddwywaith ar gell benodol yn Excel.
Cliciwch ddwywaith ar gell i agor taflen waith benodol gyda chod VBA
Cliciwch ddwywaith ar gell i agor taflen waith benodol gyda chod VBA
Gwnewch fel a ganlyn i agor taflen waith benodol trwy glicio ddwywaith ar gell yn Excel.
1. De-gliciwch y tab dalen sy'n cynnwys y gell rydych chi am agor taflen waith trwy glicio arni. Ac yna cliciwch Gweld y Cod o'r ddewislen cyd-destun. Gweler y screenshot:
2. Yn yr agoriad Microsoft Visual Basic ar gyfer Ceisiadau ffenestr, copïwch y cod VBA canlynol i mewn i ffenestr y Cod.
Cod VBA: cell clic dwbl i agor taflen waith benodol yn 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
Nodyn: Yn y cod VBA, "A1; Taflen2""A12; Taflen3""A4; Taflen4""A100; Taflen5"yn golygu y bydd doube click cell A1 yn agor Sheet2, bydd clic dwbl A2 yn agor Sheet3 ..., newidiwch nhw ar sail eich anghenion.
3. Gwasgwch y Alt + Q allweddi gyda'i gilydd i gau'r Microsoft Visual Basic ar gyfer Ceisiadau ffenestr.
O hyn ymlaen, wrth glicio ddwywaith cell A1 yn y daflen waith gyfredol, bydd y daflen waith benodol yn cael ei gweithredu ar unwaith.
Erthyglau cysylltiedig:
- Sut i glicio neu glicio dwbl cell i agor ffurflen ddefnyddiwr benodol yn Excel?
- Sut i ychwanegu marc gwirio mewn cell gyda chlicio ddwywaith yn Excel?
- Sut i ychwanegu / nodi dyddiad / amser cyfredol mewn cell gyda chlicio ddwywaith yn Excel?
- Sut i glicio cell ddwywaith ac ychwanegu 1 at y gwerth cell hwnnw yn Excel?
- Sut i popio calendr wrth glicio cell benodol 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!