Multiple cells that reference one value

Question

Hey guys -
Still new to formulas - any help would be appreciated.
I have a cell on table 1, with the cell value duplicated in other tables / sheets in my document. For example, Cell A1 in tables 2 & 3 is referencing back to table 1, using the formula =Sheet 1 :: Table 1 :: A1.
Is there a way to change the cell value in tables 2 or 3, and have it change the value in the others? (this would help me, since I have multiple sheets that I have referencing this value, and it would be easier to not have to keep changing sheets to change the value in the original cell, on sheet 1.)
Thanks
Jeremy

Answer 1

Using a script would be easier if the value is typed in a display dialog.
The main problem is that it would be needed to know the tables ID.
The OP wrote :
I have a cell on table 1, with the cell value duplicated in other tables / sheets in my document.
So, he must tell if every sheets of the document are containing a target table and if the target tables have the same name.
If the answer to these questions is YES, this skeleton may be used:
--{code}
set {dName, sName, tName, rowNum1, colNum1, rowNum2, colNum2} to my get_SelParams()
tell application "Numbers" to tell document dName
          tell sheet sName to tell table tName
                    set theValue to value of cell rowNum1 of column colNum1
          end tell
          set lesFeuilles to name of sheets
          repeat with s from 1 to count of lesFeuilles
                    set aSheet to item s of lesFeuilles
                    if aSheet is not sName then set value of cell rowNum1 of column colNum1 of table tName of sheet aSheet to theValue as text
          end repeat
end tell
--=====
set { dName, sName, tName,  rowNum1, colNum1, rowNum2, colNum2} to my get_SelParams()
tell application "Numbers" to tell document dName to tell sheet sName to tell table tName
on get_SelParams()
          local d_Name, s_Name, t_Name, row_Num1, col_Num1, row_Num2, col_Num2
          tell application "Numbers" to tell document 1
                    set d_Name to its name
                    set s_Name to ""
                    repeat with i from 1 to the count of sheets
                              tell sheet i to set maybe to the count of (tables whose selection range is not missing value)
                              if maybe is not 0 then
                                        set s_Name to name of sheet i
                                        exit repeat
                              end if -- maybe is not 0
                    end repeat
                    if s_Name is "" then
                              if my parle_anglais() then
                                        error "No sheet has a selected table embedding at least one selected cell !"
                              else
                                        error "Aucune feuille ne contient une table ayant au moins une cellule sélectionnée !"
                              end if
                    end if
                    tell sheet s_Name to tell (first table where selection range is not missing value)
                              tell selection range
                                        set {top_left, bottom_right} to {name of first cell, name of last cell}
                              end tell
                              set t_Name to its name
                              tell cell top_left to set {row_Num1, col_Num1} to {address of its row, address of its column}
                              if top_left is bottom_right then
                                        set {row_Num2, col_Num2} to {row_Num1, col_Num1}
                              else
                                        tell cell bottom_right to set {row_Num2, col_Num2} to {address of its row, address of its column}
                              end if
                    end tell -- sheet…
                    return {d_Name, s_Name, t_Name, row_Num1, col_Num1, row_Num2, col_Num2}
          end tell -- Numbers
end get_SelParams
--=====
on parle_anglais()
          return (do shell script "defaults read 'Apple Global Domain' AppleLocale") does not start with "fr_"
end parle_anglais
--=====
--{code}
CAUTION, we can't apply this scheme if values are dates.
I already explained why, I will not repeat.
This is why my preferred choice would be to type the value in the script.
--{code}
Grab the parameters defining the selected target cell *)
set {dName, sName, tName, rowNum1, colNum1, rowNum2, colNum2} to my get_SelParams()
Type the string *)
set theValue to text returned of (display dialog "Type the value to insert" default answer "what we are supposed to type")
Fill the cells with the same reference in every table with the same name in every sheets *)
tell application "Numbers" to tell document dName
          set lesFeuilles to name of sheets
          repeat with s from 1 to count of lesFeuilles
                    set value of cell rowNum1 of column colNum1 of table tName of sheet (item s of lesFeuilles) to theValue as text
          end repeat
end tell
--=====
set { dName, sName, tName,  rowNum1, colNum1, rowNum2, colNum2} to my get_SelParams()
tell application "Numbers" to tell document dName to tell sheet sName to tell table tName
on get_SelParams()
          local d_Name, s_Name, t_Name, row_Num1, col_Num1, row_Num2, col_Num2
          tell application "Numbers" to tell document 1
                    set d_Name to its name
                    set s_Name to ""
                    repeat with i from 1 to the count of sheets
                              tell sheet i to set maybe to the count of (tables whose selection range is not missing value)
                              if maybe is not 0 then
                                        set s_Name to name of sheet i
                                        exit repeat
                              end if -- maybe is not 0
                    end repeat
                    if s_Name is "" then
                              if my parle_anglais() then
                                        error "No sheet has a selected table embedding at least one selected cell !"
                              else
                                        error "Aucune feuille ne contient une table ayant au moins une cellule sélectionnée !"
                              end if
                    end if
                    tell sheet s_Name to tell (first table where selection range is not missing value)
                              tell selection range
                                        set {top_left, bottom_right} to {name of first cell, name of last cell}
                              end tell
                              set t_Name to its name
                              tell cell top_left to set {row_Num1, col_Num1} to {address of its row, address of its column}
                              if top_left is bottom_right then
                                        set {row_Num2, col_Num2} to {row_Num1, col_Num1}
                              else
                                        tell cell bottom_right to set {row_Num2, col_Num2} to {address of its row, address of its column}
                              end if
                    end tell -- sheet…
                    return {d_Name, s_Name, t_Name, row_Num1, col_Num1, row_Num2, col_Num2}
          end tell -- Numbers
end get_SelParams
--=====
on parle_anglais()
          return (do shell script "defaults read 'Apple Global Domain' AppleLocale") does not start with "fr_"
end parle_anglais
--=====
--{code}
Yvan KOENIG (VALLAURIS, France) jeudi 2 février 2012
iMac 21”5, i7, 2.8 GHz, 12 Gbytes, 1 Tbytes, mac OS X 10.6.8 and 10.7.2
My Box account  is : http://www.box.com/s/00qnssoyeq2xvc22ra4k