Forums Neueste Beiträge
 

VBA Anzahl von Images ermitteln

05/08/2010 - 16:15 von CL | Report spam
Hallo Zusammen,

ich habe ein Userform mit diversen Imageobjekten. Wie bekommt man die
Anzahl der Imageobjekt auf einer Userform heraus? Alle imageobjekte
sind tranzparent. Die Rànder sollen einzeln farblich markiert werden.
Ich dachte an so etwas wie : Userform1.Images.count

Danke und Gruß
MI
 

Lesen sie die antworten

#1 Andreas Killer
06/08/2010 - 09:52 | Warnen spam
On 5 Aug., 16:15, CL wrote:

ich habe ein Userform mit diversen Imageobjekten. Wie bekommt man die
Anzahl der Imageobjekt auf einer Userform heraus? Alle imageobjekte
sind tranzparent. Die Rànder sollen einzeln farblich markiert werden.
Ich dachte an so etwas wie : Userform1.Images.count


Auf einer Userform hast Du nur Controls und diese Auflistung kannst Du
durchlaufen und die Images rausfischen.

Andreas.

Private Sub UserForm_Click()
Dim C As Control, I As Integer
Dim Im As Image
For Each C In Me.Controls
If TypeOf C Is Image Then
I = I + 1
C.BorderColor = RGB(0, 128, 64)
End If
Next
MsgBox "Images " & I
End Sub

Ähnliche fragen