Office: Userform mit Rechtecken

Hallo zusammen

Ist es möglich, in userforms Rechteck zu zeichnen?
Wenn ja, wie? Ich bringe das nur auf einem leeren Arbeitsblatt zustande, muss aber die Grafik auch auf dem Userform anzeigen lassen.
Besten Dank für eure Hilfe

Freundliche Grüsse

Dani

 

Hallo!

In der Werkzeugsammlung findest du unter den Steuerelementen auch ein Symbol, das die Sonne und Berge zeigt.
Hiermit kannst du Rechtecke zeichnen und diese über deren Eigenschaften mit einer Farbe (oder sogar einem Bild) füllen.

 

Hallo, besten Dank für die promte Antwort!

ok, habs gesehen. respektive mich zuwenig klar ausgedrückt. ich erstelle momentan mit

Code:

For i = 1 To geschossanzahl
    ActiveSheet.Shapes.AddShape(msoShapeRectangle, abstandlinks, geschossz - i * geschosshöhe, geschossbreite * 8, geschosshöhe). _
        Select
    Selection.ShapeRange.Name = "t" & i
    Selection.ShapeRange.ThreeD.Visible = msoTrue
    tiefe3d = Range("gbl").Value
     Selection.ShapeRange.ThreeD.Depth = tiefe3d * 8
    Selection.ShapeRange.Fill.ForeColor.SchemeColor = 22
    Selection.Characters.Text = "Geschoss Nr." & i
    With Selection.Characters(start:=1, Length:=14).Font
        .Name = "Arial Narrow"
        .FontStyle = "Standard"
    End With

3-D Rechtecke im normalen Arbeitsblatt. Diese sollten aber auf einem Formular erscheinen. Gibt es da ne Lösung?

Freundliche Grüsse
Dani

 

Sorry, da bin ich überfragt...

Vielleicht sowas wie

UserForm1.Image1.Picture = ...irgendwas...

 

eine alternative möglichkeit existiert nicht? eigentlich könnte ich die 3d - Körper auch einfach neben dem Userform1 auf dem arbeitsblatt anzeigen lassen, jedoch besteht dann die möglichkeit nicht mehr, dass ich die körper aktivieren lassen kann. gibt es eine lösung, dass ich das arbeitsblatt aktiv habe, resp. bearbeiten kann, gleichzeitig aber auch das userform1 angezeigt wird?

besten dank und gruss

Dani

 

Hallo!

Ja, das geht:

UserForm1.Show vbModeless