我只想將大約 14900 行的 A 列分成 50 個集合，在 B 列的每一行保持 @ 作為分隔符。示例：12345@5432333@3232@... 直到 A 列的第 50 行。像那樣，我需要在 B 列的每一行中構建 50 組直到 A 列的行數（14900）。
我使用 =TEXTJOIN("@",TRUE,A1:A14900) 開發了相同的代碼，但這失敗了，可能是由于單個單元格中的長度問題。我的計劃是將這個公式的輸出分成 50 組，并將其放入 B 列的每一行。如果我使用回圈使公式動態然后我再次擔心單元格的長度
-------- --------
12345566 12345566@333344444@98ZBRE322@1ZAZAZAQQ...till 50th row
333344444 next 50 sets
98ZBRE322 next 50 sets
1ZAZAZAQQ next 50 sets
有沒有最好的方法來解決這個問題？
uj5u.com熱心網友回復：
連接范圍
Excel
在細胞B1使用中：
INDEX
=TEXTJOIN("@",TRUE,INDEX(A$1:A$14900,(ROW()-1)*298 1):INDEX(A$1:A$14900,ROW()*298))
OFFSET（易揮發的）
=TEXTJOIN("@",TRUE,OFFSET(A$1:A$298,(ROW()-1)*298,0))
并復制到 cell B50。
VBA
Sub ConcatSets()
With ActiveSheet.Range("B1:B50")
' INDEX
.Formula = "=TEXTJOIN(""@"",TRUE,INDEX(A$1:A$14900,(ROW()-1)*298 1):INDEX(A$1:A$14900,ROW()*298))"
' OFFSET (Volatile)
'.Formula = "=TEXTJOIN(""@"",TRUE,OFFSET($A$1:$A$298,(ROW()-1)*298,0))"
' To keep only values use the following:
'.Value = .Value
End With
End Sub
轉載請註明出處，本文鏈接：https://www.uj5u.com/ruanti/441752.html