返回列表 上一主題 發帖

[發問] 文字串接 麻煩前輩了

本帖最後由 n7822123 於 2020-4-7 12:00 編輯

回復 1# eric7765
  1. Sub Test()
  2. Dim Arr
  3. Arr = Range([A1], [A1].End(4))
  4. [B1] = Join(Application.Transpose(Arr), "OR")
  5. End Sub
複製代碼
程式是依需求寫的,需求表達不清楚
或者沒有上傳附件,愛莫能助

TOP

        靜思自在 : 信心、毅力、勇氣三者具備,則天下沒有做不成的事。
返回列表 上一主題