Seitenzahlen von Abb. aus dem Rechenblatt

Hallo Jorge

Habe ich dich richtig verstanden?

Problem 1: In Spalte A hast du in jeder ungeraden Zeile ein Bild und
möchtest in der darunter liegenden Zelle (also in der geraden Zeile)
den Text "Abb. n: Bildtitel" stehen haben, wobei der Text bis und mit
Doppelpunkt fett gesetzt werden soll. Den Bildtitel entnimmst du der
Spalte B auf der gleichen Zeile.

Problem 2: In Spalte C soll auf der gleichen (geraden) Zeile die
Seitennummer stehen, auf der das Bild im Layout zu liegen kommt.

Ich schlage dir eine kleine Änderung deines Konzepts vor! Du wirst
dann sehen weshalb.

1. Statt in jede zweite Zeile des Rechenblatts ein Bild zu setzen,
benutzest du dafür nur jede dritte Zeile, also die Zeilen 1, 4, 7, 10
etc.

2. In den direkt darunter liegenden Zeilen setzest du jeweils die
Formel "Seite" (natürlich ohne die Anführungszeichen). Keine Angst,
diese Seitennummer wird man am Schluss nicht sehen. Weil es aber die
Zelle zwischen Bild und Bildtitel ist, wird damit sichergestellt,
dass es immer die Seite ist, auf der sich das Bild im Layout wirklich
befindet. Wenn du diese Formel dort eingesetzt hast, dann wählst du
im Zeilenkopf des Rechenblatts die ganze Zeile aus und befiehlst (im
Rechenblattmenü) "Zeilen/Spalten ausblenden".

Noch zwei Vorbereitungsschritte:
3. In der Zelle C1 schreibst du "Abb. ", in Zelle C2 ": "

4. Markiere im Spaltenkopf des Rechenblatts die ganze Spalte C und
befiehl "Format > Stil > Fett"

5. In der Zeile mit dem Bildtitel (also jetzt Zeile 3, 6, 9 etc.)
gibst du folgende Formeln ein:

- In Spalte C: Zeile

- In Spalte A (am Beispiel von Zeile 3): #$C$1&#C3&#$C$2&#B3
Diese Formel fügt die Elemente dank des #-Zeichens mir
Formatübernahme zusammen. Alles was aus Spalte C kommt ist also fett.
Der Bildtitel aus Spalte B wird in der Schrift übernommen wie er dort
steht, also nicht fett.

Und jetzt noch als Sahnehäubchen das Bildverzeichnis!
In irgend einem Textrahmen kannst du folgende Formel einsetzen
(natürlich ohne Zeilenumbrüche):

VSuchlauf(Bilder!$C:$C;Und(LfdIndex>2;LfdZelle>0);'';
LfdResultat&Index(Bilder!$A:$A;LfdIndex)&Zeichen(9)&Index(Bilder!$A:
$A;LfdIndex-1)&Zeichen(13))

Die Formel sucht Spalte C des Rechenblatts "Bilder" ab, beginnend bei
Zeile 3 (weil die erste Bedingung "LfdIndex>2" lautet). Auf allen
Zeilen, in denen dort eine Zahl > 1 gefunden wird, wird der bereits
bestehenden Text (LfdResultat, am Anfang mit '' auf einen "Nulltext"
gesetzt) der Text für ein weiteres Bild hinzugefügt, bestehend aus
dem vollständigen Bildtitel mit Abbildungsnummer aus Spalte A, einem
Tabulator (Zeichen(9)), der Seitennumer aus Spalte A in der
vorangehenden Zeile, und einem Absatzende (Zeichen(13)).

Alternativ könnte die zweite Zeile obiger Formel auch lauten:

LfdResultat&LfdZelle&Zeichen(9)&Index(Bilder!$B:$B;LfdIndex)&Zeichen
(9)&Index(Bilder!$A:$A;LfdIndex-1)&Zeichen(13))

Dann wäre der Text pro Bild: Bildnummer - TAB - reiner Bildtitel -
TAB - Seitennummer - CR

Viel Spass!

Gruss
Thomas

_________________________________________________
Die macnews.de Mailingliste Ragtime:
http://lists.macnews.de/cgi-bin//listinfo/ragtime

Neu: Das Mailinglistenarchiv unter
http://forum.macnews.de/lists