mysql - 使用 VBA 从 SQL 查询字符串中删除别名？

Question

我有一个 SQL 查询字符串。该字符串中有多个不同的数据列，全部来自同一个表。为了简单起见，这里有一个简短的示例:SELECT 'A'.'B', 'A'.'C', 'A'.'D'哪里'A'是别名。我的问题是:有没有办法使用 VBA 获取该查询字符串，并删除别名 'A' 的所有实例并仅返回数据列 'B', 'C', 'D' ？请不要提供完整的代码，我喜欢起点。我喜欢自己填写这些碎片。它有助于学习过程。

Answer 1

1. 恢复 QueryTable 下的 SQL，如下所示:

恢复 SQL:

Range("A1").Select 'Your query worksheet
With Selection.QueryTable
    queryText = .CommandText
End With

1. 然后将别名替换为 LEFT、RIGHT、INSTR 或 RegExp 对象(如果您想要学习一些有用的东西并快速使用 RegExp - 正则表达式)。如果您需要示例正则表达式，请在评论中告诉我。如果你想学习 VBA 中的正则表达式，我做了一个 tutorial here .

2. 替换查询并刷新查询表

替换并刷新查询

Range("A1").Select 'Your query worksheet
With Selection.QueryTable
    .CommandText = queryText
    .Refresh BackgroundQuery:=False
End With