Microsoft Excel

Excel und VBA: Formeln, Programmierung, Lösungen

Die Excel/VBA-Beispiele

Thema

Bildergruppe in anderes Blatt kopieren

Gruppe

Kopieren

Problem

Die Bildergruppe im Bereich M1:O8 soll an die gleiche Position in Tabelle2 kopiert werden.

Lösung
Den nachstehenden Code in ein Standardmodul eingeben, einer Schaltfläche zuweisen und starten.

StandardModule: Modul1

Sub BilderGruppeKopieren()
   Dim pctsSource As Object, pctsTarget As Object
   Set pctsSource = ActiveSheet.Pictures
   pctsSource.Copy
   Worksheets(3).Select
   Range("M1").Select
   Worksheets(3).Paste
End Sub

    

Beiträge aus dem Excel-Forum zu den Themen Grafik und Kopieren