Skip to content

Instantly share code, notes, and snippets.

@DavidMetcalfe

DavidMetcalfe/Column letters to numbers.vb

Last active May 13, 2020 20:22
Show Gist options
  • Save DavidMetcalfe/772a241283c7af819ecadbaf6bceae38 to your computer and use it in GitHub Desktop.
Save DavidMetcalfe/772a241283c7af819ecadbaf6bceae38 to your computer and use it in GitHub Desktop.
Download ZIP
Convert between column numbers and column letters in Excel VBA
Raw
Column letters to numbers.vb
Function columnLetterToNumber(letter) As Long
' Convert a given column letter into the corresponding column number.
columnLetterToNumber = Range(letter & 1).Column
End Function
Raw
Column numbers to letters.vb
Function columnNumberToLetter(number) As String
' Convert a given column number into the corresponding column letter.
columnNumberToLetter = Split(Cells(1, number).address, "$")(1)
End Function
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment