Another one:

Range("C:BY").Delete

--
Regards,
Tom Ogilvy


"Charlie" wrote in message
...
Thanks

"Chip Pearson" wrote in message
...
You can use a VBA function like

Function ColLetterToNumber(Letter As String) As Integer
ColLetterToNumber = Worksheets(1).Range(Letter & "1").Column
End Function


--
Cordially,
Chip Pearson
Microsoft MVP - Excel
Pearson Software Consulting, LLC
www.cpearson.com


"Charlie" wrote in message
...
How can I convert a column from alpha to numeric?

i.e. convert BZ to 78

Is there a simple conversion or do I have to write my own?

I have data in cols A and B and BZ-CF.
How would I say :
Columns("B+1:BZ-1").Select
Selection.Delete Shift:=xlToLeft