Excel VBA用于解析SQL连接字符串

时间:2016-05-23 23:42:04

标签: sql excel vba connection-string oledb

我有一个使用连接字符串连接到SQL DB的Excel VBA,但我想知道是否可以从单元格解析连接字符串?例如,如果我在SQLSVR1\Instance1中的B2Databas1中的B3,我可以将其放入连接字符串中,如下所示:

objMyConn.ConnectionString = "Provider=sqloledb; Data Source=**"B2"**; Initial Catalog=**"B3"**; Integrated Security=SSPI;"

这可能吗?

提前致谢。

2 个答案:

答案 0 :(得分:2)

完全可能:

java $JAVA_ARGS $JAVA_OPTS -jar application.jar

这基本上将你的字符串与这些单元格中的值连接起来。

Range.Value个文件。

答案 1 :(得分:0)

是的,有可能提到 EoinS 。但请注意确定您的工作表。对于这种情况,您希望在另一个工作表上定义连接字符串。尝试这样的事情:

Dim wb as workbook, ws as worksheet

Set wb = Thisworkbook
Set ws = wb.Worksheets("TheNameofYourWorksheetsWithYourConnectionsDefined")

''Get Cnxn details
sDsn = wsc.Cells(wsc.Range("YourLabeloftheCell").Row + 1,   wsc.Range("YourLabeloftheCell").Column).Value
sUser = wsc.Cells(wsc.Range("YourLabeloftheCell").Row + 2, wsc.Range("YourLabeloftheCell").Column).Value
sPwd = wsc.Cells(wsc.Range("YourLabeloftheCell").Row + 3, wsc.Range("YourLabeloftheCell").Column).Value

sSql= GetRangeString(Worksheets("SQL").Range("A17:A22"))
check = DbSelectQueryToSheet(sDsn, "", sUser, sPwd, sSql, Worksheets("TargetWorksheet").Range("A1"), True)

希望,这有帮助!