Microsoft Excel

Herbers Excel/VBA-Archiv

Informationen und Beispiele zum Thema MsgBox
BildScreenshot zu MsgBox MsgBox-Seite mit Beispielarbeitsmappe aufrufen
Informationen und Beispiele zum Thema Userform
BildScreenshot zu Userform Userform-Seite mit Beispielarbeitsmappe aufrufen
Informationen und Beispiele zum Thema Image
BildScreenshot zu Image Image-Seite mit Beispielarbeitsmappe aufrufen

Grafik in Userform Eigenschaft zuweisen | Herbers Excel-Forum


Betrifft: Grafik in Userform Eigenschaft zuweisen von: SteffenS
Geschrieben am: 06.12.2009 08:28:37

Hallo Zusammen,

ich möcht per Schleife allen Grafiken in meiner Userform eine Eigenschaft zuweisen.
Leider weiß ich nicht wie ich die Grafiker ansprechen soll.
Mit:

Dim img As MSForms.Image
Dim MN As control
For Each MN In UF.img
MsgBox (MN.Name)
UF.MN.PictureSizeMode = 3
Next MN

funktioniert es leider nicht.
Was kann ich tun.

Danke Euch schonmal.

VG

Steffen Schmerler

  

Betrifft: If TypeName(MN) = "Image" Then ... von: Matthias L
Geschrieben am: 06.12.2009 09:20:03

Hallo

probier mal

Dim MN As Control
 For Each MN In UF.Controls
  If TypeName(MN) = "Image" Then
   MsgBox (MN.Name)
   MN.PictureSizeMode = 3
  End If
 Next MN
Gruß Matthias


  

Betrifft: AW: Grafik in Userform Eigenschaft zuweisen von: Tino
Geschrieben am: 06.12.2009 09:23:51

Hallo,

versuche es mal so.

Dim oCon As MSForms.Control

For Each oCon In Me.Controls
 If TypeName(oCon) = "Image" Then
  MsgBox oCon.Name
  oCon.PictureSizeMode = 3
 End If
Next oCon
Gruß Tino


  

Betrifft: Danke das ging so von: SteffenS
Geschrieben am: 06.12.2009 10:15:52

VG

Steffen


Beiträge aus den Excel-Beispielen zum Thema "Grafik in Userform Eigenschaft zuweisen"