Note: The other languages of the website are Google-translated. Back to English

Conas bileoga oibre a athainmniú bunaithe ar luachanna cille in Excel?

Is gnách go gcuirtear bileoga oibre athainmnithe i bhfeidhm inár gcuid oibre Excel, ach an ndearna tú iarracht riamh bileoga oibre a athainmniú bunaithe ar luachanna cille? Ar ndóigh, is féidir leat bileoga oibre a athainmniú de láimh, ach anseo tugann an rang teagaisc seo isteach gur féidir le roinnt cleasanna iliomad bileoga oibre a athainmniú go tapa bunaithe ar luachanna cille a d’fhéadfadh do chuid ama oibre a shábháil.

Athainmnigh bileoga oibre bunaithe ar chill ar leith le VBA

Athainmnigh bileoga oibre bunaithe ar chill ar leith le Bileoga Oibre Il-Athainmnigh smaoineamh maith3

Athainmnigh bileoga oibre bunaithe ar raon ábhar cille le Bileoga Oibre Athainmnigh smaoineamh maith3


Le thíos VBA, is féidir leat an bhileog oibre choibhneasta a athainmniú bunaithe ar chill ar leith.

1. Roghnaigh an chill ar mhaith leat bileog oibre a athainmniú bunaithe uirthi, sa chás seo roghnaigh Cill A1. Féach an pictiúr:

bileog oibre athainmniú doc 1

2. Brúigh Alt + F11 eochracha le hoscailt Microsoft Visual Basic d’Fheidhmchláir fhuinneog.

3. cliceáil Ionsáigh > Modúil, ansin greamaigh faoi bhun chód VBA leis an gceann nua Modúil fhuinneog.

VBA: Athainmnigh bileoga oibre bunaithe ar luachanna cille ar leith.

Sub RenameSheet()
'UpdatebyKutools20191129
Dim xWs As Worksheet
Dim xRngAddress As String
Dim xName As String
Dim xSSh As Worksheet
Dim xInt As Integer
xRngAddress = Application.ActiveCell.Address
On Error Resume Next
Application.ScreenUpdating = False
For Each xWs In Application.ActiveWorkbook.Sheets
    xName = xWs.Range(xRngAddress).Value
    If xName <> "" Then
        xInt = 0
        Set xSSh = Nothing
        Set xSSh = Worksheets(xName)
        While Not (xSSh Is Nothing)
            Set xSSh = Nothing
            Set xSSh = Worksheets(xName & "(" & xInt & ")")
            xInt = xInt + 1
        Wend
        If xInt = 0 Then
            xWs.Name = xName
        Else
            If xWs.Name <> xName Then
                xWs.Name = xName & "(" & xInt & ")"
            End If
        End If
    End If
Next
Application.ScreenUpdating = True
End Sub

4. Brúigh F5 eochair chun cód VBA a rith. Ansin athainmníodh gach bileog oibre de réir luachanna cille A1 coibhneasta.

bileog oibre athainmniú doc 2


Má tá tú Kutools le haghaidh Excel, ní gá duit an cód VBA a shábháil, is féidir leat an Athainmnigh Bileoga Oibre Il gné chun gach bileog oibre a athainmniú go tapa bunaithe ar a gcealla coibhneasta.

Kutools le haghaidh Excel, le níos mó ná 300 feidhmeanna úsáideacha, déanann sé do phoist níos éasca. 

Tar éis suiteáil saor in aisce Kutools for Excel, déan mar atá thíos le do thoil:

1. Cumasaigh an leabhar oibre a theastaíonn uait ainmneacha a bhileoga oibre a athainmniú.

2. cliceáil Kutools Plus > Bileog Oibre > Athainmnigh Bileoga Oibre. Féach an pictiúr:

bileog oibre athainmniú doc 11

3. Ansin sa dialóg popped out, seiceáil na bileoga ar mhaith leat a athainmniú faoi Bileoga oibre pána, agus roghnaigh ceann de na Rogha Athainmnigh a theastaíonn uait, anseo cuirfidh mé ainm na bileoige in ionad, ansin seiceáil Athainmnigh bileoga oibre le cill ar leith, agus roghnaigh an chill is gá duit a athainmniú. Féach an pictiúr:

bileog oibre athainmniú doc 9

4. cliceáil Ok. Anois athainmnítear na bileoga le hábhar sonrach cille.

bileog oibre athainmniú doc 2

Ach uaireanta, is é a theastaíonn uait ilbhileoga oibre a athainmniú bunaithe ar raon luachanna cille mar atá faoi bhun an scáileáin a thaispeántar, sa chás seo, is féidir leat a roghnú faoi ​​bhun an mhodha.

bileog oibre athainmniú doc 3


Le Athainmnigh Bileoga Oibre Il of Kutools le haghaidh Excel, is féidir leat na bileoga a athainmniú bunaithe ar raon roghnaithe.

Tar éis suiteáil saor in aisce Kutools for Excel, déan mar atá thíos le do thoil:

1. cliceáil Kutools Plus > Bileog Oibre > Athainmnigh Bileoga Oibre. Féach an pictiúr:

bileog oibre athainmniú doc 11

2. Sa Athainmnigh Bileoga Oibre Il dialóg, ní mór duit na socruithe a shonrú mar seo:

(1) Roghnaigh na bileoga oibre a gcaithfidh tú iad a athainmniú Liosta bileoga oibre;

(2) Seiceáil Ó raon sonrach rogha, agus roghnaigh na luachanna cille is gá duit a athainmniú bunaithe ar;

(3) Sonraigh an Athainmnigh Roghanna, is féidir leat a sheiceáil Cuir isteach roimh ainm bunaidh an bhileog, Cuir isteach i ndiaidh ainm an bhileog bhunaidh, Nó Cuir ainm an bhileog bhunaidh in ionad, agus is féidir leat an toradh comhfhreagrach sa dialóg a réamhamharc.

bileog oibre athainmniú doc 10

3. cliceáil Ok, agus ansin is féidir leat a fheiceáil gur athainmníodh na bileoga oibre go léir a roghnaigh tú bunaithe ar na luachanna sonraithe cille.

Cuir ainm an bhileog bhunaidh in ionad

bileog oibre athainmniú doc 6

Cuir isteach roimh ainm bunaidh an bhileog

bileog oibre athainmniú doc 7

Cuir isteach i ndiaidh ainm an bhileog bhunaidh

bileog oibre athainmniú doc 8

Le fóntais Athainmnigh Bileoga Oibre, is féidir leat bileoga oibre a athainmniú le réimír nó iarmhír ar leith. Cliceáil anseo chun níos mó eolais a fháil ar Athainmnigh Bileoga Oibre Il.


Na hUirlisí Táirgiúlachta Oifige is Fearr

Réitíonn Kutools for Excel an chuid is mó de do chuid Fadhbanna, agus Méadaíonn sé do Tháirgiúlacht 80%

  • Athúsáid: Cuir isteach go tapa foirmlí casta, cairteacha agus aon rud a d'úsáid tú roimhe seo; Cealla a Chriptiú le pasfhocal; Cruthaigh Liosta Ríomhphoist agus seol ríomhphoist ...
  • Barra Foirmle Super (cuir línte iolracha téacs agus foirmle in eagar go héasca); Leagan Amach Léitheoireachta (líon mór cealla a léamh agus a chur in eagar go héasca); Greamaigh go dtí an Raon Scagtha...
  • Cumaisc Cealla / Sraitheanna / Colúin gan Sonraí a chailleadh; Ábhar Cealla Scoilt; Comhcheangail Sraitheanna / Colúin Dúblacha... Cill Dúblach a Chosc; Déan comparáid idir Ranganna...
  • Roghnaigh Dúblach nó Uathúil Sraitheanna; Roghnaigh Blank Rows (tá na cealla uile folamh); Aimsigh Super agus Fuzzy Aimsigh i go leor Leabhar Oibre; Roghnaigh go randamach ...
  • Cóip Díreach Cealla Il gan tagairt fhoirmle a athrú; Tagairtí Cruthaigh Auto chuig Bileoga Il; Cuir Urchair isteach, Boscaí Seiceála agus go leor eile ...
  • Sliocht Téacs, Cuir Téacs leis, Bain de réir Poist, Bain Spás; Subtotals Paging a chruthú agus a phriontáil; Tiontaigh Idir Ábhar Cealla agus Tráchtanna...
  • Scagaire Super (scéimeanna scagaire a shábháil agus a chur i bhfeidhm ar bhileoga eile); Ard-Sórtáil de réir míosa / seachtaine / lae, minicíocht agus níos mó; Scagaire Speisialta le cló trom, iodálach ...
  • Comhcheangail Leabhair Oibre agus Bileoga Oibre; Cumaisc Táblaí bunaithe ar eochaircholúin; Roinn Sonraí i Ilbhileoga; Baisc Tiontaigh xls, xlsx agus PDF...
  • Níos mó ná 300 gné chumhachtach. Tacaíochtaí Office / Excel 2007-2019 agus 365. Tacaíonn sé le gach teanga. Imscaradh éasca i d’fhiontar nó d’eagraíocht. Gnéithe iomlána triail saor in aisce 30 lá. Ráthaíocht ar ais airgid 60 lá.
cluaisín kte 201905

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á!
bun officetab
Sórtáil tuairimí de réir
Comments (6)
Níl rátálacha ar bith fós. Bí ar an gcéad duine a rátáil!
Rinne an modhnóir ar an láithreán an trácht seo a íoslaghdú
Nuashonrú faoi 20150602
An earráid a thaispeánann an cód seo..............Ní oibríonn ach ActiveSheet & RunTime Earráid 1004 [Theip ar Object_Worksheet]
Rinne an modhnóir ar an láithreán an trácht seo a íoslaghdú
Dia duit, Biplab Das, b'fhéidir nach féidir leis an gcód bunaidh oibriú ar leaganacha nua (2013 nó níos déanaí), tá cód nua nuashonraithe agam sa rang teagaisc, d'fhéadfá triail eile a bhaint as.
Rinne an modhnóir ar an láithreán an trácht seo a íoslaghdú
Sa sampla cód VBA, cad iad na hathruithe a dhéanfaí chun A2 a roghnú mar luach cille seachas A1?
Rinne an modhnóir ar an láithreán an trácht seo a íoslaghdú
Dia duit, Henry, roghnaigh A2 in ionad A1, athainmneofar gach bileog le luach cille A2.
Rinne an modhnóir ar an láithreán an trácht seo a íoslaghdú
Gach uair a fhéachaim ar ghnáthamh VBA agus a bhfaighidh mé alt mar seo uaitse, déanaim iarracht an cód samplach agus ní oibríonn sé riamh. Téann sé isteach i Debug i gcónaí ar an gcéad iarracht. Táim ag tosú a chreidiúint go bhfoilsíonn tú cód drochscríofa d'aon ghnó chun daoine a spreagadh chun iarracht a dhéanamh do Bhreiseán a cheannach.
Rinne an modhnóir ar an láithreán an trácht seo a íoslaghdú
Dia duit, Don, tá an VBA nuashonraithe faoi dhó, d'fhéadfadh sé a bheith ina n-oibreacha don chuid is mó de na coinníollacha, ach ní le haghaidh an tsaoil. 
Níl aon tráchtanna curtha suas anseo go fóill
Fág do chuid tuairimí
Ag postáil mar Aoi
×
Ráta an post seo:
0   Carachtair
Suímh Molta