1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20
|
ActiveSheet.OLEObjects.Add ClassType:="Forms.Frame.1", Link:=False, _
DisplayAsIcon:=False, Left:=271.5, Top:=123.75, Width:=274.5, Height _
:=98.25
ActiveSheet.OLEObjects.Add ClassType:="Forms.ListBox.1", Link:=False, _
DisplayAsIcon:=False, Left:=291.75, Top:=150.75, Width:=116.25, Height _
:=34.5
ActiveSheet.OLEObjects.Add ClassType:="Forms.ComboBox.1", Link:=False, _
DisplayAsIcon:=False, Left:=447.75, Top:=144.75, Width:=87.75, Height _
:=39
ActiveSheet.OLEObjects.Add ClassType:="Forms.TextBox.1", Link:=False, _
DisplayAsIcon:=False, Left:=333, Top:=136.5, Width:=72.75, Height:= _
8.25
ActiveSheet.OLEObjects.Add ClassType:="Forms.CheckBox.1", Link:=False, _
DisplayAsIcon:=False, Left:=486, Top:=136.5, Width:=33, Height:=6
ActiveSheet.OLEObjects.Add ClassType:="Forms.CommandButton.1", _
Link:=False, DisplayAsIcon:=False, Left:=40, Top:=40, _
Width:=150, Height:=10 |
Partager