Hallo Bernd,

danke für deine Antwort. Das habe ich schon versucht.
Vielleicht habe ich ja den falschen Namen genommen. Ich habe die Grafik dia1 
benannt
objDiagramm = oDoc.Sheets(0).Charts.getByName("dia1")
Dannkam der Fehler es ist eine exception aufgetreten
..nosuchelementexception

auch mit dem Namen object1 oder diagramm1 geht es nicht.


Ich habe mit
a =  oDoc.Sheets(0).Charts
a untersucht aber da finde ich nichts, was auf ein Diagramm hindeutet


Wenn ich den falschen Namen habe, wie bekomme ich den Namen des diagramms raus?

Was mache ich sonst noch falsch?

Horst



Am 1 May 2008 um 1:01 hat Bernd Altland geschrieben:

> Horst Schulze schrieb:
> > Hallo,
> >
> > wie kann man mit einem Macro auf ein Diagramm in einer Calc Tabelle 
> > zugreifen, bzw.
> > welches Object muss man da ansprechen.
> >
> > Ich hab schon alles probiert, was mir eingefallen ist, aber nichts 
> > funktioniert.
> >
> > Ziel ist es, den Datenbereich u.a. des Diagramms zu ändern.
> >
> > Für einen Hinweis wäre ich sehr dankbar, auch für die Bestätigung, dass das 
> > nciht
> > funktioniert.
> >
> > Horst Schulze
> >
> > ---------------------------------------------------------------------
> > To unsubscribe, e-mail: [EMAIL PROTECTED]
> > For additional commands, e-mail: [EMAIL PROTECTED]
> >
> >
> >
> Hallo Horst,
> auf ein bestehendes Diagramm in einem Calc-Dokument wird z.B. mit
>
> oDoc = ThisComponent
> objDiagramm = oDoc.Sheets(0).Charts.getByName("Dein_Diagramm_Name")
>
> zugegriffen.
> Weitere Eigenschaften des  Diagramms erreichtst Du mit "....
> .embeddedObject"
> das an die letzte Codezeile angehängt wird. Um das Objekt auf seine
> Eigenschaften und Methoden zu "untersuchen" verwende das Macro-Tool
> "Xray" (Downloaden). Damit suchst Du Dir die passenden Eigenschaften und
> Methoden aus, um Dein Diagramm per Macro zu verändern. Solltest Du nicht
> zurecht kommen kann ich Dir bei Bedarf ein  Beispielcode zusenden.
> Gruß Bernd
>
>
> ---------------------------------------------------------------------
> To unsubscribe, e-mail: [EMAIL PROTECTED]
> For additional commands, e-mail: [EMAIL PROTECTED]
>



---------------------------------------------------------------------
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]

Antwort per Email an