| |
▼β さん：
Frameを使用して、目的の画像を保存することができました。
βさん！本当にありがとうございました！！
以下のサイトを参考にしました。
ht tps://support.microsoft.com/ja-jp/kb/161299
キャプチャの対象をFrameのハンドルにすることで解決できました。
Public Function CaptureFrame() As IPictureDisp
' Get a handle to the Frame1.
Dim hWndScreen As Long
WindowFromAccessibleObject Frame1, hWndScreen
Dim cxScreen As Long, cyScreen As Long
cxScreen = Frame1.Width
cyScreen = Frame1.Height
' Call CaptureWindow to capture the entire frame give the handle
' and return the resulting Picture object.
Set CaptureFrame = CaptureWindow(hWndScreen, False, 0, 0, cxScreen, cyScreen)
End Function
|
|
![[未読]](./data/excel/image/read_icon.gif){kind=icon}
