How do I code this so as to use an Integer containing 7 for the column?
dataRange.Sort Key1:=Range("G5")

(Set dataRange = ActiveWorkbook.Sheets("source"). _
( Range(Cells(iStartDataRow, 1), _
( Cells(iMaxRowNumb, iMaxColNumb))

Thanks,
Peter.

icol = 7
dataRange.Sort Key1:=worksheets("Source").Cells(5,icol)

--
Regards,
Tom Ogilvy


"Peter Chatterton" wrote in message
. ..
How do I code this so as to use an Integer containing 7 for the column?
dataRange.Sort Key1:=Range("G5")

(Set dataRange = ActiveWorkbook.Sheets("source"). _
( Range(Cells(iStartDataRow, 1), _
( Cells(iMaxRowNumb, iMaxColNumb))

Thanks,
Peter.

Hi Tom,

Dim iCol As Integer
iCol = 7
dataRange.Sort Key1:=ActiveWorkbook.Sheets("source").Cells(5,
iCol)

When I try it I get "Appl-def'd or Obj-def'd error".

BTW what is the 5 for?

Thanks,
Peter.

"Tom Ogilvy" wrote in message
...
icol = 7
dataRange.Sort Key1:=worksheets("Source").Cells(5,icol)

--
Regards,
Tom Ogilvy


"Peter Chatterton" wrote in message
. ..
How do I code this so as to use an Integer containing 7 for the column?
dataRange.Sort Key1:=Range("G5")

(Set dataRange = ActiveWorkbook.Sheets("source"). _
( Range(Cells(iStartDataRow, 1), _
( Cells(iMaxRowNumb, iMaxColNumb))

Thanks,
Peter.

UPDATE TO MY REPLY
(couldn't reply to myself)

I took the As Integer off my defn of iCol and it worked!

But haven't figured it out yet.

Thanks,
Peter.


"Tom Ogilvy" wrote in message
...
icol = 7
dataRange.Sort Key1:=worksheets("Source").Cells(5,icol)

--
Regards,
Tom Ogilvy


"Peter Chatterton" wrote in message
. ..
How do I code this so as to use an Integer containing 7 for the column?
dataRange.Sort Key1:=Range("G5")

(Set dataRange = ActiveWorkbook.Sheets("source"). _
( Range(Cells(iStartDataRow, 1), _
( Cells(iMaxRowNumb, iMaxColNumb))

Thanks,
Peter.