首先在这里发表,所以对我很好。 我正试图从网站上下载一个excel文件。 该网站有一个button,可以按下来下载Excel文件。 我看了代码,并能够想出一个URL,如果进入IE直接带我下载“打开/保存”对话框。 然后,我在Excel中使用该url在VBA中,打开下载框要求打开或保存该文件。 我想每次保存文件到相同的名称,因为我将有另一个工作簿查看数据并返回结果。 我知道这个问题已经被问了一百万次,因为我已经search,但没有代码,我已经尝试将工作。 这是我的代码到目前为止 Sub TESTING() 'Need to reference to Microsoft Internet Controls Dim URL As String 'URL = Worksheets("References & Resources").Range("URLMSL") URL = "http://cts/Tacs/OperationDrillExport/76" Dim IE As Object Set IE = CreateObject("internetexplorer.application") IE.Visible = True IE.Navigate URL Do While IE.ReadyState <> 4 DoEvents Loop End Sub 该网站是一个内部网站,所以它不会从外面工作,但我会认为代码是相同的任何方式。
我能够使用Active X控件使用JavaScript创buildXLS文件。 对于IE我做了以下几点: var objExcel = new ActiveXObject("Excel.Application"); objExcel.visible = false; var objWorkbook = objExcel.Workbooks.Add; var objWorksheet = objWorkbook.Worksheets(1); objWorksheet.Paste; objExcel.visible = true; 但要使用ActiveX控件,我需要去Internet选项 – >安全 – >自定义级别 – >启用初始化和脚本的ActiveX控件没有标记为安全的脚本。 启用后,只有我能够创buildXLS文件。 有没有其他的方式来创buildIE-11的XLS文件,除了活动的X我试图使用以下 var vDiv = document.getElementById('dvData'); vDiv.innerHTML = vTable; var url='data:application/vnd.ms-excel,' + encodeURIComponent($('#dvData').html()) ; 但它不能在IE-11中工作。 我需要使用纯JavaScript。 提前致谢
我正在使用PHPdynamic生成一个表,用户可以下载一个.xls文件。 当使用IE时,点击链接后,popup“您要打开还是保存文件…”对话框。 如果用户保存文件并打开它,则没有问题。 但是,如果用户select“打开”,Excel启动,但它是空的。 没有电子表格。 一切工作正常在Chrome和FF。 这是我正在使用的代码。 <?PHP // filename for download $filename = "filename" . date('M_j_Y') . ".xls"; //create the output $output = //<table> code goes here. //set the header to treat this as an excel file header("Content-Disposition: attachment; filename=\"$filename\""); header("Content-Type: application/vnd.openxmlformats-officedocument.spreadsheetml.sheet"); header("Expires: 0"); header("Cache-Control: must-revalidate, post-check=0, pre-check=0"); header("Cache-Control: private",false); echo $output; exit; ?> […]
我已经创build了macros,我可以从任何网页获取每个url。 现在,我在列中有每个URL。 任何人都可以帮忙写macros来检查这个URL是否工作。 如果这个URL中的任何一个不工作,那么我应该在下一列的URL旁边错误地工作。 下面是我写的代码,但似乎这是行不通的: Sub CommandButton1_Click() Dim ie As Object Dim html As Object Dim j As Integer j = 1 Set ie = CreateObject("InternetExplorer.Application") ie.Visible = True url = "www.mini.co.uk" ie.navigate url Do While ie.READYSTATE <> READYSTATE_COMPLETE Application.StatusBar = "Trying to go to website …" Loop Application.StatusBar = " " Set html = […]
我有一个网页: https : //www.brcdirectory.com/InternalSite/Site.aspx? BrcSiteCode =1832583 我想从这个页面中检索一些文本,从一个HTML <Span ID> 。 <span id="ctl00_ContentPlaceHolder1_FormView1_GridView1_ctl02_lb_ExpiryDate">Expiry Date : 07/12/2017</span> 我有IE 11.0.9600.18639 通过Excel,我使用下面的代码打开IE 11,导航到页面,并且想要尝试在<SPAN>中显示文本的消息框。 码: Option Explicit Sub GoToWebsiteTest() Application.ScreenUpdating = False Application.DisplayAlerts = False Dim appIE As Object Dim objElement As Object Dim objCollection As Object Dim i As Long, LastRow As Long, sFolder As String Dim sURL As […]
我已经成功通过Internet Explorer中的Excel VBA启用下拉菜单,但是我无法设法单击第二个子DIV 。 虽然我可以debug.print的下拉菜单的内容,我不能设法fireevent 。 这是我正在处理的源代码,到目前为止我做了什么。 <div style="border-width: 1px; z-index: 1018; visibility: visible; height: 238px; width: 304px; left: 1566px; top: 144px;" role="presentation" id="x-auto-1048" class="x-combo-list x-ignore x-component x-border "><div tabindex="0" hidefocus="true" id="x-auto-318" class=" x-view x-combo-list-inner x-component x-unselectable" style="overflow-x: hidden; padding: 0px; border-width: 0px; height: 238px; width: 304px;" unselectable="on"> <div class="x-combo-list-item x-panel-header "> Actions</div><div class="x-combo-list-item ">Add Lead […]
在这里需要帮助,试图使用VBA与下载对话框进行交互。 不幸的是无法发布的图像,因为我没有要求的声誉这样做。 但它只是一个简单的对话框,只有3个选项。 1)打开2)另存为3)保存 我想要做的是,而不是窗口/ Excel提示对话框,Excel VBA将直接打开它。 任何人都知道? (SendKeys“{TAB}”,True / SendKeys“{ENTER}”,True),但没有发生任何事情。
我正在尝试使用excel VBA来自动化在我公司的Intranet网页上input的数据。 我知道如何与网页的值进行交互的字段有像下面的HTML代码中的“ID” <input name="txtUserName" tabindex="1" id="txtUserName" type="text"> 有了这样的HTML代码,我会使用类似的东西 IE.Document.getElementbyId("txtUserName").Value = "UserName" 我面临的问题是与我试图互动的领域相关的代码是 <HTML><HEAD><META content="IE=5.0000" http-equiv="X-UA-Compatible"> <SCRIPT type=text/javascript> function ajusterFrames() { var iLargeurGauche = 217; var iLargeurDroite = 850; var iLargeurFenetre = window.innerWidth || document.documentElement.clientWidth || document.body.clientWidth; var iMarge = 0; var sCols = ""; if (iLargeurFenetre > (iLargeurGauche + iLargeurDroite)) { iMarge = (iLargeurFenetre […]
我正在尝试使用VBA代码来单击网站上的“Go”button。 这是源代码。 <div class="actions"> <a id="go" href="javascript:void(null);" title="Go"><img src="/images/button-go-smaller.png"></a> <a id="reset" href="javascript:void(null);" title="Reset All Fields"><img src="/images/button-reset_all.png"></a> </div> 这是我的VBA代码: For Each obj In objCollection If objCollection(i).ID = "go" Then Set objElement = obj Exit For End If Next obj objElement.Click 但是,在objElement.Click行,我得到一个错误91,这意味着“去”行动无法find。 为什么是这样,我怎样才能访问button?
我没有在任何工作的计算机上的Internet Explorer,因此创buildInternet Explorer的对象,并使用ie.navigateparsingHTML和search标签是不可能的。 我的问题是, 我怎样才能使用标签自动从框架源到我的电子表格不使用IE浏览器的某些数据? 答案中的代码示例将非常有用:)谢谢