ich möchte gern in verschiedenen Userforms den Fuss der aus mehreren Elementen besteht per Button anpassen.
Hierzu habe ich mir folgendes Makros angelegt.
Sub uf_fuss_anpassen(uf As UserForm, apos As Long)
uf.banner_u.Top = uf.banner_u.Top + apos
uf.Height = uf.Height + apos '--> Fehlerhafte Stelle
End Sub
Dies funktioniert auch bis auf die letzte Zeile.
Bei dieser erscheint der Fehler: "Objekt unterstützt diese Eigenschaft oder Methode nicht"
Der Aufruf des Makros innerhalb der UF lautet: uf_fuss_anpassen Me, 140
Was kann ich tun, damit der Code funktioniert?
Vielen Dank Euch im Voraus.
Steffen Schmerler