CommandButton
31.05.2019 12:04:01
Werner
Mit folgendem Makro möchte ich ein Button ändern
Sub Test6()
With ActiveSheet.OLEObjects("CommandButton" & 7).Object
.Top = Range("AL13").Top
.Left = Range("AL13").Left
.Width = Range("AL13").Width
.Height = Range("AL13").Height
.Font.Name = "Arial"
.Font.Size = 10
.Font.Bold = True
End With
End Sub
wobei aber bei der Ausführung ein Fehler angezeigt wird.Laufzeitfehler 438
Objekt unterstützt diese Eigenschaft oder Methode nicht
Bisher habe ich noch keine Lösung gefunden,
dieses Makro funktionsfähig anzupassen.
Für evtl. Tipps oder Lösungen schönen Dank im Voraus!
Werner