我有一个“大型”SQL查询(大约200行).
dim query as string
query = "..................................." & _
"..................................." & _
.... Like a lot lines later...
"..................................."
function query,"sheet 1"
当我这样做时,Excel会说“行的延续太多了”。
避免这种情况的最好方法是什么?
发布于 2018-07-02 18:18:37
只有一种方法-使用更少的延续性。
这可以通过将更多的文本放在一行或使用以不同方式表示的级联来实现:
query = ".........."
query = query & ".........."
query = query & ".........."
但是最好的方法是从外部源加载文本,作为一个整体。
发布于 2018-07-02 19:09:37
到目前为止我发现了这个.。
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
https://stackoverflow.com/questions/-100000374
复制相似问题