Live-Forum - Die aktuellen Beiträge
Datum
Titel
28.03.2024 21:12:36
28.03.2024 18:31:49
Anzeige
Archiv - Navigation
1472to1476
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
Inhaltsverzeichnis

Graphiken an nächste Ecke "anbinden"

Graphiken an nächste Ecke "anbinden"
04.02.2016 15:25:32
Markus
Hallo
ich habe etwa 250 Bilder, die ich gerne per Makro an den oberen Rand der Zelle und an den linken Rand der Zelle "festnageln" möchte.
Die Bilder sind alle genau gleich gross.
Lässt sich das per Makro ausführen.
Danke für einen Tipp.
Markus
Die Bilder habe ich per Inhalte auswählen (Objekte) genau auf die Grösse von 3cm Breite und 3,5cm Höhe verkleinert (oder vergrössert).

3
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Graphiken an nächste Ecke "anbinden"
04.02.2016 15:48:31
Rudi
Hallo,
meinst du so?
Sub aaa()
Dim s As Shape
Application.ScreenUpdating = False
For Each s In ActiveSheet.Shapes
s.Top = s.TopLeftCell.Top
s.Left = s.TopLeftCell.Left
Next s
End Sub

Gruß
Rudi

AW: Graphiken an nächste Ecke "anbinden"
04.02.2016 15:57:30
Markus
Danke vielmals
Ihr alle Excel-Spezis seid einfach Super !!

dann doch erledigt. owT
04.02.2016 16:08:59
Rudi
Anzeige

300 Forumthreads zu ähnlichen Themen

Anzeige
Anzeige
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige