標題: 如何截取空格前文字 [打印本頁]

---

作者: s7659109    時間: 2018-8-13 14:24     標題: 如何截取空格前文字

原始資料同一儲存格三列日期有enter,如何取出放至右邊三欄

---

作者: 准提部林    時間: 2018-8-13 17:12

=TRIM(MID(SUBSTITUTE($B2,CHAR(10),REPT(" ",99)),COLUMN(A$1)*99-98,99))

固定8位數字:
=MID($B2,COLUMN(A$1)*9-8,8)

---

作者: naruto018    時間: 2018-8-13 17:16

回復 1# s7659109


    在資料剖析，分隔符號->其他->輸入Ctrl+J或ALT+10鍵
代表換行，但不換顯現字元

---

作者: a5007185    時間: 2018-8-13 17:20

回復 1# s7659109

請參考

1. Sub Dismantling()
   
2.     Dim PT As Range, ArrPT, Str, C%
   
3.     Set PT = Range("B2")
   
4.     ArrPT = Split(PT, Chr(10))
   
5.     C = 3
   
6.     For Each Str In ArrPT
   
7.         If Str <> "" Then PT.Offset(0, C) = Str: C = C + 1
   
8.     Next
   
9. End Sub

複製代碼

[attach]29209[/attach]

---

歡迎光臨 麻辣家族討論版版 (http://forum.twbts.com/)