Conas colún a roghnú bunaithe ar cheanntásc an cholúin in Excel?
Ag ceapadh, tá bileog oibre mhór agat ina bhfuil ilcholúin, agus anois, ba mhaith leat an colún sonrach a roghnú bunaithe ar ainm ceanntásc colúin. Chun a fháil go gcuirfidh an colún de réir colúin i mbileog oibre mór am amú, san alt seo, tabharfaidh mé modh gasta isteach chun an post seo a réiteach in Excel.
Roghnaigh colún bunaithe ar ainm ceanntásc an cholúin le cód VBA
Roghnaigh colún bunaithe ar ainm ceanntásc an cholúin le cód VBA
Is féidir leis an gcód VBA seo a leanas cabhrú leat na colúin a roghnú bunaithe ar ainm ceanntásca ar leith, déan é seo le do thoil:
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: Roghnaigh colún bunaithe ar ainm ceanntásc an cholúin:
Sub FindAddressColumn()
'Updateby Extendoffcie
Dim xRg As Range
Dim xRgUni As Range
Dim xFirstAddress As String
Dim xStr As String
On Error Resume Next
xStr = "Name"
Set xRg = Range("A1:P1").Find(xStr, , xlValues, xlWhole, , , True)
If Not xRg Is Nothing Then
xFirstAddress = xRg.Address
Do
Set xRg = Range("A1:P1").FindNext(xRg)
If xRgUni Is Nothing Then
Set xRgUni = xRg
Else
Set xRgUni = Application.Union(xRgUni, xRg)
End If
Loop While (Not xRg Is Nothing) And (xRg.Address <> xFirstAddress)
End If
xRgUni.EntireColumn.Select
End Sub
nótaí: Sa chód thuas, A1: P1 an raon ceanntásca ar mhaith leat colúin a roghnú as, agus “Ainm”Sa script xStr = "Ainm" an t-ainm ceanntásca ar mhaith leat colúin a roghnú bunaithe air. Athraigh iad le do riachtanas le do thoil.
3. Tar éis duit an cód a chóipeáil agus a ghreamú, brúigh le do thoil F5 eochair chun an cód seo a rith, agus roghnaíodh na colúin uile a bhfuil an t-ainm ceanntásca sonrach orthu ag an am céanna, féach an scáileán:
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á!