Hallo an alle,

ich bin ein absoluter Neuling auf dem Gebiet VBA und brauche bei einer Sache eure Hilfe.

Ich habe bis jetzt ein Makro geschrieben welches mir ein Rechteck erzeugt. Jetzt möchte ich aber nicht, dass er mir das Rechteck in dem bestehenden Sheet erzeugt, sondern in einem neuen Festner (in Richtung Popupfenster). Das Fenster an sich habe ich schon hinbekommen, nur die Verknüpfung der beiden Sachen gelingt mir nicht so richtig.

Habe bis jetzt folgendes:

Sub rechteck()
Dim meldung As String

ActiveSheet.Shapes.AddShape msoShapeRectangle, 10#, 10#, 200#, 400#
MsgBox meldung, , "Nutzenanordnung """


End Sub