Feldbefehle im Calc

[rolf monse]

Hallo Leute,

im Writer gibt es die Funktion "Feldbefehl - Autor". Ich suche eine
solche Möglichkeit im Calc, habe aber nichts gefunden. Wie kann man dies
im Calc realisieren?
Ich will auf der Liste immer den Autor der Aufstellung mit ausdrucken,
da diese Liste nicht größer als eine Seite wird und immer sich
inhaltlich ändert, aber nicht in der Form.


Linux, OpenOffice 1.1.4


Mit freundlichen Grüßen


Rolf

[Jörg Schmidt]

Hallo,

Post by rolf monse
im Writer gibt es die Funktion "Feldbefehl - Autor". Ich suche eine
solche Möglichkeit im Calc, habe aber nichts gefunden. Wie
kann man dies
im Calc realisieren?

Zum Beispiel mit einer benutzerdefinierten Funktion:

Function BEDA (wert as String)
'Benutzerdaten in Calc verfügbar machen
'Autor: Jörg Schmidt
'Stand: 07.01.2005
Dim nutzer as Object
Dim reg_daten as Object
Dim profil(0) as new com.sun.star.beans.PropertyValue
nutzer =
createUnoService("com.sun.star.configuration.ConfigurationProvider")
profil(0).Name = "nodepath"
profil(0).Value = "org.openoffice.UserProfile/Data"
reg_daten =
nutzer.createInstanceWithArguments("com.sun.star.configuration.Configura
tionAccess", profil())
Select Case wert
Case "Firma"
BEDA = reg_daten.o
Case "Vorname"
BEDA = reg_daten.givenname
Case "Nachname"
BEDA = reg_daten.sn
Case "Kürzel"
BEDA = reg_daten.initials
Case "Titel"
BEDA = reg_daten.title
Case "Position"
BEDA = reg_daten.position
Case "Telefon-geschäftlich"
BEDA = reg_daten.telephonenumber
Case "Fax"
BEDA = reg_daten.facsimiletelephonenumber
Case "Telefon-privat"
BEDA = reg_daten.homephone
Case "Email"
BEDA = reg_daten.mail
Case "Strasse"
BEDA = reg_daten.street
Case "PLZ"
BEDA = reg_daten.postalcode
Case "Land"
BEDA = reg_daten.c
Case = "Ort"
BEDA = reg_daten.l
Case Else
BEDA = "Fehler aufgetreten"
End Select
End Function

In der Zelle, dann einfach diese Formel verwenden:

=BEDA("Vorname")&" "&BEDA("Nachname")


Gruß
Jörg

[Olaf Eichhorn]

Hallo Rolf,

ich helfe mir mit OLE-Objekten, die ich über:
"Einfügen -> Objekt -> OLE-Objekt -> OpenOffice.org 1.1.4 Text (neu
erstellen)" in die Tabelle einfüge. Dannklickst Du in das Textdokument
und fügst den gewünschten Feldbefehl (Autor) ein.
Du hast dann alle Feldbefehle der Textverarbeitung in Calc zur Verfügung.
Speichere das mit Deinen individuellen Änderungen als Vorlage *.stc ab
und beim Erstellen eines neuen Dokuments werden die Feldbefehle
aktualisiert.

fertig :-)

Viel Erfolg

Olaf

[Claudia Drechsle]

Post by Olaf Eichhorn
"Einfügen -> Objekt -> OLE-Objekt -> OpenOffice.org 1.1.4 Text
(neu erstellen)"

SNIP

Post by Olaf Eichhorn
Du hast dann alle Feldbefehle der Textverarbeitung in
Calc zur Verfügung.

Nicht alle, aber die für die Benutzerdaten auf jeden Fall.
Toller Tipp, muss ich mir merken!

Danke und viele Grüsse
Claudia

[rolf monse]

Post by Olaf Eichhorn
Hallo Rolf,
"Einfügen -> Objekt -> OLE-Objekt -> OpenOffice.org 1.1.4 Text (neu
erstellen)" in die Tabelle einfüge. Dannklickst Du in das Textdokument
und fügst den gewünschten Feldbefehl (Autor) ein.
Du hast dann alle Feldbefehle der Textverarbeitung in Calc zur Verfügung.
Speichere das mit Deinen individuellen Änderungen als Vorlage *.stc ab
und beim Erstellen eines neuen Dokuments werden die Feldbefehle
aktualisiert.

Hallo,

ich habe genau das ausprobiert, das Feld Author wird eingefügt, aber es
wird nichts angezeigt. Das Feld Datum wird beim abspeichern und auch
beim einfügen sofort angezeigt.
Benutzerdaten " Vorname " und "Nachname" sind eingetragen. Im Writer
werden diese Angaben beim speichern der Vorlage sofort eingefügt.
Ich habe es mit OO 1.1.2 und 1.1.4 ausprobiert, immer der selbe Effekt.
Auch bei der Function vom Jörg bekomme ich immer die Case-Anweisung
"Fehler aufgetreten" angezeigt.

mit freundlichen Grüßen

rolf

[Jörg Schmidt]

Hallo,

Post by rolf monse
Auch bei der Function vom Jörg bekomme ich immer die Case-Anweisung
"Fehler aufgetreten" angezeigt.

Na das ist aber merkwürdig. Klar kann die Funktion fehlerhaft sein, was
sie aber eigentlich nicht ist, aber wie auch immer:
Das Du die Meldung bekommst "Fehler aufgetreten" zeigt doch das die
Funktion arbeitet. Also kann doch meiner Meinug nach der Fehler nur in
der Foremel liegen die Du verwendest. Hast Du das denn so
hingeschrieben:

=BEDA("Vorname")&" "&BEDA("Nachname")

exakt so? Nicht Vorname oder Nachname ersetzen, keine Anführungsstriche
weglassen etc. ebend *ganz genau so* wie es dasteht? Denn da die
Funktion ja case else liefert ist doch zunächst mal sicher das der
Parameter den Du übergibst falsch ist.


Gruß
Jörg

[rolf monse]

Post by Jörg Schmidt
Na das ist aber merkwürdig. Klar kann die Funktion fehlerhaft sein, was
Das Du die Meldung bekommst "Fehler aufgetreten" zeigt doch das die
Funktion arbeitet. Also kann doch meiner Meinug nach der Fehler nur in
der Foremel liegen die Du verwendest. Hast Du das denn so
=BEDA("Vorname")&" "&BEDA("Nachname")
exakt so? Nicht Vorname oder Nachname ersetzen, keine Anführungsstriche
weglassen etc. ebend *ganz genau so* wie es dasteht? Denn da die
Funktion ja case else liefert ist doch zunächst mal sicher das der
Parameter den Du übergibst falsch ist

Hallo Jörg,

recht vielen Dank für Deinen Hinweis, ich hatte ein Leerzeichen an der
falschen Stelle gesetzt und nicht gemerkt, jetzt funtioniert es.

Mit freundlichen Grüßen

rolf