VBA SQL insert into多行记录至Excel表

north00

请教高手：


如何一次性向目的Excel表使用Insert Into语句插入多行记录？在网上搜到有用数组表达的，尝试了一下始终不对，用for循环频繁写入感觉太傻，请高手支个招，谢谢！


插入单行记录如下句所示，且str1, str2为字符串，date1为日期型数据：

SQL="Insert Into [Sheet1$] (字段1,字段2,字段3) Values('" & str1 & "',#" & date1 & "#,'" & str2 & "')"

thanks.

WANT-T

SQL="Insert Into [Sheet1$] (字段1,字段2,字段3) " & " SELECT 字段1,字段2,字段3 FROM TABLE WHERE 条件"

north00

WANT-T 发表于 2023-2-16 14:16
SQL="Insert Into [Sheet1$] (字段1,字段2,字段3) " & " SELECT 字段1,字段2,字段3 FROM TABLE WHERE 条件"

这个Table是VBA代码所在的工作表，如[Sheet2$]，那该如何写呢？另外，后半句能否用数组带进去？因为，我先需要在[Sheet2$]中多条件查找到合适的行后才能insert into到目的工作表中。

谢谢了~

WANT-T

north00 发表于 2023-2-16 15:07
这个Table是VBA代码所在的工作表，如[Sheet2$]，那该如何写呢？另外，后半句能否用数组带进去？因为，我 ...

你查哪个表就是哪个表，sql语句就是一个字符串，只要语法没有问题，怎么拼接是你的事

WANT-T

north00 发表于 2023-2-16 15:07
这个Table是VBA代码所在的工作表，如[Sheet2$]，那该如何写呢？另外，后半句能否用数组带进去？因为，我 ...