我需要一个 VBA 代码,当网页框架即将导航到其他页面时,它可以在 VBA 中执行一些操作。例如,当我单击某个链接时,按钮导航到其他页面我想先截取页面的屏幕截图框架导航到其他。我做了类似的事情,但它正在拍摄空白页面的屏幕截图,并且它仅在页面导航和对象更改时工作一次。请帮我解决这个问题,我从 2 周以来一直在寻找这个,帮帮我。
Sub pageLoad()
Set ie2 = GetIE("https://xyz.com")
Dim LinkFound As Boolean
Dim linkCollection
Dim IEfr0 As Object
i = 0
Dim Link As MSHTML.HTMLAnchorElement
'HTMLInputElement
Set wordapp = CreateObject("word.Application")
wordapp.Visible = True
Set wrdDoc = wordapp.Documents.Add
Set IEfr0 = ie2.document.frames(0).document
Set linkCollection = IEfr0.getElementsByTagName("a")
Do While ie2.Visible = True
For Each Link In linkCollection
If ie2.document.frames(2).document.readyState = "interactive" Then
sai1
End If
If IEfr0.readyState = 1 Then
sai1
End If
Next
Loop
End Sub
Sub sai1()
Application.SendKeys "{PRTSC}"
wordapp.Selection.Paste
Do While ie2.Busy
Loop
End Sub