Hallo, kann man ein mit der Kamera erstelltes Objekt (zeigt live den Ausschnitt eines gewählten Tabellenblattinhaltes) per VBA ansprechen und verschieben?
Hi Siggi,
das eingefügte Objekt ist ein Shape, sodass du es als solches ansprechen kannst - entweder mit seinem Namen oder seinem Index. Außerdem hat jedes Objekt eine Position Oben und eine Position Links, sodass du es genau positionieren kannst - z.B. kannst du es an einer Zellposition ausrichten. Nach diesem Prinzip:
With ActiveSheet.Shapes("Grafik 1")
.Top = Range("B5").Top '
Mit diesem Code wird das Shape "Grafik 1" mit seiner linken oberen Ecke auf die Position der Zelle B5 (linke obere Ecke) verschoben.