Shape mit Koordinaten einfügen

Forumthread: Shape mit Koordinaten einfügen
4 Beiträge zu diesem Forumthread
Anzeige

Forumthread: Shape mit Koordinaten einfügen

12.06.2002 12:40:17

Michael D

Hallo zusammen,

ich kopiere per Code ein Diagramm von einem Tabellenblatt in ein anderes.

Gibt es eine Möglichkeit beim Einfügen exakte Koordinaten anzugeben? Die Breite der Spalten auf dem betreffenden Blatt ist nämlich flexibel, das Diagramm soll aber immer an derselben Stelle eingefügt werden ...

Gruß, Michael

4
Beiträge zum Forumthread

Beiträge zu diesem Forumthread

Betreff

Datum

Anwender

Re: Shape mit Koordinaten einfügen

12.06.2002 17:09:27

Rainer
Re: Shape mit Koordinaten einfügen

12.06.2002 17:20:52

Michael D
Re: Shape mit Koordinaten einfügen

12.06.2002 17:44:38

Rainer
Re: Shape mit Koordinaten einfügen

12.06.2002 18:26:43

Michael D

Re: Shape mit Koordinaten einfügen

12.06.2002 17:09:27

Rainer

Lieber Michael!

Hilft das?

Lieben Gruß
Rainer

Re: Shape mit Koordinaten einfügen

12.06.2002 17:20:52

Michael D

Hallo Rainer,

das Dumme ist, daß ich den Namen des eingefügten Charts nicht weiß, da dieser von Excel relativ willkürlich festgelegt wird.

Obwohl das Diagramm nach dem Einfügen aktiv ist, funktioniert z.B.
...
ActiveSheet.Paste
Selection.Name = "Mein Diagramm"
...
nicht.

Wenn ich also beim Einfügen des Diagramms nicht direkt Koordinaten eingeben kann so muß ich wenigstens den Namen festlegen können ...

Hast Du da irgendwelche Ideen?

Gruß, Michael

Re: Shape mit Koordinaten einfügen

12.06.2002 17:44:38

Rainer

Lieber Michael!

Noch schnell mein 1. Code, dann muss ich weg:

Das geht sicher anders, aber dies ist einmal ein Ansatz.

Lieben Gruß
Rainer

Re: Shape mit Koordinaten einfügen

12.06.2002 18:26:43

Michael D

Hallo Rainer,

leider funktioniert das nicht ganz so, wie Du vorgeschlagen hast, denn es erscheint bei mir (bei der Umbenennung) "Zugriff verweigert!"

Aber ich bin mittlerweile (mit Deiner Hilfe) auf eine andere Idee gekommen. Ich möchte insgesamt zwei Spalten Diagramme einfügen und zähle jetzt über eine "For ... Each"-Schleife und einen Statusmerker einfach ab, ob das Diagramm links oder rechts platziert werden soll und sage dann einfach "Sh.Left = 200".

Danke für Deine Unterstützung.

Gruß, Michael