View Single Post
  #5   Report Post  
Posted to microsoft.public.excel.programming
Lakeuk Lakeuk is offline
external usenet poster
 
Posts: 5
Default determining last column

Heres a couple of ways of doing it:-

Range("C3").Select
ActiveWorkbook.Names.Add Name:="start", RefersToR1C1:=ActiveCell
Selection.End(xlToRight).Select
Selection.End(xlDown).Select
ActiveWorkbook.Names.Add Name:="finish", RefersToR1C1:=ActiveCell
Application.Goto Reference:="start:finish"


StartR = ActiveCell.Row
StartC = ActiveCell.Column
Selection.End(xlToRight).Select
Selection.End(xlDown).Select
FinishR = ActiveCell.Row
FinishC = ActiveCell.Column
Range(Cells(StartR, StartC), Cells(FinishR, FinishC)).Select


Dave





"jacqui" wrote in message ...
I am trying to setup a print range based on variables My
formula is

Range("A" & iRStrt, " " & iRFin)

I've coded the iRStrt and iRFin bit which works out the
start and end rows, however you will notice the " ", this
is because I'm stuck with this bit. I don't want to hard
code it, ie I know the actual end column is "Y" but this
might change.
Elsewhere in my code I use the following formula to
determine my last column

iCCount = ActiveSheet.Range("IV7").End(xlToLeft).Column

however this returns an integer value, how would I get the
equivalent but expressed as the column letter?

Does this make sense?
Am I going about this the right way?
Can anyone help?

Many thanks
Jacqui