提示不是一个有效路径，这个应该如何调整

lmy945150 · 发表于 2022-11-26 23:04

Dim cnn As Object, rs As Object, SQL$

Set cnn = CreateObject("ADODB.Connection")
mypath = ThisWorkbook.Path & "\"
Filename = Dir(mypath & ThisWorkbook.Name)
cnn.Open "Provider = Microsoft.Ace.Oledb.12.0;Extended Properties =Excel 12.0;Data Source =" & mypath & "\" & Filename
SQL = "select * from [Excel 12.0;Database=" & mypath & Filename & "].[派车$b3:$t6]"
cnn.Execute SQL

sql立即窗口为"select * from [Excel 12.0;Database=C:\Users\Administrator\Desktop\派车系统2023.xlsm].[派车$b3:$t6]"
提示不是一个有效路径，这个应该如何调整

wanao2008 · 发表于 2022-11-27 07:08

本帖最后由 wanao2008 于 2022-11-27 07:11 编辑

楼下正解！

fzxba · 发表于 2022-11-27 07:33

派车$b3:$t6 是不是多了一美元

fzxba · 发表于 2022-11-27 07:42

wanao2008 发表于 2022-11-27 07:08
楼下正解！

厉害，预测大师……

lmy945150 · 发表于 2022-11-27 16:26

头脑发晕了

		自动登录	找回密码
密码			免费注册

[求助] 提示不是一个有效路径，这个应该如何调整

评分