Excel VBAでワークシート領域のサイズを取得

Question

Excel VBAでワークシート領域の幅と高さをピクセル単位で取得する必要があります。これは、ワークシート内のセルが表示される領域です。したがって、他のすべてのExcel UI要素を除外する必要があります。 GetSystemMetricsとSystemParametersInfoを使用しようとしましたが、解決策が見つかりませんでした。

Answer 1

たぶん、次のコードは、助けになることができます：もともとここで見つける

MsgBox ("Width in points = " & ActiveWindow.Width & Chr(13) & _ 
"Depth in points = " & ActiveWindow.Height & Chr(13) & _ 
"Width in Pixels = " & ActiveWindow.PointsToScreenPixelsX(ActiveWindow.Width) & Chr(13) & _ 
"Depth in Pixels = " & ActiveWindow.PointsToScreenPixelsY(ActiveWindow.Height)) 

_{コード：（GER Planteによって）http://www.ozgrid.com/forum/showthread.php?t=36696}