条件表达式二进制与整数中的数据类型不匹配 VBA
Data Type Mismatch in Criteria Expression Binary to Integer VBA
我正在编写一个 Excel 宏，它可以与现有的 Access 数据库一起使用。我 运行 中的一些查询需要用户输入他们从 table 中删除了哪些用户，但看到每次数字都是相同的，我宁愿在宏的开头并在我的 SQL 语句中使用该变量。该数字代表一年中的四分之一。所以它要么是 1,2,3 要么 4 我可以从用户那里捕获它，但是当我尝试在 SQL 语句中使用变量时，我得到 "Data Type Mismatch in Criteria error"
这是我正在尝试的：
Dim Qrtnum As Integer
Qrtnum = Application.InputBox("Enter Quarter to Sample")
sql1 = "DELETE SampledEmailAddressesByQuarter.*, SampledEmailAddressesByQuarter.Quarter FROM SampledEmailAddressesByQuarter WHERE SampledEmailAddressesByQuarter.Quarter = "
appAccess.DoCmd.RunSQL sql1 & Qrtnum
现在，在我数据库的 table 中，数据类型列为 "Binary"，我正在尝试将一个 Int 变量传递到我的 SQL，这可能是问题所在？或者我有一个 Int 与我的 SQL 字符串连接的事实？
如有任何帮助，我们将不胜感激。
有点逃避答案，但功劳应该归功于@HansUp。最后，我将字段的数据类型转换为数字，并设法复制了之后的所有数据。我的代码现在工作正常，它没有尝试处理二进制数据类型。仍然有兴趣知道我将如何处理这个问题。感谢大家的帮助。
我正在编写一个 Excel 宏，它可以与现有的 Access 数据库一起使用。我 运行 中的一些查询需要用户输入他们从 table 中删除了哪些用户，但看到每次数字都是相同的，我宁愿在宏的开头并在我的 SQL 语句中使用该变量。该数字代表一年中的四分之一。所以它要么是 1,2,3 要么 4 我可以从用户那里捕获它，但是当我尝试在 SQL 语句中使用变量时，我得到 "Data Type Mismatch in Criteria error"
这是我正在尝试的：
Dim Qrtnum As Integer
Qrtnum = Application.InputBox("Enter Quarter to Sample")
sql1 = "DELETE SampledEmailAddressesByQuarter.*, SampledEmailAddressesByQuarter.Quarter FROM SampledEmailAddressesByQuarter WHERE SampledEmailAddressesByQuarter.Quarter = "
appAccess.DoCmd.RunSQL sql1 & Qrtnum
现在，在我数据库的 table 中，数据类型列为 "Binary"，我正在尝试将一个 Int 变量传递到我的 SQL，这可能是问题所在？或者我有一个 Int 与我的 SQL 字符串连接的事实？
如有任何帮助，我们将不胜感激。
有点逃避答案，但功劳应该归功于@HansUp。最后，我将字段的数据类型转换为数字，并设法复制了之后的所有数据。我的代码现在工作正常，它没有尝试处理二进制数据类型。仍然有兴趣知道我将如何处理这个问题。感谢大家的帮助。