if any range on sheet2 change put "a" in sheet1 cell a111
 

hey...

what code would i use where to get a "A" in cell a111 on sheet1 when a user
change any cell on sheet2?

if any range on sheet2 change put "a" in sheet1 cell a111
 

What is causing the data to change - manual changes? then you can use the
Change event in Sheet2. Right click on Sheet2 tab and select view code. In
the code module put in code like

Private Sub Worksheet_Change(ByVal Target As Range)
worksheets("Sheet1").Range("A111").Value = "A"
End Sub

If you just want to know if the workbook needs to be saved, looked at the

ThisWorkbook.Saved property.

--
Regasrds,
Tom Ogilvy





"pswanie" wrote:

hey...

what code would i use where to get a "A" in cell a111 on sheet1 when a user
change any cell on sheet2?

if any range on sheet2 change put "a" in sheet1 cell a111
 

yes it changes manualy. its a inventry and when the authorised user changes
a menu item it needs to put a "a" in sheet1 a111. then next time the user
open the workbook it will email and download it to all other users using the
inventry.

to i will use

Private Sub Worksheet_Change(ByVal Target As Range)
worksheets("Sheet1").Range("A111").Value = "A"
End Sub


thanx...

phillip

"Tom Ogilvy" wrote:

What is causing the data to change - manual changes? then you can use the
Change event in Sheet2. Right click on Sheet2 tab and select view code. In
the code module put in code like

Private Sub Worksheet_Change(ByVal Target As Range)
worksheets("Sheet1").Range("A111").Value = "A"
End Sub

If you just want to know if the workbook needs to be saved, looked at the

ThisWorkbook.Saved property.

--
Regasrds,
Tom Ogilvy





"pswanie" wrote:

hey...

what code would i use where to get a "A" in cell a111 on sheet1 when a user
change any cell on sheet2?