Share info between two files ?

Question

hello, is it possible to collect automatically information of 1 cell of 1 file into a cell of another file ?
tx for your help
s

Answer 1

Hello
I enhanced the script.
(1) corrected some errors
(2) add the ability to use a special kind of references into the source document.
Footer colNum may be used to grab the bottom cell in the column colNum.
The beast is available on my iDisk with sample files.
<http://idisk.me.com/koenigyvan-Public?view=web>
Download:
For_iWork:iWork '09:for_Numbers09:fromDoc#1toDoc#2.dmg.zip
--[SCRIPT fromDoc#1toDoc#2]
Enregistrer le script en tant que Script, Application ou Progiciel : fromDoc#1toDoc#2.xxx
déplacer l’application créée dans le dossier
<VolumeDeDémarrage>:Users:<votreCompte>:Library:Scripts:Applications:Numbers:
Il vous faudra peut-être créer le dossier Numbers et peut-être même le dossier Applications.
menu Scripts > Numbers > fromDoc#1toDoc#2
Naviguer pour choisir un document texte contenant les paramètres décrivant le traitement à effectuer.
En fonction de ces paramètres, le script ouvrira deux documents Numbers et copieradans le second des valeurs prélevées dans le premier.
Voici un exemple de fichier texte des paramètres:
Macintosh HD:Users:yvan_koenig:Desktop:
Source.numbers
Feuille 1
Tableau 1
Macintosh HD:Users:yvan_koenig:Desktop:
Destination.numbers
Feuille 18
Tableau 12
4
D4
E4
D8
E8
D4
E4
D8
E8
ligne1 contient le chemin d'accès au dossier contenant le document source
ligne2 contient le nom du document source
ligne3 contient le nom de la feuille source
ligne4 contient le nom de la table source
ligne5 contient le chemin d'accès au dossier contenant le document destination
ligne6 contient le nom du document destination
ligne7 contient le nom de la feuille destination
ligne8 contient le nom de la table destination
ligne9 contient le nombre de valeurs à extraire/insérer
viennent ensuite les références des cellules sources
suivies des références des cellules destination
Pied de page numéroDeColonne peut être utilisé pour référencer la cellule la plus basse de la colonne numéroDeColonne.
--=====
L'aide du Finder explique:
L'Utilitaire AppleScript permet d'activer le Menu des scripts :
Ouvrez l'Utilitaire AppleScript situé dans le dossier Applications/AppleScript.
Cochez la case "Afficher le menu des scripts dans la barre de menus".
=+=+=+=+=+=+=+=
Save the script as a Script, an Application or an Application Bundle: fromDoc#1toDoc#2.xxx
Move the newly created application into the folder:
<startup Volume>:Users:<yourAccount>:Library:Scripts:Applications:Numbers:
Maybe you would have to create the folder Numbers and even the folder Applications by yourself.
menu Scripts > Numbers > fromDoc#1toDoc#2
Navigate to choose a text document containing the parameters describing the operations to execute.
Give these parameters, the script will open two Numbers documents and copy in the second one a set of values grabbed from the first one.
Here is a sample of the parameters text file:
Macintosh HD:Users:yvan_koenig:Desktop:
Source.numbers
Feuille 1
Tableau 1
Macintosh HD:Users:yvan_koenig:Desktop:
Destination.numbers
Feuille 18
Tableau 12
4
D4
E4
D8
E8
D4
E4
D8
E8
line1 is the path to the folder containing the source document
line2 is the name of the source document
line3 is the name of the source sheet
line4 is the name of the source table
line5 is the path to the folder containing the destination document
line6 is the name of the destination document
line7 is the name of the destination sheet
line8 is the name of the destination table
line9 is the number of values to grab/insert
then are the references of the source cells
then are the references to the destination cells
Footer colNum may be used as a reference to the bottom cell of the column colnum.
You may use the word 'Footer' or it's localized version ('Pied de page' for instance)
--=====
The Finder's Help explains:
To make the Script menu appear:
Open the AppleScript utility located in Applications/AppleScript.
Select the "Show Script Menu in menu bar" checkbox.
+++++++
Yvan KOENIG (Vallauris FRANCE)
23 avril 2009
24 avril 2009
on run
if my parleAnglais() then
set leFichier to choose file with prompt "Select the parameters text file…" of type {"public.plain-text"}
else
set leFichier to choose file with prompt "Choisir un fichier texte contenant les paramètres …" of type {"public.plain-text"}
end if
Ugly workaround to grab the localized string "Footer"
In Numbers it's available in a .nib file in which we can't enter.
set p2lproj to (path to applications folder as text) & "iWork '09:Pages.app:Contents:Resources:Templates:Woodland Resume.template:Contents:Resources:"
tell application "Pages" to set FOOTER_loc to localized string "STYLE_Footer" from table "Localizable" in bundle file p2lproj
try
set enTexte to paragraphs of (read leFichier from 1)
set p2source to item 1 of enTexte
set document1 to item 2 of enTexte
set sheetSource to item 3 of enTexte
set tableSource to item 4 of enTexte
set pDocument1 to p2source & document1
set p2dest to item 5 of enTexte
set document2 to item 6 of enTexte
set sheetDest to item 7 of enTexte
set tableDest to item 8 of enTexte
set pDocument2 to p2dest & document2
set nbRefs to item 9 of enTexte
set listeSource to items 10 thru (10 - 1 + nbRefs) of enTexte
set listeDestination to items (10 + nbRefs) thru (10 - 1 + nbRefs + nbRefs) of enTexte
on error
if my parleAnglais() then
error "The text file doesn‘t match the script‘s requirements !"
else
error "Le fichier texte ne respecte pas" & return & "les exigences du script !"
end if
end try
tell application "Numbers"
open pDocument1
open pDocument2
grab every wanted values from the source document
tell document document1 to tell sheet sheetSource to tell table tableSource
set listeValues to {}
repeat with aRef in listeSource
if (aRef starts with FOOTER_loc) or (aRef starts with "footer") then
copy value of cell (count of rows) of column ((last word of aRef) as integer) to end of listeValues
else
copy value of cell aRef to end of listeValues
end if
end repeat
end tell -- document1
Insert the grabbed values in the destination document
tell document document2 to tell sheet sheetDest to tell table tableDest
repeat with i from 1 to count of listeDestination
set value of cell (item i of listeDestination) to item i of listeValues
end repeat
end tell -- document2
save document document1
save document document2
You may disable these two 'closing' lines if you wish to keep the documents open.
It may be useful if you make changes in the source document and share them with the destination one.
--close document document1 without saving
--close document document2 without saving
end tell -- Numbers
end run
--=====
on parleAnglais()
local z
try
tell application "Numbers" to set z to localized string "Cancel"
on error
set z to "Cancel"
end try
return (z is not "Annuler")
end parleAnglais
--=====
--[/SCRIPT]
Yvan KOENIG (from FRANCE vendredi 24 avril 2009 11:08:30)