-5

我正在构建一个本地 php 页面，以便在朋友的帮助下以 XML 格式从 Facebook 输出公共公司信息，我将创建一个 VBA 宏来网络爬网到该页面并将信息下载到我在 Excel 中的工作簿中。但是，公司名称的输入必须来自电子表格上的一个单元格，除了将其直接写入 PHP 文件之外，我不知道如何将其传递到我发送给 Graph API 的请求中。如何让 VBA 将电子表格单元格中的值（例如 A1=Hilton）传递给 PHP 以替换硬编码的公司名称，以便我可以将其用于任何公司？

要求说明：

  1. VBA 从单元格 A1 读取公司名称
  2. VBA 将公司名称作为变量发送到 PHP
  3. PHP 使用从 VBA 发送的公司名称发布到 Graph API
  4. VBA 宏爬取本地 PHP 页面并将 XML 输出下载到工作簿中
4

1 回答 1

1

您可以使用我在下面创建的 VBA 宏。在我的示例中，我将宏绑定到按钮单击

Sub Button1_Click()
    Set objHTTP = CreateObject("MSXML2.ServerXMLHTTP")
   URL = "http://www.yourdomain.com/page.php?variable=" & ActiveWorkbook.Worksheets(1).Range("A1").Value
   objHTTP.Open "GET", URL, False
   objHTTP.setRequestHeader "User-Agent", "Mozilla/4.0 (compatible; MSIE 6.0; Windows NT 5.0)"
   objHTTP.send ("")


End Sub

您服务器上的 PHP 脚本看起来像

<?php

$excelCellA1Value = $_GET["variable"];

//Work magic here such as posting to Facebook API

//TO DO: Profit!


?>
于 2013-02-27T03:11:34.250 回答