Excel宏 - 太多的连接行

Question

我有一个“大”的SQL查询（如200线）...

dim query as string 
query = "..................................." & _ 
     "..................................." & _ 
      .... Like a lot lines later... 
     "..................................." 

function query,"sheet 1" 

当我这样做，Excel中说，“太多的行延续。”

避免这种情况的最佳方法是什么？

Answer 1

只有一种方法 - 使用较少延续。

这可以通过将更多的文字上线或通过使用级联来完成不同的表达：

query = ".........." 
query = query & ".........." 
query = query & ".........." 

但最好是从外部源加载文本，作为一个整体。

Answer 2

到目前为止，我发现这个...

Call AddToArray(query, "...") 
Call AddToArray(query, "...") 
... a lot lines later... 
Call AddToArray(query, "...") 

*编辑：忘了补充：

Sub AddToArray(myArray As Variant, arrayElement As Variant) 

If Not IsArrayInitialized(myArray) Then 
    ReDim myArray(0) 
    myArray(0) = arrayElement 
Else 
    ReDim Preserve myArray(UBound(myArray) + 1) 
    myArray(UBound(myArray)) = arrayElement 
End If 

End Sub 

来源：link text X（三江源

（仍在等待更好的方法要做到这一点...）谢谢你：P

Answer 3

将查询分为几个部分：

query = _ 
    "............" & _ 
    "............" & _ 
    "............" 
query = query & _ 
    "............" & _ 
    "............" & _ 
    "............" 
query = query & _ 
    "............" & _ 
    "............" & _ 
    "............"