sql - 处理excel vba sql查询中的单引号

Question

我正在使用 excel sql 查询根据我在下拉框中所做的选择从后端获取数据。但是，在下拉框值中有单引号（'）的情况下，我的 sql 查询不起作用。例如——男装。请给我一个解决这个问题的方法

    SQL = "select Segment,Weeks,Value from [Category performance data$] where       Departments='" &       Sheet3.Range("Dept_name").Value & _
     "' and Metric ='Total Spend' group by Segment,Weeks,Value"
    Call execQry   

Answer 1

Departments='" & replace(Sheet3.Range("Dept_name").Value, "'", "''") & _ "' and Metric