Im looking for a VB way to convert a column letter to a number.

Does anyone have a function that can do this or some code i can adapt?