Copy paste this function into a REGULAR module of your workbook. Then in any
sheet use
=prevsheet(a1)

Function PrevSheet(rg As Range)
n = Application.Caller.Parent.Index
If n = 1 Then
PrevSheet = 0
Exit Function
End If
PrevSheet = Sheets(Application.Caller _
.Parent.Index - 1).Range(rg.Address).Value
End Function

--
Don Guillett
Microsoft MVP Excel
SalesAid Software

"Atty" wrote in message
...
I am working on a 20 page worksheet and I need data copied from worksheet 1
to 2 -3 etc. I know the formula to copy from sheet 1 to sheet 2
((=week1!m35) .
What I wish to know is when I copy work sheets the formula on worksheet 5
is
still copied from worksheet 1 .Can anyone tell me a formula that will copy
and upgrade the formula,so that W/S 2 copies W/S 1,W/S 3 copies W/S2 etc.
Thanks in advance





---
avast! Antivirus: Outbound message clean.
Virus Database (VPS): 000774-7, 15/09/2007
Tested on: 6/01/2008 9:52:06 AM
avast! - copyright (c) 1988-2008 ALWIL Software.
http://www.avast.com