Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender

Forumthread: VBA: mehrere Bilder ansprechen

VBA: mehrere Bilder ansprechen
Florian
Hallo Genossen!
Ich hätte wieder mal ein Frage, bei der ihr mir sicher helfen könnt: wie kann ich im VBA-Code mehrere Shapes gleichzeitig ansprechen, so dass der Code vereinfacht wird?
Danke Euch schon mal!
Florian
.Shapes(1).Left = .Cells(kAufbau + 2, 2).Left
.Shapes(1).Width = .Cells(kAufbau + 2, 2).Width
.Shapes(2).Left = .Cells(kAufbau + 2, 2).Left
.Shapes(2).Width = .Cells(kAufbau + 2, 2).Width
Anzeige

2
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Benutzer
Anzeige
AW: VBA: mehrere Bilder ansprechen
11.03.2010 20:28:00
JOWE
Hallo Florian,
z.B. mit einer Schleife: diese hier würde alle Shapes in Sheet(1) behandeln:
Sub jup()
Dim i As Integer
With Sheets(1)
For i = 1 To Sheets(1).Shapes.Count
.Shapes(i).Left = .Cells(kAufbau + 2, 2).Left
.Shapes(i).Width = .Cells(kAufbau + 2, 2).Width
Next
End With
End Sub
Gruß
Jochen
Anzeige
Danke!
12.03.2010 08:56:19
Florian
Danke Jochen, das Gute liegt manchmal so nah ;)
;

Forumthreads zu verwandten Themen

Anzeige
Anzeige
Anzeige
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige