Tag: html
单击使用VBA提交时，HTML表单数据无法识别
我使用电子表格中的数据填写表格。 我有一切工作正常，但当我点击提交（无论是手动或通过代码），网站上的validation无法识别表格填写。 它错误地指出，文本框/combobox都是空白的。 我如何刷新，以便知道有数据填充？ 如果代码是业余的，我提前道歉，但这是我第一次与Web表单交互。 这里是代码： Sub AddNewDevice() Dim objCollection As Object For Each wd In CreateObject("Shell.Application").Windows If wd = "Internet Explorer" Then If InStr(UCase(wd.document.Title), "ADD A NEW CISCO ACS") <> 0 Then 'Debug.Print "Yes" Exit For End If End If Next wd wd.Visible = True Set objCollection = wd.document.getElementsByTagName("input") i = 0 While i […]
使用VBA从HTML页面提取ID /类信息
我前一段时间写了一个Excel VBA中的程序，它可以读取一个HTML页面，并提取关于我的游戏集合的价格的具体信息。 它工作正常，直到一个月前，一切停止工作，我不明白为什么它不工作了，我需要一些帮助来解决这个问题。 所以这里的代码 Dim htm As Object ' tableau HTML venant du site pricecharting ' Find price over internet With CreateObject("msxml2.xmlhttp") .Open "GET", "http://videogames.pricecharting.com/game/" & console & "/" & name & "", False .Send htm.body.innerhtml = .responsetext End With ' what I want is in a table row 1 and cell 0 (used price) […]
用VBA打印一个HTML文件
我一直在研究这一段时间，我已经拿出了下面的代码。 但是，我不断收到错误。 见下文。 这个代码的目的是生成一个HTML文档。 然后打开并从打印机打印文档。 我已经获得文件成功保存，甚至在IE窗口中打开它。 然后我得到错误。 Function generateResults() Dim resultsBrowser As SHDocVw.InternetExplorer Set resultsBrowser = New SHDocVw.InternetExplorer Dim resultsPath As String Dim resultsFile As String resultsPath = ThisWorkbook.Path & "\As-Run Test Results" If Len(Dir(resultsPath, vbDirectory)) = 0 Then MkDir resultsPath End If resultsFile = resultsPath & "\As-Run " & Format(Now, "mm-dd-yyyy hmmss") & ".html" […]
使用excel VBA进行Web抓取
我正在查看下面的HTML代码链接： <h1 class="wer wer"> <a href="http://somelink.com" rel="bookmark" title="Permanent Link to Title of this page that covers some random topic"> Short title of this page…</a> </h1> 我目前正在使用下面的代码拉出innertext（“这个网页的简称…”） For Each ele In .document.all Select Case ele.classname Case "wer wer" RowCount = RowCount + 1 sht.Range("A" & RowCount) = ele.innertext End Select Next ele 我怎样才能修改这个代码来拉出标题（“永久链接到这个页面的标题，涵盖一些随机主题”）和href（“ http://somelink.com ”）？ 任何帮助将非常感激。 […]
将一个Excel工作表添加到一个HTML网页
我做了很多研究，但还是找不到解决办法。 我想从我的Excel表中出现一个表，并出现在我的HTML文档。 我知道我可以做到这一点，但不能找出一个办法，我可以编辑表格，它在我的网页上重新调整，以显示新的数据。 只是寻找一个方向看。 再次，我想拥有它，所以我可以添加到一个Excel工作表和一个表出现在我的HTML文档，并会改变当我改变我的工作表。 谢谢。
如何创build一个表格，用户可以在AngularJS中更改影响结果的值
我刚开始学习angularJS。 我的老板给了我一个Excel电子表格，他们希望我把这个表格放到网站上。 在Excel中，可以更改电子表格中的单元格，从而影响使用公式的其他单元格。 在我的申请到目前为止，我有一张桌子。 例如： var app1 = angular.module('app1', []); app1.controller('ctrl1', function($scope) { }); <script src="https://ajax.googleapis.com/ajax/libs/angularjs/1.2.23/angular.min.js"></script> <!– AngularJs controller –> <div ng-controller="ctrl1"> <!– TABLE –> <main class="container-fluid wrapper"> <section class="row bg-white"> <div class="container"> <div class="col-xs-12"> <table id="example" class="table table-striped table-bordered" cellspacing="0" width="100%"> <!– Table header –> <thead> <tr> <th>Type</th> <th>Length</th> <th>Width</th> <th>Area</th> <th>Qty</th> <th>Kilos</th> </tr> […]
从Html表单写入Excel文档
在内部networking上，我想写一个内部Web表单上的同事填写到excel数据库。 经过一番研究后，我想出了下面的代码，但我似乎无法让它为我工作。 任何帮助，将不胜感激。 <script language="vbscript" type="text/vbscript"> Sub Divert () Dim iRow Set objExcel = CreateObject ("Excel. Application") Set objWorkbook = objExcel.Workbooks.Open ("G:\Bournemouth\CorporateShared\General Insurance\GI complaint Team\Baxter Diverted\diverted.xlsx") objExcel.Application.Visible = True ObjWorkbook.Windows (1).Visible = True Set XlSheet =objWorkbook.Sheets (1) XlSheet.Activate iRow = 1 With objExcel Do while .Cells (iRow, 1).value <> "" .Cells (iRow, 1).activate iRow = […]
所需对象：在VBA中单击dynamic生成的链接时出错
我对VBA相对比较陌生，正在使用VBAparsing一个网站。 该网站已dynamic生成表格元素与分页。 <a onclick="showPage(this.href); return false;" href="/member-finder?p=2" class="paginationLink">Next ></a> 当我点击下一页后，上一个button出现在下一页 > <a onclick="showPage(this.href); return false;" > href="/member-finder?p=1" class="paginationLink">< Previous</a> > > <a onclick="showPage(this.href); return false;" > href="/member-finder?p=3" class="paginationLink">Next ></a> 所以，点击下一个链接，我在VBA中做了下面的代码： Dim focation Dim jocation If j = 1 Then focation = doc.getElementsByClassName("paginationLink") focation.Click Do Loop Until ie.readyState = READYSTATE_COMPLETE '= 4 Sleep 2000 ElseIf j […]
导出HTML表格到Excel数字成为date
我想导出一个HTML表格到Excel。 表： <div id="table"> <table> <thead> <tr> <th>Column</th> <th>Column</th> </tr> </thead> <tbody id="tabbodyExp"> <tr> <th>2.5</th> <th>2.6</th> </tr> </tbody> </table> </div> 脚本： $("#btnExport").click(function (e) { window.open('data:application/vnd.ms-excel,' + $('#table').html()); e.preventDefault(); }); 但是，excel正在将所有类似于“2.5”的数字转换为date。 有没有办法阻止，或者我必须写下所有的数字，如“2,5”。
用vba更改亚马逊的数量
我试图打开亚马逊网站，select一个产品，去购物车，按购物车，并更改数量（例如450）。 我有一个问题要解决最后一步来改变数量。 这是数量button。 我试过这个： Set objIE = CreateObject("InternetExplorer.Application") With objIE` Set Element = .document.getElementsById("dropdown1_9") Element.Click 和这个： Set Element = .document.getElementsByName("quantatiy").value = 10 End with 两者都不起作用。 我想我不知道button的types，我试图操纵。 有人能帮我解决这个问题吗？ 我可以做些什么来改变数量？
