Lage eines Rechenblatts mit Einblendmenü wählen.

Mit einem Einblendmenü kann die Lage eines Rechenblatts gewählt werden, die mit Klick auf einen Knopf nach vorne geholt werden soll. (Lösungsvorschlag für die Forum-Frage http://experts.ragtime.de/experts/node/4255)

Der Inhalt des „Urrahmens“ eines neuen Dokuments wird als Rechenblatt bestimmt. In diesem Rechenblatt (im Beispiel „R 1“) werden die gewünschte Anzahl Lagen (im Beispiel 3, so dass es 4 Lagen umfasst) dazugefügt. In einem zweiten Rechenblatt (im Beispiel „R 2“, nicht im Layout angeordnet) wird in Spalte A die Liste mit den Namen der Lagen erstellt. Diese können auf den Inhalt der betreffenden Lage hinweisen, z.B. Bestellungen, Rechnungen, Quittungen – im Beispiel stattdessen der Beginn des griechischen Alphabets.

Im Beispiel steht in Zelle A1 jeder Lage die Formel

   Index(R 2![$1]$A:[$1]$A;Lage).

Damit wird der Name der betreffenden Lage angezeigt. Dies dient nur dazu, im Beispiel anzuzeigen, welche der vier Lagen gerade im Vordergund steht und ist für die Funktion belanglos.

Nun wird ein Knopf (im Beispiel „K Lage“) vom Typ „Einblendmenü“ im Layout angeordnet, dem als Titel mit der Formel

   R 2!$A:$A

die Namen der Lagen zugeordnet werden. Der Index wird als Resultat bestimmt. Mit diesem Einblendmenü kann die Lage gewählt werden, die in den Vordergrund geholt werden soll. Ein zweiter Knopf (im Beispiel „K Zeige“) ruft das AppleScript „Wahl Lage" auf, welches die Aufgebe erledigt.

Da ich nicht weiss, wie der Wert des Einblendmenü-Knopfs in einem Script abgefragt werden kann, habe ich diesen mit der Forme

   K Lage!X

in die Zelle B1 des Rechenblatts „R 2“ geholt.

Das Script „Wahl Lage“ ordnet der Variablen „n“ den Index der gewünschten Lage aus dem Rechenblatt „R 2“ zu und wählt die Zelle A1 des Rechenblatts „R 1“ aus. Es ist völlig belanglos, in welcher Lage diese Zelle ausgewählt wird. Dann wird die Lage „n“ als aktive Lage nach vorne geholt. Hier das Script:

tell application "RagTime 7"
	set n to value of cell „B1" of table "R 2" of document 1
	select cell "A1" of table "R 1" of document 1
	try
		set active plane of selection to n
	end try
end tell

Diese Anleitung ist auch im Dokument als JPG enthalten und kann aus dem Inventar aufgerufen werden.
Ich hatte Chris Postma eine Vorabversion des Dokuments geschickt. Er hat mir erlaubt, dieses Dokument als Beispiel beizulen.