Skip to main content

Conas litir cholúin a thiontú go huimhir nó a mhalairt in Excel?

An t-alt seo, labhróidh mé faoi conas litir cholúin a thiontú go huimhir cholúin nó uimhir cholúin a thiontú go litir. Mar shampla, tiontaigh litir cholún AA go huimhir 27, nó tiontaigh colún uimhir 100 go CV litreach. Chun an réiteach a fháil leis na modhanna seo a leanas.

Tiontaigh litir cholúin go huimhir nó a mhalairt le foirmlí

Tiontaigh litir cholúin go huimhir nó a mhalairt le Feidhm Shainithe ag an Úsáideoir


mboilgeog cheart gorm saighead Tiontaigh litir cholúin go huimhir nó a mhalairt le foirmlí

Chun an litir cholúin nó an lipéad a thiontú go huimhir nó a mhalairt, d’fhéadfadh na foirmlí thíos cabhrú leat, déan mar seo le do thoil:

Tiontaigh litir cholúin go huimhir cholúin:

Iontráil an fhoirmle seo le do thoil: COLUMN (INDIRECT ("AB1")) isteach i gcill bhán inar mian leat an toradh tiontaithe a aimsiú, agus ansin brúigh Iontráil eochair chun uimhir an cholúin a fháil:

lipéad colún a thiontú go uimhir 1

Nóta: San fhoirmle thuas, AB an litir cholúin ar mhaith leat uimhir an cholúin a fháil bunaithe uirthi, is féidir leat í a athrú go do riachtanas.

Tiontaigh uimhir an cholúin go litir an cholúin:

Clóscríobh an fhoirmle seo le do thoil: SUBSTITIÚID (SEOLADH (1,200,4), 1, "") isteach i gcill bhán chun an toradh a fháil, agus ansin brúigh Iontráil chun an litir cholúin a fháil mar a leanas:

lipéad colún a thiontú go uimhir 2

Nóta: San fhoirmle thuas, an uimhir dhearg 200 is í an uimhir cholúin is mian leat a thiontú go litir cholúin, is féidir leat í a athrú go do riachtanas.


mboilgeog cheart gorm saighead Tiontaigh litir cholúin go huimhir nó a mhalairt le Feidhm Shainithe ag an Úsáideoir

Seachas na foirmlí, anseo, is féidir liom an Feidhm Sainithe ag an Úsáideoir chun déileáil leis an tasc seo.

Tiontaigh litir cholúin go huimhir cholúin:

1. Coinnigh síos an ALT + F11 eochracha, ansin osclaíonn sé an 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: tiontaigh litir cholúin go huimhir cholúin:

Public Function ToColNum(ColN)
    ToColNum = Range(ColN & 1).Column
End Function

3. Ansin sábháil agus dún an cód seo, téigh ar ais chuig an mbileog oibre, agus iontráil an fhoirmle seo: = Tocolnum ("VV") (VV an litir cholúin is mian leat uimhir a thiontú. ) isteach i gcill bhán, agus brúigh Iontráil eochair chun uimhir an cholúin a fháil, féach an scáileán:

lipéad colún a thiontú go uimhir 3

Tiontaigh uimhir an cholúin go litir an cholúin:

1. Coinnigh síos an ALT + F11 eochracha, ansin osclaíonn sé an 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: athraigh uimhir an cholúin go litir cholúin:

Public Function ToColletter(Collet)
    ToColletter = Split(Cells(1, Collet).Address, "$")(1)
End Function

3. Ansin sábháil agus dún an cód seo, téigh ar ais chuig an mbileog oibre, agus iontráil an fhoirmle seo: = ToColletter (50) (50 an uimhir cholúin is mian leat a thiontú go litir. ) isteach i gcill bhán, agus brúigh Iontráil eochair chun uimhir an cholúin a fháil, féach an scáileán:

lipéad colún a thiontú go uimhir 4

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 (10)
Rated 5 out of 5 · 1 ratings
This comment was minimized by the moderator on the site
Public Function AlphabetInteger(ByVal letter As String) As Integer
Dim N As Integer
letter = Strings.UCase(letter)
If letter = "A" Then
N = 1
ElseIf letter = "B" Then
N = 2
ElseIf letter = "C" Then
N = 3
ElseIf letter = "D" Then
N = 4
ElseIf letter = "E" Then
N = 5
ElseIf letter = "F" Then
N = 6
ElseIf letter = "G" Then
N = 7
ElseIf letter = "H" Then
N = 8
ElseIf letter = "I" Then
N = 9
ElseIf letter = "J" Then
N = 10
ElseIf letter = "K" Then
N = 11
ElseIf letter = "L" Then
N = 12
ElseIf letter = "M" Then
N = 13
ElseIf letter = "N" Then
N = 14
ElseIf letter = "O" Then
N = 15
ElseIf letter = "P" Then
N = 16
ElseIf letter = "Q" Then
N = 17
ElseIf letter = "R" Then
N = 18
ElseIf letter = "S" Then
N = 19
ElseIf letter = "T" Then
N = 20
ElseIf letter = "U" Then
N = 21
ElseIf letter = "V" Then
N = 22
ElseIf letter = "W" Then
N = 23
ElseIf letter = "X" Then
N = 24
ElseIf letter = "Y" Then
N = 25
ElseIf letter = "Z" Then
N = 26
Else
N = 0
End If
AlphabetInteger = N
End Function


Public Function ColumnNumber(ByVal columnLetter As String) As Integer
Dim I As Integer
Dim sLength As Integer
Dim N As Integer
Dim A As Integer
Dim P As Integer
Dim C As String

sLength = Len(columnLetter)
N = 0
For I = 1 To sLength
P = sLength - I
C = Strings.Mid(columnLetter, I, 1)
A = AlphabetInteger(C)
N = N + A * 26 ^ P
Next I
ColumnNumber = N
End Function
This comment was minimized by the moderator on the site
Best solution =SUBSTITUTE(ADDRESS(1;COLUMN();4);1;"")
Thanks a lot.
Rated 5 out of 5
This comment was minimized by the moderator on the site
A to ZZ
=if(row()>26,char(row()/26+64)&char(mod(row(),26)+64),char(row()+64))
This comment was minimized by the moderator on the site
This formula does not work at rows that are multiples of 26. It gives B@ instead of AZ, C@ instead of BZ, D@ instead of CZ, etc.
Correction:= IF(ROW()>26,(IF(MOD(ROW(),26)=0,CHAR((ROW()-1)/26+64)&CHAR(MOD(ROW()-1,26)+65), CHAR(ROW()/26+64)&CHAR(MOD(ROW(),26)+64))),CHAR(ROW()+64))
This comment was minimized by the moderator on the site
thank you so much!!!...your formula to create the column letter to number really helps me a lot.
This comment was minimized by the moderator on the site
Function ToColletter(Collet) works as volatile function. If something changes anywhere in the sheet. It recalculate everywhere. In my case it makes 15 mil calculations and slowdown the calculation. Do you know how to fix it, if I dont want set application.calculation to manual and than back?
This comment was minimized by the moderator on the site
hola, cuando pego la formula = SUSTITUIR (DIRECCIÓN (1,200,4), 1, "") en una celda no hace nada, solo devuelve la formula, ya sea con 200 o cualquier otro numero
This comment was minimized by the moderator on the site
=CHAR(COLUMN( )+64)
This comment was minimized by the moderator on the site
Not better as it only works with 26 columns.
This comment was minimized by the moderator on the site
For so long I've used R1C1 cell referencing because I didn't know about the =SUBSTITUTE(ADDRESS(1,number,4),1,"") solution. 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