Excel 将表格数据从多个网页拉入工作簿
我正在尝试用VBA编写一个宏，它可以将许多网页中的数据表拉入excel。将为每个网页/表格创建一个新工作簿 每个网页都有一个表，每个网页都有相同的布局。每个页面的url具有相同的格式，url的末尾有一个数字标识符 不幸的是，网站本身是受密码保护的 到目前为止，我已经能够记录一个宏，其中我为单个页面/表创建了一个web查询。此时，我很难弄清楚如何使该过程在大量页面上重复，以及如何编写宏，以便为每个页面创建一个新工作簿。如果用户可以输入标识符列表（url末尾的数字），运行宏，并让它为每个页面生成一个单独的文件，那就太好了Excel 将表格数据从多个网页拉入工作簿,excel,vba,excel-web-query,Excel,Vba,Excel Web Query,我正在尝试用VBA编写一个宏，它可以将许多网页中的数据表拉入excel。将为每个网页/表格创建一个新工作簿 每个网页都有一个表，每个网页都有相同的布局。每个页面的url具有相同的格式，url的末尾有一个数字标识符 不幸的是，网站本身是受密码保护的 到目前为止，我已经能够记录一个宏，其中我为单个页面/表创建了一个web查询。此时，我很难弄清楚如何使该过程在大量页面上重复，以及如何编写宏，以便为每个页面创建一个新工作簿。如果用户可以输入标识符列表（url末尾的数字），运行宏，并让它为每个页面生成一个
Sub productiondata()
'
' productiondata Macro
' pulls production table from dmr site for well number 19918
With ActiveSheet.QueryTables.Add(Connection:= _
"URL;https://www.dmr.nd.gov/oilgas/feeservices/getwellprod.asp?filenumber=19918" _
, Destination:=Range("$A$1"))
.Name = "getwellprod.asp?filenumber=19918"
.FieldNames = True
.RowNumbers = False
.FillAdjacentFormulas = False
.PreserveFormatting = True
.RefreshOnFileOpen = False
.BackgroundQuery = True
.RefreshStyle = xlInsertDeleteCells
.SavePassword = False
.SaveData = True
.AdjustColumnWidth = True
.RefreshPeriod = 0
.WebSelectionType = xlSpecifiedTables
.WebFormatting = xlWebFormattingNone
.WebTables = "3"
.WebPreFormattedTextToColumns = True
.WebConsecutiveDelimitersAsOne = True
.WebSingleBlockTextImport = False
.WebDisableDateRecognition = False
.WebDisableRedirections = False
.Refresh BackgroundQuery:=False
End With
End Sub
Sub productiondata()
'create new workbook named after the value in cell A1
Dim Aname As String
Aname = ActiveWorkbook.Sheets(1).Range("A1").Value
Workbooks.Add
ActiveWorkbook.SaveAs Filename:=Aname & ".xls"
' productiondata Macro
' pulls production table from dmr site for well number 25158
With ActiveSheet.QueryTables.Add(Connection:= _
"URL;https://www.dmr.nd.gov/oilgas/feeservices/getwellprod.asp?filenumber=25158" _
, Destination:=Range("$A$1"))
.Name = "getwellprod.asp?filenumber=25158"
.FieldNames = True
.RowNumbers = False
.FillAdjacentFormulas = False
.PreserveFormatting = True
.RefreshOnFileOpen = False
.BackgroundQuery = True
.RefreshStyle = xlInsertDeleteCells
.SavePassword = False
.SaveData = True
.AdjustColumnWidth = True
.RefreshPeriod = 0
.WebSelectionType = xlSpecifiedTables
.WebFormatting = xlWebFormattingNone
.WebTables = "3"
.WebPreFormattedTextToColumns = True
.WebConsecutiveDelimitersAsOne = True
.WebSingleBlockTextImport = False
.WebDisableDateRecognition = False
.WebDisableRedirections = False
.Refresh BackgroundQuery:=False
End With
End Sub
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN"
"http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
<html lang="en">
<head>
<meta http-equiv="Content-Type" content="text/html; charset=windows-1252">
<meta name="GENERATOR" content="Microsoft FrontPage 4.0">
<meta name="ProgId" content="FrontPage.Editor.Document">
<title>Retrieve Well Production Data</title>
<link rel="stylesheet" type="text/css" href="/css/stateBanner.css">
<link rel="stylesheet" type="text/css" href="/css/oilGasDefaults.css">
<link rel="stylesheet" type="text/css" href="/css/jqueryOGDUI/css/custom-theme/jquery-ui-1.9.1.custom.css" >
<style type="text/css">
.menuBar {
width: 155px;
font: 10px verdana,sans-serif;
}
.menuBtn {
width: 100%;
}
.menuHeader {
background-color: #FFFF00;
padding: 1px;
margin: 1px;
font-size: larger;
font-weight: bold;
text-align: center;
}
</style>
<script language="javascript" type="text/javascript" src="/includes/oilandgas.js"></script>
<script language="javascript" type="text/javascript" src="/includes/left-nav.js"></script>
<script language="javascript" type="text/javascript" src="/css/jqueryOGDUI/js/jquery-1.8.2.js"></script>
<script language="javascript" type="text/javascript" src="/css/jqueryOGDUI/js/jquery-ui-1.9.1.custom.js"></script>
<script>
$(function() {
$( "#premiumServiceBtn" ).button().click(function() { location.href='../subscriptionservice.asp'; });
$( "#scoutTicketBtn" ).button().click(function() { location.href='getscoutticket.asp'; });
$( "#digImgLogsBtn" ).button().click(function() { location.href='getlogs.asp'; });
$( "#fieldProdBtn" ).button().click(function() { location.href='fieldprodinj.asp'; });
$( "#launchIMSWellBBtn" ).button().click(function() { location.href='javascript:launchIMSSubWell("22809");'; }); $( "#getWellFileBBtn" ).button().click(function() { location.href='/oilgas/FeeServices/wfiles/22/W22809.pdf'; });
});
</script>
</head>
<body onload="document.forms[0].elements[0].focus(); document.forms[0].elements[0].select()">
<div style="margin:0; padding:0; width:100%; background:#fff; height:26px; border-bottom:1px solid #ccc"><div style="float:left"><span style="display:none">[</span><a href="http://www.nd.gov/"><img style="border-width:0" src="/images/ndgov-banner.gif" height="25" alt="nd.gov - The Official Portal for North Dakota State Government" /></a><span style="display:none">]</span></div><div style="float:right"><span style="display:none">[</span><a href="http://www.ndtourism.com/"><img style="border-width:0" src="/images/tourism-banner-blue.gif" width="95" height="25" alt="North Dakota: Legendary. Follow the trail of legends" /></a><span style="display:none">]</span></div></div>
<table border="0" cellpadding="0" cellspacing="0" width="100%" summary="NDIC Get Well Production Header Table" height="0%">
<tr>
<td width="0%" valign="top" align="left" height="0%">
<div class="menuBar">
<div class="menuHeader">Related Links</div>
<button id="premiumServiceBtn" class="menuBtn">Premium Services</button>
<button id="scoutTicketBtn" class="menuBtn">Scout Ticket Data</button>
<button id="digImgLogsBtn" class="menuBtn">Digital & Image Logs</button>
<button id="fieldProdBtn" class="menuBtn">Field Production</button>
<button id="launchIMSWellBBtn" class="menuBtn">Map This Well</button><button id="getWellFileBBtn" class="menuBtn">Get Well File</button>
</div>
<div id="nonFocus"></div>
</td>
<td height="0%" width="80%">
<script Language="JavaScript"><!--
function FrontPage_Form1_Validator(theForm)
{
if (theForm.FileNumber.value == "")
{
alert("Please enter a value for the \"File Number\" field.");
theForm.FileNumber.focus();
return (false);
}
if (theForm.FileNumber.value.length > 5)
{
alert("Please enter at most 5 characters in the \"File Number\" field.");
theForm.FileNumber.focus();
return (false);
}
var checkOK = "0123456789-";
var checkStr = theForm.FileNumber.value;
var allValid = true;
for (i = 0; i < checkStr.length; i++)
{
ch = checkStr.charAt(i);
for (j = 0; j < checkOK.length; j++)
if (ch == checkOK.charAt(j))
break;
if (j == checkOK.length)
{
allValid = false;
break;
}
}
if (!allValid)
{
alert("Please enter only digit characters in the \"File Number\" field.");
theForm.FileNumber.focus();
return (false);
}
return (true);
}
//--></script><form method="POST" action="/oilgas/feeservices/getwellprod.asp" onsubmit="return FrontPage_Form1_Validator(this)" name="FrontPage_Form1">
<h2 align="center">Get Well Production History Data</h2>
<p align="center"><Label for="fileno">Enter File Number:</Label>
<input type="text" name="FileNumber" size="5" id="fileno"
value="0" maxlength="5"></p>
<p align="center"><input type="submit" value="Get Monthly Production Data"
name="B1"></p>
</form>
</td>
<td valign="top" align="right" nowrap width="20%" height="0%"><a href="https://www.dmr.nd.gov/oilgas/"><img border="0" src="https://www.dmr.nd.gov/oilgas/images/ogdmrlogosmall.gif" width="108" height="67" alt="Return to Oil & Gas Home Page"></a></td>
</tr>
</table>
<table border="0" cellpadding="0" cellspacing="0" width="98%" align="center" summary="Well data content table" height="0%">
<tr>
<td>
<div>NDIC File No: <b>22809</b>     API No: <b>33-023-00836-00-00</b>     CTB No: <b>122809</b><br>
Well Type: <b><span title="Oil & Gas">OG</span></b>     Well Status: <b><span title="Active">A</span></b>     Status Date: <b>10/5/2012</b>     Wellbore type: <b>Horizontal</b><br>
Location: <b>NWNE 15-163-99</b>     Footages: <b>298 FNL 1998 FEL</b>     Latitude: <b>48.951490</b>     Longitude: <b>-103.516702</b><br>
Current Operator: <b>SAMSON RESOURCES COMPANY</b><br>
Current Well Name: <b>BAJA 1522-04TFH</b><br>
Elevation(s):<b> 2117 <span title="Kelly Bushing">KB</span>  </b><b> 2097 <span title="Graded Ground Level">GR</span>  </b><b> 2091 <span title="Original Ground Level">GL</span>  </b>    Total Depth: <b>17485 </b>     Field: <a href=/oilgas/FeeServices/OrderIndex.asp?SELECTFIELD=AMBROSE><b><span title="Go to the AMBROSE Field Order Index">AMBROSE</span></b></a><br>
Spud Date(s):  <b>7/9/2012</b><br>
Casing String(s): <b>9.625" 1528'  </b> <b>7" 8304'  </b><br>
Completion Data<br>
   Pool: <b>BAKKEN</b>     Perfs: <b>8304-17485</b>     Comp: <b>10/5/2012</b>     Status: <b><span title="Producing by Artificial Lift">AL</span></b>     Date: <b>10/22/2012</b>     Spacing: <b><span title="1280 Acres, 2 Sections
