Mục lục
Hàm "Cột" trong Excel tiêu chuẩn trả về số chứ không phải chữ cái của cột, ví dụ:
Cột (E4) - trả về số 5 thay vì chữ E
Cột (AD12) trả về số 30 thay vì AD.
Hàm sau trả về ký tự chứ không phải số của cột. Vì vậy trong hai ví dụ trên chúng ta có các chữ cái E và AD tương ứng. Quy trình sẽ trả về trống nếu có nhiều hơn một ô được tham chiếu:
Hàm Alpha_Column (Cell_Add As Range) As String Dim No_of_Rows As Integer Dim No_of_Cols As Integer Dim Num_Column As Integer No_of_Rows = Cell_Add.Rows.Count No_of_Cols = Cell_Add.Columns_Count If ((No_of_Rows 1) Or (No_of) "" Thoát Chức năng Kết thúc Nếu Num_Column = Cell_Add.Column Nếu Num_Column <26 Thì Alpha_Column = Chr (64 + Num_Column) Khác Alpha_Column = Chr (Int (Num_Column / 26) + 64) & Chr ((Num_Column Mod 26) + 64) End Nếu kết thúc chức năng
