Սյունակի տառը փոխել սյունակի համարի.

Խնդրում ենք մուտքագրել այս բանաձևը. = Սյունակ (ԱՆՀԱՏԱԿԱՆ ("AB1")) դատարկ բջիջի մեջ, որտեղ ցանկանում եք գտնել փոխարկված արդյունքը և այնուհետև սեղմել Մտնել սյունակի համարը ստանալու ստեղնը.

Նշում: Վերոնշյալ բանաձևում AB սյունակի նամակն է, որի հիման վրա ցանկանում եք ստանալ սյունակի համարը, այն կարող եք փոխել ձեր կարիքի:

Սյունակի համարը վերափոխել սյունակի տառի.

Խնդրում ենք մուտքագրել այս բանաձևը. = ՓՈՓՈԽՈՒԹՅՈՒՆ (ՀԱՍDRԵ (1,200,4), 1, "") արդյունքը ստանալու համար դատարկ խցիկի մեջ մտնելուց հետո սեղմել Մտնել սյունակի նամակը ստանալ հետևյալ կերպ.

Նշում: Վերոնշյալ բանաձևում կարմիր թիվը 200 սյունակի համարն է, որը ցանկանում եք վերափոխել սյունակի տառի, այն կարող եք փոխել ձեր կարիքի:

Սյունակի տառը փոխել սյունակի համարի.

1, Պահեք պահեք ALT + F11 ստեղները, ապա այն բացում է Microsoft Visual Basic հավելվածների համար պատուհան.

2: Սեղմեք Տեղադրել > Մոդուլներ, և տեղադրեք հետևյալ կոդը Մոդուլներ Պատուհանը:

VBA կոդ. Սյունակի տառը փոխել սյունակի համարի.

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

3, Դրանից հետո պահեք և փակեք այս կոդը, վերադարձեք աշխատանքային թերթ և մուտքագրեք այս բանաձևը. = Tocolnum («VV») (VV սյունակի տառն է, որը ցանկանում եք փոխել համարը: ) դատարկ խցիկի մեջ և սեղմել Մտնել սյունակի համարը ստանալու ստեղնը, տես նկարի նկարը.

Սյունակի համարը վերափոխել սյունակի տառի.

1, Պահեք պահեք ALT + F11 ստեղները, ապա այն բացում է Microsoft Visual Basic հավելվածների համար պատուհան.

2: Սեղմեք Տեղադրել > Մոդուլներ, և տեղադրեք հետևյալ կոդը Մոդուլներ Պատուհանը:

VBA կոդ. Սյունակի համարը վերափոխել սյունակի տառի.

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

3, Դրանից հետո պահեք և փակեք այս կոդը, վերադարձեք աշխատանքային թերթ և մուտքագրեք այս բանաձևը. = ToColletter (50) (50 սյունակի համարն է, որը ցանկանում եք տառի վերածել: ) դատարկ խցիկի մեջ և սեղմել Մտնել սյունակի համարը ստանալու ստեղնը, տես նկարի նկարը.