Question

我试图将部件信息从SQL调用到Excel。当用户输入部件号时，Excel将查询SQL数据库并检索有关部件的详细信息（价格，描述等）。

我能够导入数据，并使用vlookup来获取值，但是导入非常大。

Web中有一些VB脚本会将数据直接从SQL数据库中提取到单元格中，但Excel 2013中这些脚本已经过时了。

我使用SQL的以下语句来提取表中的所有数据：

SELECT 
   PartNum,
   PartDescription,
   UnitPrice
   FROM erp.Part

理想情况下，想要一个只询问特定部分的脚本，使用WHERE PartNum = part 并连续返回请求的数据。

提前感谢您提供任何信息/帮助。

Answer 1

你的问题充其量是模糊的，你甚至没有提供你尝试过的代码。这是excel vba脚本的基本sql

Sub TrackerInput()
    Dim db As DAO.Database
    Dim rs As DAO.Recordset

    Set db = DBEngine.OpenDatabase("pathtoyourfilewhichmightneedotincludecredentialsGoogelitforyourself")

    Dim vAr$
    vAr = "your input of choice" '.ie part number you were suggesting

    Set rs = db.OpenRecordSet("SELECT PartNum, PartDescription, UnitPrice FROM erp.Part WHERE PartNum=" & vAr & ";")
    TheLocationWhereYouWantTheDataReturned.CopyFromRecordset rs

End Sub

您的参考资料需要设置为OBV

Answer 2

通过递交我的辞职来解决，显然我太愚蠢或者不知道如何做得足以完成这项工作。跟随我的激情，在海滩上卖伞。

通过Excel 2013在SQL中查找值

2 个答案: