Sisällysluettelo
Vakio Excelin "Sarake" -toiminto palauttaa numeron eikä sarakkeen kirjaimen, esimerkiksi:
Sarake (E4) - palauttaa numeron 5 eikä kirjaimen E
Sarake (AD12) palauttaa numeron 30 eikä AD.
Seuraava funktio palauttaa kirjaimen eikä sarakkeen numeron. Joten yllä olevissa kahdessa esimerkissä on kirjaimet E ja AD. Rutiini palaa tyhjäksi, jos viitataan useampaan kuin yhteen soluun:
Funktio Alpha_Column (Cell_Add as Range) merkkijono himmennettynä No_of_Rows kokonaislukuna Dim No_of_Cols kokonaislukuna Dim Num_Column kokonaislukuna No_of_Rows = Cell_Add.Rows.Count No_of_Cols = Cell_Add.Columns.Count If ((No_of_Rolles) Or. "" Poistu toiminnosta Loppu Jos Num_Column = Cell_Add.Column If Num_Column <26 Sitten Alpha_Column = Chr (64 + Num_Column) Else Alpha_Column = Chr (Int (Num_Column / 26) + 64) & Chr ((Num_Column Mod 26) + 64) End Jos Lopeta toiminto