Secs 15&22-163-99">2SEC</span></b><br>
Cumulative Production Data<br>
   Pool: <b>BAKKEN</b>     Cum Oil: <b>37552</b>     Cum MCF Gas: <b>39854</b>     Cum Water: <b>44995</b>     [<a href="javascript: launchDecline('well','22809|BAKKEN');"><span title="Use the interactive curve program for the BAKKEN Pool (Requires Adobe Flash player)">Interactive Performance Curve</span></a>]
[<a href="javascript:launchPDFPerfCurve('W7E0B2C4D22809');"><span title="Generate a PDF performance curve for the BAKKEN pool for this well">PDF Curve</span></a>]<br>
Production Test Data<br>
   <span title="Initial Production Test">IP Test</span> Date: <b>10/22/2012</b>     Pool: <b>BAKKEN</b>     IP Oil: <b>315</b>     IP MCF: <b>308</b>     IP Water: <b>364</b><br>
</td></tr><td>Monthly Production Data<br>
<table style="border:1px solid saddlebrown;" cellpadding="4" cellspacing="0" width="100%" align="center" summary="Monthly production data content table" height="0%">
<thead><th style="border:1px solid saddlebrown;"><span title="Pool oil and/or gas was produced from">Pool</span></th><th style="border:1px solid saddlebrown;"><span title="Month and Year produced">Date</span></th><th style="border:1px solid saddlebrown;"><span title="Number of days the well produced during the month">Days</span></th><th style="border:1px solid saddlebrown;"><span title="Barrels of oil produced">BBLS Oil</span></th><th style="border:1px solid saddlebrown;"><span title="Barrels of oil sold">Runs</span></th><th style="border:1px solid saddlebrown;"><span title="Barrels of water produced">BBLS Water</th><th style="border:1px solid saddlebrown;"><span title="Thousand cubic feet of gas produced">MCF Prod</span></th><th style="border:1px solid saddlebrown;"><span title="Thousand cubic feet of gas sold">MCF Sold</span></th><th style="border:1px solid saddlebrown;"><span title="Thousand cubic feet of gas vented or flared">Vent/Flare</span></th></thead>
<tr><td style="border:1px solid saddlebrown;">BAKKEN</td><td style="border:1px solid saddlebrown;" align="right">4-2014</td><td style="border:1px solid saddlebrown;" align="right">3</td><td style="border:1px solid saddlebrown;" align="right">26</td><td style="border:1px solid saddlebrown;" align="right">408</td><td style="border:1px solid saddlebrown;" align="right">0</td><td style="border:1px solid saddlebrown;" align="right">61</td><td style="border:1px solid saddlebrown;" align="right">61</td><td style="border:1px solid saddlebrown;" align="right">0</td></tr>
<tr><td style="border:1px solid saddlebrown;">BAKKEN</td><td style="border:1px solid saddlebrown;" align="right">3-2014</td><td style="border:1px solid saddlebrown;" align="right">22</td><td style="border:1px solid saddlebrown;" align="right">790</td><td style="border:1px solid saddlebrown;" align="right">250</td><td style="border:1px solid saddlebrown;" align="right">958</td><td style="border:1px solid saddlebrown;" align="right">958</td><td style="border:1px solid saddlebrown;" align="right">652</td><td style="border:1px solid saddlebrown;" align="right">100</td></tr>
<tr><td style="border:1px solid saddlebrown;">BAKKEN</td><td style="border:1px solid saddlebrown;" align="right">2-2014</td><td style="border:1px solid saddlebrown;" align="right">7</td><td style="border:1px solid saddlebrown;" align="right">359</td><td style="border:1px solid saddlebrown;" align="right">240</td><td style="border:1px solid saddlebrown;" align="right">549</td><td style="border:1px solid saddlebrown;" align="right">274</td><td style="border:1px solid saddlebrown;" align="right">147</td><td style="border:1px solid saddlebrown;" align="right">69</td></tr>
<tr><td style="border:1px solid saddlebrown;">BAKKEN</td><td style="border:1px solid saddlebrown;" align="right">1-2014</td><td style="border:1px solid saddlebrown;" align="right">17</td><td style="border:1px solid saddlebrown;" align="right">609</td><td style="border:1px solid saddlebrown;" align="right">469</td><td style="border:1px solid saddlebrown;" align="right">998</td><td style="border:1px solid saddlebrown;" align="right">604</td><td style="border:1px solid saddlebrown;" align="right">283</td><td style="border:1px solid saddlebrown;" align="right">161</td></tr>
<tr><td style="border:1px solid saddlebrown;">BAKKEN</td><td style="border:1px solid saddlebrown;" align="right">12-2013</td><td style="border:1px solid saddlebrown;" align="right">26</td><td style="border:1px solid saddlebrown;" align="right">927</td><td style="border:1px solid saddlebrown;" align="right">1453</td><td style="border:1px solid saddlebrown;" align="right">1370</td><td style="border:1px solid saddlebrown;" align="right">1190</td><td style="border:1px solid saddlebrown;" align="right">558</td><td style="border:1px solid saddlebrown;" align="right">382</td></tr>
<tr><td style="border:1px solid saddlebrown;">BAKKEN</td><td style="border:1px solid saddlebrown;" align="right">11-2013</td><td style="border:1px solid saddlebrown;" align="right">25</td><td style="border:1px solid saddlebrown;" align="right">980</td><td style="border:1px solid saddlebrown;" align="right">651</td><td style="border:1px solid saddlebrown;" align="right">1543</td><td style="border:1px solid saddlebrown;" align="right">1145</td><td style="border:1px solid saddlebrown;" align="right">660</td><td style="border:1px solid saddlebrown;" align="right">245</td></tr>
<tr><td style="border:1px solid saddlebrown;">BAKKEN</td><td style="border:1px solid saddlebrown;" align="right">10-2013</td><td style="border:1px solid saddlebrown;" align="right">31</td><td style="border:1px solid saddlebrown;" align="right">1125</td><td style="border:1px solid saddlebrown;" align="right">1181</td><td style="border:1px solid saddlebrown;" align="right">1049</td><td style="border:1px solid saddlebrown;" align="right">1335</td><td style="border:1px solid saddlebrown;" align="right">818</td><td style="border:1px solid saddlebrown;" align="right">246</td></tr>
<tr><td style="border:1px solid saddlebrown;">BAKKEN</td><td style="border:1px solid saddlebrown;" align="right">9-2013</td><td style="border:1px solid saddlebrown;" align="right">29</td><td style="border:1px solid saddlebrown;" align="right">1177</td><td style="border:1px solid saddlebrown;" align="right">1182</td><td style="border:1px solid saddlebrown;" align="right">1213</td><td style="border:1px solid saddlebrown;" align="right">1347</td><td style="border:1px solid saddlebrown;" align="right">1059</td><td style="border:1px solid saddlebrown;" align="right">0</td></tr>
<tr><td style="border:1px solid saddlebrown;">BAKKEN</td><td style="border:1px solid saddlebrown;" align="right">8-2013</td><td style="border:1px solid saddlebrown;" align="right">31</td><td style="border:1px solid saddlebrown;" align="right">1409</td><td style="border:1px solid saddlebrown;" align="right">1378</td><td style="border:1px solid saddlebrown;" align="right">1534</td><td style="border:1px solid saddlebrown;" align="right">1315</td><td style="border:1px solid saddlebrown;" align="right">126</td><td style="border:1px solid saddlebrown;" align="right">899</td></tr>
<tr><td style="border:1px solid saddlebrown;">BAKKEN</td><td style="border:1px solid saddlebrown;" align="right">7-2013</td><td style="border:1px solid saddlebrown;" align="right">29</td><td style="border:1px solid saddlebrown;" align="right">1378</td><td style="border:1px solid saddlebrown;" align="right">1582</td><td style="border:1px solid saddlebrown;" align="right">1531</td><td style="border:1px solid saddlebrown;" align="right">1247</td><td style="border:1px solid saddlebrown;" align="right">0</td><td style="border:1px solid saddlebrown;" align="right">688</td></tr>
<tr><td style="border:1px solid saddlebrown;">BAKKEN</td><td style="border:1px solid saddlebrown;" align="right">6-2013</td><td style="border:1px solid saddlebrown;" align="right">30</td><td style="border:1px solid saddlebrown;" align="right">1864</td><td style="border:1px solid saddlebrown;" align="right">2063</td><td style="border:1px solid saddlebrown;" align="right">2387</td><td style="border:1px solid saddlebrown;" align="right">2073</td><td style="border:1px solid saddlebrown;" align="right">0</td><td style="border:1px solid saddlebrown;" align="right">959</td></tr>
<tr><td style="border:1px solid saddlebrown;">BAKKEN</td><td style="border:1px solid saddlebrown;" align="right">5-2013</td><td style="border:1px solid saddlebrown;" align="right">24</td><td style="border:1px solid saddlebrown;" align="right">1732</td><td style="border:1px solid saddlebrown;" align="right">1587</td><td style="border:1px solid saddlebrown;" align="right">2809</td><td style="border:1px solid saddlebrown;" align="right">1738</td><td style="border:1px solid saddlebrown;" align="right">0</td><td style="border:1px solid saddlebrown;" align="right">937</td></tr>
<tr><td style="border:1px solid saddlebrown;">BAKKEN</td><td style="border:1px solid saddlebrown;" align="right">4-2013</td><td style="border:1px solid saddlebrown;" align="right">30</td><td style="border:1px solid saddlebrown;" align="right">2184</td><td style="border:1px solid saddlebrown;" align="right">2071</td><td style="border:1px solid saddlebrown;" align="right">2448</td><td style="border:1px solid saddlebrown;" align="right">2008</td><td style="border:1px solid saddlebrown;" align="right">0</td><td style="border:1px solid saddlebrown;" align="right">851</td></tr>
<tr><td style="border:1px solid saddlebrown;">BAKKEN</td><td style="border:1px solid saddlebrown;" align="right">3-2013</td><td style="border:1px solid saddlebrown;" align="right">15</td><td style="border:1px solid saddlebrown;" align="right">1075</td><td style="border:1px solid saddlebrown;" align="right">1096</td><td style="border:1px solid saddlebrown;" align="right">1795</td><td style="border:1px solid saddlebrown;" align="right">1306</td><td style="border:1px solid saddlebrown;" align="right">0</td><td style="border:1px solid saddlebrown;" align="right">759</td></tr>
<tr><td style="border:1px solid saddlebrown;">BAKKEN</td><td style="border:1px solid saddlebrown;" align="right">2-2013</td><td style="border:1px solid saddlebrown;" align="right">28</td><td style="border:1px solid saddlebrown;" align="right">2786</td><td style="border:1px solid saddlebrown;" align="right">2955</td><td style="border:1px solid saddlebrown;" align="right">2119</td><td style="border:1px solid saddlebrown;" align="right">2754</td><td style="border:1px solid saddlebrown;" align="right">0</td><td style="border:1px solid saddlebrown;" align="right">1673</td></tr>
<tr><td style="border:1px solid saddlebrown;">BAKKEN</td><td style="border:1px solid saddlebrown;" align="right">1-2013</td><td style="border:1px solid saddlebrown;" align="right">22</td><td style="border:1px solid saddlebrown;" align="right">2831</td><td style="border:1px solid saddlebrown;" align="right">2261</td><td style="border:1px solid saddlebrown;" align="right">3278</td><td style="border:1px solid saddlebrown;" align="right">3404</td><td style="border:1px solid saddlebrown;" align="right">0</td><td style="border:1px solid saddlebrown;" align="right">2208</td></tr>
<tr><td style="border:1px solid saddlebrown;">BAKKEN</td><td style="border:1px solid saddlebrown;" align="right">12-2012</td><td style="border:1px solid saddlebrown;" align="right">26</td><td style="border:1px solid saddlebrown;" align="right">3017</td><td style="border:1px solid saddlebrown;" align="right">3358</td><td style="border:1px solid saddlebrown;" align="right">3137</td><td style="border:1px solid saddlebrown;" align="right">3729</td><td style="border:1px solid saddlebrown;" align="right">0</td><td style="border:1px solid saddlebrown;" align="right">2639</td></tr>
<tr><td style="border:1px solid saddlebrown;">BAKKEN</td><td style="border:1px solid saddlebrown;" align="right">11-2012</td><td style="border:1px solid saddlebrown;" align="right">30</td><td style="border:1px solid saddlebrown;" align="right">5156</td><td style="border:1px solid saddlebrown;" align="right">5015</td><td style="border:1px solid saddlebrown;" align="right">4955</td><td style="border:1px solid saddlebrown;" align="right">5099</td><td style="border:1px solid saddlebrown;" align="right">0</td><td style="border:1px solid saddlebrown;" align="right">3942</td></tr>
<tr><td style="border:1px solid saddlebrown;">BAKKEN</td><td style="border:1px solid saddlebrown;" align="right">10-2012</td><td style="border:1px solid saddlebrown;" align="right">30</td><td style="border:1px solid saddlebrown;" align="right">8127</td><td style="border:1px solid saddlebrown;" align="right">7743</td><td style="border:1px solid saddlebrown;" align="right">11322</td><td style="border:1px solid saddlebrown;" align="right">8267</td><td style="border:1px solid saddlebrown;" align="right">0</td><td style="border:1px solid saddlebrown;" align="right">7390</td></tr>
</table></div>
</td>
</tr>
</table>
<p align="center"><font size="-1">[<a href="/default.asp">DMR Home</a>] [<a href="/oilgas/disclaimer.asp">Disclaimer</a>] [<a href="/oilgas/privacy.asp">Privacy</a>] [<a href="/oilgas/security.asp">Security</a>] [<a href="/oilgas/feeservices/feedback.asp">Feedback</a>] [<a href="/oilgas/feeservices/myaccount.asp">My Account Information</a>]</font></p>
</body>
</html>
检索油井生产数据
梅努巴先生{
宽度：155px；
字体：10px verdana，无衬线；
}
menuBtn先生{
宽度：100%；
}
梅努海德先生{
背景色：#FFFF00；
填充：1px；
保证金：1px；
字体大小：较大；
字体大小：粗体；
文本对齐：居中；
}
$（函数（）{
$（“#premiumServiceBtn”）.button（）。单击（函数（）{location.href='../subscriptionservice.asp'；}）；
$（“#Scoutticketbttn”）.button（）。单击（函数（）{location.href='getscoutticket.asp'；}）；
$（“#digImgLogsBtn”）.button（）。单击（函数（）{location.href='getlogs.asp'；}）；
$（“#fieldProdBtn”）.button（）。单击（函数（）{location.href='fieldprodinj.asp'；}）；
$（“#launchIMSWellBBtn”）.button（）.click（function（）{location.href='javascript:launchimsusubwell（“22809”）；；$（#getWellFileBBtn”）.button（）.click（function（）{location.href='/oilgas/FeeServices/wfiles/22/W22809.pdf'；}）；
});
[][]
相关链接
优质服务
球探票证数据
数字和图像日志
现场生产
绘制这张油井图
获取油井生产历史数据
输入文件编号：
NDIC文件编号：22809 ；API编号：33-023-00836-00-00 ；CTB编号：122809
井型：OG ；油井状态：A ；状态日期：10/5/2012 ；井筒类型：水平
地点：西北15-163-99 ；足迹：298 FNL 1998 FEL和#xa0 ；纬度：48.951490 ；经度：-103.516702
当前操作员：参孙资源公司
当前井名：巴哈1522-04TFH
立面图 ；2117kb ；2097 GR和#xa0 ；2091德国劳埃德船级社 ；总深度：17485 ；字段：
开钻日期： ；2012年7月9日
套管柱：9.625“1528”和#xa0；和#xa0；7“8304”和#xa0
完工数据
；游泳池：BAKKEN ；性能：8304-17485 ；薪酬：10/5/2012 ；状态：AL ；日期：2012年10月22日 ；间距：2秒
累积生产数据
；游泳池：BAKKEN ；立方米油：37552和#xa0 ；立方米MCF气体：39854和#xa0 ；立方米水：44995和#xa0 ；[]
[]
生产测试数据
；IP测试日期：2012年10月22日 ；游泳池：BAKKEN ；中压油：315和xa0 ；IP MCF:308和#xa0 ；IP水：364
月度生产数据
PoolDatesSBBLs油路SBBLs水MCF产品MCF溶剂/火炬
BAKKEN4-2014326408616110
BAKKEN3-201422790250958958652100
BAKKEN2-2014735924054927414769
BAKKEN1-201417609469998604283161
BAKKEN12-201326927145313701190558382
BAKKEN11-201325980651115431145660245
BAKKEN10-201331112518110491335818246
BAKKEN9-2013291177118213134710590
BAKKEN8-2013311409137815341315126899
BAKKEN7-20132913781582153112470688
BAKKEN6-20133018642063238720730959
BAKKEN5-20132417321587280917380937
BAKKEN4-2013302842071244820080851
BAKKEN3-20131510751096179513060759
BAKKEN2-201328278629552119275401673
BAKKEN1-20132223122613278340402208
BAKKEN12-201226301733583137372902639
BAKKEN11-201230515650154955509903942
BAKKEN10-2012308127774311322826707390
[]
我已经能够使用上面的宏将表格拉入excel，但我很难想出如何创建一个循环，在给定标识符列表（附在url末尾的数字）的情况下多次重复此过程，并为每个页面创建一个新工作簿<强> 1 < /强>从长远来看，你应该考虑在堆栈溢出问题中推荐阅读一本书或跟随一个论坛。 2Excel VBA=Excel对象模型（砖块）+Visual Basic for Applications（胶水） 为了成功地操纵Excel对象模型，您必须知道如何在一般情况下使用（创建循环、使用数组、连接字符串等） 在众多可用的“Excel VBA教程”中，似乎提供了快速介绍，并提供了许多可复制/粘贴的代码片段 3对于更复杂的web表（如多页、密码保护、需要特殊按钮单击等），您可以找到适用于浏览器自动化工具的有用VBA映射
在Visual Basic编辑器中按F1键并将光标放置在t上