вставляю на лист Excel контрол Image:
- Код: Выделить всё
.ActiveSheet.OLEObjects.Add(ClassType:="Forms.Image.1", Link:=False, _
DisplayAsIcon:=False, Left:=280, Top:=650, Width:=120, Height:=60).Select()
но когда дело доходит до:
- Код: Выделить всё
ExcelBook.ActiveSheet.OLEObjects.Item(1).object.Picture=
не знаю что делать
в Excel все решается так
- Код: Выделить всё
ActiveSheet.OLEObjects.Item(1).object.Picture=stdole.StdFunctions.LoadPicture("C:\pic.jpg")
фишка в том что в VB.NET в Namespace stdole нету StdFunctions
конструкция типа
- Код: Выделить всё
ActiveSheet.OLEObjects.Item(1).object.Picture=Image.FromFile("C:\pic.jpg")
привела к несовпадению типов
