沒有OFFICE的CONCAT功能365

Question

我有我的數據，就像在A1：A3的excel中一樣。

stack',' over',' flow','

反正有這個合併爲一個單元格？

我試過複製和粘貼到word和記事本++，但他們給我這些與他們之間的空白差距。我的想法是在SQL查詢中使用這些。

這裏的其他問題涉及多行VBA。 Concatenante不起作用如在現實中我使用了一個更大的範圍內，那麼A1：A3

Answer 1

如果你有CONCAT（）函數：

=CONCAT(A1:A3) 

如果不是：

= A1 & A2 & A3 

---

如果你沒有CONCAT，把這個UDF放在一個模塊中並使用上面描述的公式：

Function CONCAT(rng As Range) 
Dim rngArr As Variant 
Dim i As Long, j as long 
rngArr = rng.Value 
For i = LBound(rngArr, 1) To UBound(rngArr, 1) 
    For j = LBound(rngArr, 2) To UBound(rngArr, 2) 
     CONCAT = CONCAT & rngArr(i, j) 
    Next j 
Next i 
End Function