Hi Chip,

I should have said : I don't recommend" :-)

--
Kind regards,

Niek Otten
Microsoft MVP - Excel



"Chip Pearson" wrote in message ...
| "Niek Otten" wrote in message
|
| To make it work both ways is difficult and not recommended
|
| I would respectfully disagree with that statement. It isn't particularly
| difficult, and I wouldn't recommend against it, as long as you code
| carefully. The following code in ThisWorkbook will update A1:A10 on Sheet1
| and Sheet2 in either direction.
|
| Private Sub Workbook_SheetChange(ByVal Sh As Object, ByVal Target As Range)
|
| Const SHEET_ONE_NAME = "Sheet1" '<<< CHANGE
| Const SHEET_TWO_NAME = "Sheet2" '<<< CHANGE
| Const SHEET_RANGE_ADDRESS = "A1:A10" '<<< CHANGE
|
| If Target.Cells.Count 1 Then
| Exit Sub
| End If
| Application.EnableEvents = False
| If Not Application.Intersect(Sh.Range(SHEET_RANGE_ADDRESS ), Target) _
| Is Nothing Then
| With ThisWorkbook.Worksheets
| If StrComp(Sh.Name, SHEET_ONE_NAME, vbTextCompare) = 0 Then
| .Item(SHEET_TWO_NAME).Range(Target.Address) = Target.FormulaArray
| ElseIf StrComp(Sh.Name, SHEET_TWO_NAME, vbTextCompare) = 0 Then
| .Item(SHEET_ONE_NAME).Range(Target.Address) = Target.FormulaArray
| End If
| End With
| End If
| Application.EnableEvents = True
|
| End Sub
|
|
| --
| Cordially,
| Chip Pearson
| Microsoft MVP - Excel
| Pearson Software Consulting, LLC
| www.cpearson.com
| (email address is on the web site)
|
|
| "Niek Otten" wrote in message
| ...
| Hi Jon,
|
| In Sheet3, cell B4:
|
| =Sheet1!A3
|
| To make it work both ways is difficult and not recommended
|
| --
| Kind regards,
|
| Niek Otten
| Microsoft MVP - Excel
|
| "JonWardellBuilders" wrote
| in message
| ...
| | What do i use to make a cell ('sheet1'!A3) link with ('sheet3'!B4)?
| |
| | Basically i want what ever gets entered into sheet 1 cell A3 to be
| | autimatically entered in Sheet 3 cell B4. Even better would be if i
| change
| | something in either cell it will change the other with the same
| information.
| | --
| | Jon Robershaw
| | Wardell Builders, Inc
|
|
|
|