標題: [發問] 資料剖析有辦法找出換行資料嗎 [打印本頁]

---

作者: blue2263    時間: 2018-4-4 07:57     標題: 資料剖析有辦法找出換行資料嗎

請教大大
假設字串內容有換行共二列,用EXCEL資料剖析功能,有辦法找出換行位置,將資料分開到兩個儲存格內嗎?
如果資料剖析沒辦法,請教要如用VBA找出換行位置?

---

作者: ikboy    時間: 2018-4-4 09:31

正則 \n 可以找出換行，但從(資料\取得外部資料-從文字檔)匯入文檔像是已經可以做到。

---

作者: blue2263    時間: 2018-4-4 15:29

請教ikboy大大(正則 \n 可以找出換行)是什麼意思?

---

作者: ikboy    時間: 2018-4-4 15:44

正則所涉及知識較為廣，樓主可以在此了解多點 https://docs.microsoft.com/en-us/dotnet/standard/base-types/regular-expression-language-quick-reference

---

作者: blue2263    時間: 2018-4-4 16:16

回復 4# ikboy

ikboy大大,英文我不行看不懂,大大指的/N,是用在VBA程式碼上嗎?
請教可以用FIND函數找出換行位置嗎?
不好意思,還請大大幫忙謝謝!!

---

作者: blue2263    時間: 2018-4-4 16:35

回復 4# ikboy

我在下面連結找到解答了
http://www.how01.com/post_1m6ZK92eG5Zzw.html

函數CHAR(10)就代表電腦字元集, 換行
只要用函數FIND(CHAR(10),D2)就可找到換行位罝

---

作者: blue2263    時間: 2018-4-5 06:51

補充說明
用在VBA上 Chr(10)代表換行
次數 = Len(strMsg) - Len(Replace(strMsg, Chr(10), ""))  '找某字在字串出現次數

---

作者: GBKEE    時間: 2018-4-5 10:51

回復 7# blue2263

1. Option Explicit
   
2. Sub EX()
   
3.     Dim Str As String, Ar As Variant, i As Integer
   
4.     Str = "aaa" & Chr(10) & "bbbbb" & Chr(10) & "ccccc"
   
5.     Ar = Split(Str, vbLf)
   
6.     'Ar = Split(Str, Chr(10)) 'Chr(10) 同 vbLf
   
7.     For i = 0 To UBound(Ar)
   
8.         Cells(i + 1, "A") = Ar(i)
   
9.     Next
   
10. End Sub

複製代碼

---

作者: 准提部林    時間: 2018-4-6 12:55

資料剖析, 選[其它]字元:
OtherChar :=Chr(10)

手動方式:
1.選取[其它]字元
2.按位Alt不放, 用[數字鍵]輸入10, 放開Alt
3.確定--完成

---

作者: hcm19522    時間: 2018-4-7 10:31

http://blog.xuite.net/hcm19522/twblog/574957874

---

作者: ccp    時間: 2018-4-11 14:34

好實用的技巧,謝謝分享~

---

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