[VBScript and Excel] Relative/Absolute references

Again at Automate Excel In Vbscript... ( Vbscript ), Pentium10 wrote

I have a script which fills cells with exce.range.value function, but I have columns more than A-Z, how can I handle AA,AB, AC... columns???

Here is the script what I have:
excel.Range(chr(65+i) + str(excelrow), chr(65+i) + _
 str(excelrow)).value = lstOrder.cell(i,1)

And I wrote:

Re: I have a script which fills cells with ...

Function RelativeToAbsolute( aRow, aCol ) Dim alpha alpha = Split( "A,B,C,D,E,F,G,H,I,J,K,L,M,N,O,P,Q,R,S,T,U,V,W,X,Y,Z", "," ) RelativeToAbsolute = alpha( aCol - 1 ) & aRow End Function That does me, but for you I'd suggest adding a few more items to the Split(). After Z put in ",AA,AB,AC," etc until you have what you need. Then code your references in terms of numeric column and a row and let the function generate a meaningful address.

For example: strRange = RelativeToAbsolute( 1, 1 ) & ":" & RelativeToAbsolute( 1 + iCount - 1, 1 ) oSheet.Range( strRange ).NumberFormat = "d/m/yyyy h:mm:ss" (iCount in this case is the number of rows in an array I was committing to the spreadsheet.)