Skip to main content

Conas suíomh bileog a ghlasáil le feiceáil i gcónaí i Leabhar Oibre Excel?

Má tá iliomad bileoga i leabhar oibre, nuair a shocraíonn tú an leathán deireanach amháin, beidh an chéad bhileog i bhfolach sa bharra cluaisín bileog mar a thaispeántar thíos. Anois is mian leat suíomh máistirbhileog a ghlasáil le go mbeidh sé infheicthe i gcónaí, conas is féidir leat é a láimhseáil?

seasamh bileog ghlais doc 1 saighead doc ar dheis seasamh bileog ghlais doc 2

Suíomh bileog faoi ghlas le VBA


Suíomh bileog faoi ghlas le VBA

Seo a thugann mé isteach dhá chód VBA chun tú a láimhseáil an post seo.

Léim go dtí an bhileog

1. Brúigh Alt + F11 eochracha chun an Microsoft Visual Basic do Windows.

2. cliceáil Ionsáigh > Modúil, ansin cóipeáil agus greamaigh thíos an cód leis an script.

VBA: Léim go dtí an máistir-bhileog

Sub GoToSheet()
'UpdatebyExtendoffice20180427
    Sheets("Master").Activate
End Sub

nótaí: Sa slice cód de Bileoga ("Máistir"). Gníomhachtaigh, is féidir leat an Máistir le haon ainm bileog de réir mar is gá duit.

3. Ansin sábháil an cód seo, agus téigh ar ais chuig an leabhar oibre, cliceáil Forbróir > Macraí.
seasamh bileog ghlais doc 3

4. Sa Macra dialóg, roghnaigh an t-ainm cód a chuir tú isteach díreach anois, cliceáil Roghanna, aicearra a chruthú chun an cód seo a rith.
seasamh bileog ghlais doc 4

5. cliceáil OK agus dún an Macra dialóg.

Ón bpointe seo, agus tú ag brú an aicearra a chruthaigh tú, gníomhaíodh an máistirbhileog cibé bileog a úsáideann tú.

Coinnigh an bhileog i gcónaí chun tosaigh

1. Brúigh Alt + F11 eochracha chun an Microsoft Visual Basic do Windows.

2. Cliceáil dúbailte An Leabhar Oibre seo ó na Tionscadal-VBAProject pána, agus cóipeáil agus greamaigh thíos an cód leis an script.

VBA: Coinnigh an bhileog i gcónaí chun tosaigh

Private Sub Workbook_SheetActivate(ByVal Sh As Object)
'UpdatebyExtendoffice2018027
    Dim xSheet As Worksheet
    Application.EnableEvents = False
    Set xSheet = Sheets("master")
    If Sh.Name <> xSheet.Name Then
        Sh.Move , xSheet
        xSheet.Activate
        Sh.Activate
    End If
    Application.EnableEvents = True
End Sub

seasamh bileog ghlais doc 5

3. Sábháil an cód agus dún an fhuinneog VBA. As seo amach, cibé bileog a chliceálann tú, fanann an máistir-bhileog i gcónaí os comhair an bharra cluaisín.

seasamh bileog ghlais doc 6 saighead doc ar dheis seasamh bileog ghlais doc 7

Nóta: Sa chód thuas, “Máistir” an t-ainm bileog is mian leat a choinneáil infheicthe, athraigh é de réir mar is gá duit.

Uirlisí Táirgiúlachta Oifige is Fearr

🤖 Kutools AI Aide: anailís sonraí a réabhlóidiú bunaithe ar: Forghníomhú Chliste   |  Gin Cód  |  Cruthaigh Foirmlí Saincheaptha  |  Anailís a dhéanamh ar Sonraí agus Cairteacha a Ghin  |  Feidhmeanna Kutools a agairt...
Gnéithe Coitianta: Faigh, Aibhsigh nó Aithnigh Dúblaigh   |  Scrios Sraitheanna Bána   |  Comhcheangail Colúin nó Cealla gan Sonraí a Chailleadh   |   Babhta gan Foirmle ...
Cuardaigh Super: Ilchritéir VLookup    VLookup Illuachanna  |   VLookup Trasna Ilbhileoga   |   Amharc doiléir ....
Liosta anuas Casta: Go tapa Cruthaigh Liosta Anuas   |  Liosta anuas Cleithiúnach   |  Liosta Buail Isteach Ilroghnacha ....
Bainisteoir Colún: Cuir Líon Sonrach Colún leis  |  Colúin Bog  |  Scoránaigh Stádas Infheictheachta na gColún Ceilte  |  Déan comparáid idir Raonta & Colúin ...
Gnéithe Réadmhaoin: Fócas Eangaí   |  Amharc Dearaidh   |   Barra Mór na Foirmle    Leabhar Oibre & Bainisteoir Bileog   |  Leabharlann Acmhainní (Uaththéacs)   |  Piocálaí Dáta   |  Comhcheangail Bileoga Oibre   |  Criptigh/Díchriptigh Cealla    Seol Ríomhphost trí Liosta   |  Scagaire Super   |   Scagaire Speisialta (scagaire trom/iodálach/stailc tríd...) ...
Barr 15 Uirlisí12 Téacs uirlisí (Cuir Téacs, Bain Carachtair,...)   |   50 + Cairt cineálacha (Cairt Gantt,...)   |   40+ Praiticiúil Foirmlí (Ríomh aois bunaithe ar lá breithe,...)   |   19 Insertion uirlisí (Cuir isteach Cód QR, Ionsáigh Pictiúr ón gCosán,...)   |   12 Tiontú uirlisí (Uimhreacha le Focail, Comhshó Airgeadra,...)   |   7 Cumaisc & Scoilt uirlisí (Sraitheanna Comhcheangail Casta, Cealla Scoilt,...)   |   ... agus eile

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 ...

Tuairisc


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á!
Comments (3)
No ratings yet. Be the first to rate!
This comment was minimized by the moderator on the site
Hi there, Very helpfull. How can I freeze 2 sheets instead of one? Thanks (i'm beginner in VBA)
This comment was minimized by the moderator on the site
Hi, Francis, sorry for replying such late. Hope below VBA code can help you.<div data-tag="code">Private Sub Workbook_SheetActivate(ByVal Sh As Object)

'UpdatebyExtendoffice20211115

Dim xSheet1 As Worksheet

Dim xSheet2 As Worksheet

Dim xBol As Boolean



Application.EnableEvents = False



xBol = Application.ScreenUpdating

Application.ScreenUpdating = False

Set xSheet1 = Sheets("Sheet1")

Set xSheet2 = Sheets("Sheet2")

If (Sh.Name <> xSheet1.Name) Then

If (Sh.Name <> xSheet2.Name) Then

xSheet2.Move , xSheet1

Sh.Move , xSheet2

xSheet1.Activate

xSheet2.Activate

Sh.Activate

End If

End If

Application.ScreenUpdating = xBol

Application.EnableEvents = True

End SubIn the code, Sheet1 and Sheet2 are the two sheets that will be fixed in the front of all sheets whichever sheet you active.
This comment was minimized by the moderator on the site
This seems to change the order of my other tabs when clicking through them. Is there a way to stop that? I would like to keep them in a specific order but keep the 'master' tab visible. Thank you
There are no comments posted here yet
Please leave your comments in English
Posting as Guest
×
Rate this post:
0   Characters
Suggested Locations