タイトル | : エクセルへpdfの画像貼付け |
記事No | : 12309 |
投稿日 | : 2025/04/11(Fri) 21:20 |
投稿者 | : たけし |
お世話になります。
VB.NET 2010 Win10環境で エクセル2016使用しています。
VB.NET よりエクセルを開いて エクセルファイルにPDFファイルの画像を貼り付けようと思っています。 貼り付けることはできまして Left, Top の座標も指定した場所へ表示できるのですが Width と Height サイズについて調整することができない状況です。 (描いているサイズより大きく表示する) 設定方法について教えてください。
Private Sub TEST
Dim strBmp As String Dim ex As New Microsoft.Office.Interop.Excel.Application Dim wb As Microsoft.Office.Interop.Excel.Workbook Dim sh As Microsoft.Office.Interop.Excel.Worksheet Dim OleObjects As Object = Nothing Dim OleObject As Object = Nothing wb = ex.Workbooks.Open("C:test.xls") sh = wb.Sheets("Sheet1")
strBmp = "C:\test.PDF" OleObjects = sh.OLEObjects OleObject = OleObjects.Add(FileName:=strBmp, Link:=False, IconIndex:=False, Left:=750, Top:=690, Width:=200, Height:=200)
End Sub
|