Description
Provides screenshot capabilities on Excel or Active Window.
NOTES
- Reference to AUExpress.Cells library.
- Supported Screenshot types:
- Take a screenshot of your entire full screen.
- Take a screenshot of a specific window region.
- Take a screenshot from an Excel address.
Syntax
Dim cls As New AUScreen
cls.OutputFolder = "C:\Users\admin\Downloads\" 'empty = copy to clipboard
If Not cls.Initialize Then ReturnEXAMPLE 1
Take a full screen screenshot and copy to clipboard:
cls.ScreenshotType = ScreenshotType_Fullscreen
If cls.TakeScreenshot() Then
Debug.Print "Done"
Else
Debug.Print "Failed"
End IfEXAMPLE 2
Take a picture of an area and export it to the Download folder:
cls.ScreenshotType = ScreenshotType_Region
cls.Left = 0
cls.Top = 0
cls.Width = 1000
cls.Height = 500
If cls.TakeScreenshot("output.png") Then
Debug.Print "Done"
Else
Debug.Print "Failed"
End IfSee documentation for other examples.