我正在尝试制作一个excel宏,它将在Excel中提供以下功能:
=SQL("SELECT heading_1 FROM Table1 WHERE heading_2='foo'")
允许我使用SQL查询在我的工作簿表中搜索(甚至可能插入)数据.
这是我到目前为止所做的:
Sub SQL()
Dim cn As ADODB.Connection
Dim rs As ADODB.Recordset
strFile = ThisWorkbook.FullName
strCon = "Provider=Microsoft.ACE.OLEDB.12.0;Data Source=" & strFile _
& ";Extended Properties=""Excel 12.0;HDR=Yes;IMEX=1"";"
Set cn = CreateObject("ADODB.Connection")
Set rs = CreateObject("ADODB.Recordset")
cn.Open strCon
strSQL = "SELECT * FROM [Sheet1$A1:G3]"
rs.Open strSQL, cn
Debug.Print rs.GetString
End Sub
我的脚本就像一个带有硬编码范围的魅力,例如上面代码段中的那个.它也适用于静态命名范围.
但是,它不适用于动态命名范围或TABLE NAMES,这对我来说是最重要的.
我找到答案的最接近的是这个遭受同样痛苦的人:http://www.ozgrid.com/forum/showthread.php？t = 72973
帮助任何人？
编辑
到目前为止我已经煮熟了,然后我可以在我的SQL查询中使用结果名称.限制是我需要知道表格在哪张纸上.我们可以做些什么吗？
Function getAddress()
myAddress = Replace(Sheets("Sheet1").Range("Table1").address, "$", "")
myAddress = "[Sheet1$" & myAddress & …我需要定期将html页面作为独立的.html文件发送到客户端,没有外部依赖项.原始页面是用node.js和express完成的,它们包含几个库,如High Charts.到目前为止,我手动完成了准备,其中包括:
结果是一个.html文件,可以在没有互联网连接的情况下打开,看起来就像原始文件一样.
有没有自动执行此操作的工具？如果没有,也许我会在Python中自己编写代码.你对此有什么建议吗？
谢谢