İçindekiler
Standart Excel "Sütun" İşlevi, sütunun harfi yerine sayıyı döndürür, örneğin:
Sütun(E4) - E harfi yerine 5 sayısını döndürür
Sütun(AD12), AD yerine 30 sayısını döndürür.
Aşağıdaki işlev, sütun numarası yerine harfi döndürür. Yani yukarıdaki iki örnekte sırasıyla E ve AD harflerine sahibiz. Tek bir hücreden daha fazlasına başvurulduğunda rutin boş dönecektir:
Fonksiyon 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(1) O halde Alpha_Column(1) "" Exit Function Eğer Num_Column = Cell_Add.Column Eğer Num_Column < 26 ise Alpha_Column = Chr(64 + Num_Column) Else Alpha_Column = Chr(Int(Num_Column / 26) + 64) & Chr((Num_Column Mod 26) + 64) End Bitiş Fonksiyonu ise
