我正在嘗試創建一個將自己的內容分成多行的函式。我需要創建一個自定義的，因為我將對其進行更多操作，所以我不能使用像or之類的內置函式。CONCATENATETEXTJOIN
我的代碼：
Public Function Description(formula As String) As String
arr = Split(formula, ";")
For Each Item In arr
arr2 = Split(Item, ":")
Description = Description & "Row " & arr2(0) & " Item " & arr2(1) & vbNewLine
Next
我在一個單元格中使用它，=Description(string)其中string有一個單行文本，例如：
2:1;3:2;4:5
它應該回傳：
Row 2 Item 1
Row 3 Item 2
Row 4 Item 5
相反，它回傳：
Row 2 Item 1Row 3 Item 2Row 4 Item 5
我嘗試使用vbNewLine, vbCrLf, vbCr, vbLf, Char(10)and Char(13)，但沒有任何效果。
有人知道這個問題的解決方法嗎？
截屏：
uj5u.com熱心網友回復：
使用vbLf-character（似乎vbNewline也可以）在 Excel 中換行。但是，您需要WrapText在單元格中設定屬性，否則文本將顯示為一行。
ActiveCell = "ABC" & vbLf & "XYZ"
ActiveCell.WrapText = True
轉載請註明出處，本文鏈接：https://www.uj5u.com/ruanti/429221.html
下一篇：如何在VBA中完成子程式？