Tag: shdocvw

如何使用SHDocVw.InternetExplorer命令最大化由VBA创build的IE窗口?

正如标题所说,我试图最大化使用以下命令创build的Internet Explorer窗口: Set ie = New SHDocVw.InternetExplorer 代替: Set ie = CreateObject("InternetExplorer.Application") 以下是完整的代码: Sub wpieautologin() Dim ie As SHDocVw.InternetExplorer Dim NOME_EMPRESA, CNPJ, CPF, COD_ACESSO As String Dim Lookup_Range As Range Set ie = New SHDocVw.InternetExplorer ie.Visible = False ie.Navigate "http://www8.receita.fazenda.gov.br/simplesnacional/controleacesso/autentica.aspx?id=6" NOME_EMPRESA = Range("B8").Value Set Lookup_Range = Range("B12:E500") CNPJ = Application.WorksheetFunction.VLookup(NOME_EMPRESA, Lookup_Range, 2, False) CPF = […]

在Visual Basic中使用IE浏览器

努力寻找解决scheme。 从Visual Basic(更具体地说,Excel中的VBA)我可以通过使用标题来调用Internet Explorer窗口 AppActivate ("My Page Title – Windows Internet Explorer") 而且每次都很棒。 我可以打开一个新的窗口,并使用..发送一个url Dim ie As Object Set ie = New InternetExplorer ie.Visible = True ie.Navigate "http://websiteurl" 而且,这也可以工作好但是它每次打开一个新的浏览器,我希望它总是调用相同的窗口。 所以我可以设置ie每次相同的页面。 所以,而不是 Set ie = New InternetExplorer 它做了类似的事情 Set ie = ACTIVE InternetExplorer (尽pipe这似乎并不存在)。 有一些设置方式, ie与AppActivate ("My Page Title – Internet Explorer")吗? 谢谢 完整代码在这里: Sub Find_Recordings() […]