View Single Post
  #1   Report Post  
Posted to microsoft.public.excel.programming
Keith Keith is offline
external usenet poster
 
Posts: 262
Default Covert Column Numbers to Column Letters in Excel VB

I found the function ConvertFormula and modified it for my needs. It changes
R1C1 tstyle to A1. Since I had all the row and column numbers, it worked
great. Thank you for your help!

See Below:

Function CreateRange( StartRowNum, StartColNum, EndRowNum, EndColNum As
Long)
InputFormula = ConvertRefStyle("R" & StartRowNum & "C" & StartColNum)
InputFormula = InputFormula & ":" & ConvertRefStyle("R" & EndRowNum &
"C" & EndColNum)

Function ConvertRefStyle(InputFormula As String)
ConvertRefStyle = Application.ConvertFormula(Formula:=InputFormula, _
fromReferenceStyle:=xlR1C1, toReferenceStyle:=xlA1)
End Function



"Andibevan" wrote:

Here You go -- Column Letter = CHR(COLNUM + 64)

HTH

Andi

"Keith" wrote in message
...
Is there a Excel VB function that can take a column number and convert it

to
a column letter? I can write one on my own, but I hope that there is a

built
in function to do this. Some properties will only use column letters and
this presents a problem.

Thank you in advance for any help you can provide.