Определите размер экрана с помощью VBA в Microsoft Excel
С помощью макроса ниже вы можете вернуть размер экрана с помощью функции GetSystemMetrics32. Declare Function GetSystemMetrics32 Lib «User32» _ Alias «GetSystemMetrics» (ByVal nIndex As Long) As Long Sub DisplayMonitorInfo() Dim w As Long, h As Long w = GetSystemMetrics32(0) ‘ width in points h = GetSystemMetrics32(1) ‘ height in points… Continue Reading Определите размер экрана с помощью VBA в Microsoft Excel