title: Converting column letter to number
body: <p>I found code to convert number to column letter.</p>
  
  <p>How can I convert from column letter to number?</p>
  
  <pre><code>Sub colLtr()
  Dim mycolumn
  mycolumn = 1000
  Mcl = Left(Cells(1, mycolumn).Address(1, 0), InStr(1, Cells(1, mycolumn).Address(1, 0), "$") - 1)
  MsgBox Mcl
  End Sub
  </code></pre>