Этот макрос создает элемент управления
Sub Логотип() ' ' Логотип Macro ' Macro recorded 27.11.1999 by Vladimir Billig ' Этот макрос создает элемент управления Image 'и помещает его в нужную позицию рабочего листа. ActiveSheet.OLEObjects.Add(ClassType:="Forms.Image.1", Link:=False, _ DisplayAsIcon:=False, Left:=23.25, Top:=15, Width:=63, Height:=61.5). _ Select End Sub |
Листинг 6.19. |
Закрыть окно |