Live-Forum - Die aktuellen Beiträge
Datum
Titel
27.04.2024 12:08:58
Mittelwertwenn - ich kapiere es nicht :-(
26.04.2024 21:51:33
Idee für Grafik
26.04.2024 21:29:07
PQ zufällige Reihenfolge
26.04.2024 17:18:47
Große Datenmenge in komplexes Diagramm verpacken
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
1944to1948
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
1944to1948
1944to1948
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Bild von einen shape zum anderen kopieren

Bild von einen shape zum anderen kopieren
15.09.2023 15:03:54
Rahan
Hey liebe Community,

könnt ihr mir helfen? Ich habe hier ein eingebettes Foto. Das schein in ein shape object zu stecken. Ich würde gerne das Bild nehmen und in eine Form wie die Träne den Hintergrund packen. Manuell geht das einfach mit Füllung Bild aus Zwischenablage. Aber mit VBA bin ich langsam ratlos. Hab sogar schon chatgtp gefragt, aber das kann auch nur nichtfunktionieren code ausspucken.

Also ich möchte das bild von shape1 auf shape2 per vba kopieren.

so wie shape2.Fill.UserPicture:= shape1.Fill.UserPicture

Das funktioniert leider nicht. Wisst ihr es wie es geht?

Ps. Macro aufzeichnen funktioniert nicht. Das Bild aus dem Clipboard ersetzen nimmt er nicht auf.
https://www.herber.de/bbs/user/162885.xlsx

4
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
Bild von einen shape zum anderen kopieren
15.09.2023 18:56:38
JoWE
Hallo,

ein Versuch: 
Sub movePic()

    Dim leftPos As Long

    Dim topPos As Long

    With ActiveSheet

      leftPos = .Shapes("Teardrop 2").Left + 50

      topPos = .Shapes("Teardrop 2").Top + 35

      .Shapes(2).Select

      Selection.ShapeRange.ZOrder msoBringToFront

      .Shapes(1).Select

      Selection.ShapeRange.ZOrder msoSendToBack

      .Shapes(2).Left = leftPos

      .Shapes(2).Top = topPos

      .Shapes.Range(Array(1, 2)).Select

      Selection.ShapeRange.Group.Select

      .Range("A1").Select

    End With

End Sub

Anzeige
AW: Bild von einen shape zum anderen kopieren
26.09.2023 10:55:25
Rahan
Vielen Dank für eure Vorschläge. Aber einfach nur ein anderes Shape überlappen, ist keine Lösung. Ich habe ca 100 Bilder im Excel und möchte das immer ersetzen und nicht 100 shapes übereinanderlegen. Die Idee mit Das Bild abspeichern und wieder neu laden funktioniert zwar, aber das kann ja nicht sein. Ich habe die Bilder ja schon in Excel. Will nicht extra ein Dateizugriff zusätzlich. Also ich kann diese mit Clipboard kopieren, habe nur nicht herausgefunden, wie man die Zwischenablage in ein Shape Object paste. Alles was mir chatgpt vorschlägt funktioniert nicht. :-D
AW: Bild von einen shape zum anderen kopieren
26.09.2023 11:08:10
onur
Dann noch viel Glück - du selber findest bestimmt eine bessere Lösung als die vorgeschlagenen.
Anzeige

301 Forumthreads zu ähnlichen Themen

Seitenrand bei Kopf und Fusszeile
TomTom

Hi,
ich habe eine ExcelSeite in Queerformat mit vielen Informationen drauf. Die Seite ist so eingestellt, dass der rechte und der linke Seitenrand auf 0,7 eingestellt sind. Nun wollte ich noch eine Kopf und eine Fusszeile einfügen.
Die Kopfzeile ist eine Überschrift (Text) und ich habe...
29.08.2008 10:16:00
Thread-ID: 1005710
2 Beiträge
Anzeige
Grafik in Kopfzeile
Gordon

Moin moin,
wie ich inzwischen erfahren habe, kann man bei Excel 2000 keine Grafiken in der Kopfzeile einfügen. Dieses soll erst ab Excel 2003 gehen.
Daher mal zwei Fragen:
1.
Wenn ich nun per Excel 2003 eine Datei erstelle, wo halt die Kopfzeile eine Grafik enthält, und diese d...
24.02.2009 10:18:10
Thread-ID: 1053380
9 Beiträge
Problem: Grafik in die Kopfzeile einbinden
Gordon

Moin moin,
ich arbeite derzeit mit Excel 2000 und schreibe an einer Datei, aus der später eine neue Datei generiert wird. Die neue Datei soll in der linken Zeil der Kopfzeile ein Logo (logo.jpg) enthalten.
Ich weiß, dass wenn man das Makro zur Generierung unter Excel 2000 ausführt, das...
04.03.2009 21:03:12
Thread-ID: 1056580
3 Beiträge
Anzeige
Grafik in Kopfzeile gelöscht; wie wieder einfügen?
abdipost

Hallo zusammen,
habe aus einem Tabellenblatt in einer Excel-Mappe die Grafik aus der Kopfzeile gelöscht.
Die Grafik habe ich nicht als Datei vorliegen.
Wie bekomme ich die wieder rein?
In den anderen Tabellenblättern ist sie noch enthalten.
Danke für Eure Hilfe
16.06.2009 15:36:17
Thread-ID: 1081936
9 Beiträge
kopf und fußzeile
holger

Hallo liebe excel gemeinde
besteht die möglichkeit in excel auch eine tabelle in der Kopf und Fußzeile einzubringen?
Sollte wie folgt aussehen
https://www.herber.de/bbs/user/63158.xls
Hoffe es geht in der Kopf und Fußzeile irgendwie.
Gruß Und Danke
Holger
14.07.2009 12:09:51
Thread-ID: 1088421
5 Beiträge
Bild aus Excel in PPT kopieren
mathon

Hallo Zusammen,
Ich möchte gerne ein Makro in PowerPoint schreiben. Ich habe ein Powerpointslide, wo ich jetzt von Powerpoint heraus eine bestimmte Excel-Datei öffnen möchte, dort aus einem Sheet eine Grafik kopieren und in das Powerpoint-Slide einfügen.
Hat jemand zufällig ein Beispiel...
19.11.2009 23:59:13
Thread-ID: 1118714
2 Beiträge
Änderung für alle Tabellenblätter übernehmen | Herbers Excel-Forum
Thomas
Hallo liebe VBAler
Ich hab eine Excel Datei mit 12 Tabellenblätter (Januar-Dezember).
Ände ich nun z.B. im Tabellenblatt Januar in Spalte A und B etwas, oder füge/lösche eine Zeile ein, dann soll er dies für alle anderen Tabellenblätter übernehmen.
Bis jetzt habe ich dies über Workshee...
14.01.2010 09:11:14
Thread-ID: 1129753
4 Beiträge
Kopf- und Fußzeile schützen
Ulla

Hallo,
ich habe in Excel einige Formulare erstellt. Damit niemand die Kopfzeile und die Fußzeile verändern kann, möchte ich einen Schreibschutz drauflegen.
Ist das überhaupt möglich?
Wenn ja, wie?
Vielen Dank für Eure Unterstützung.
Grüße
Ulla
06.04.2010 11:18:07
Thread-ID: 1150296
2 Beiträge
Anzeige

Links zu Excel-Dialogen

Frame

Beliebteste Forumthreads (12 Monate)

Anzeige
Jetzt das Excel-Portal bewerten: Deine Stimme zählt!

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige
Archiv - Verwandte Themen
Forumthread
Beiträge
1
1
8
2
2
8
4
1
3
1
3
1
1
3
1
4
1
1
4
5
5
5
9
1
3