
For I = 1 To 4
ActiveSheet.OLEObjects.Add(ClassType:="Forms.CommandButton.1",
Link:=False _
, DisplayAsIcon:=False, Left:=229.5, Top:=58.5, Width:=74.25,
Height _
:=19.5).Select
Next I
|
cpearson.com/Excel/vbe.aspx |
