helenrm4rvs1@outlook.com

期刊論文翻譯
Selection.Find.Execute Replace:=wdReplaceAll

在word中的檢視-巨集-檢視巨集-將巨集取名字(或不改也OK)按編纂，將以下程式複製到Sub 巨集名稱() ……End Sub() 中心
End With
Selection.Find.ClearFormatting
將word，轉換好的東西，擺到Excel表格上，再複製內容到notepad上，Ta.La...呼~~~~，總算搞定啦~

word vs notepad 換行戰記(添加)

此次小米要跟大師分享的是Word與記事本(NotePad)--換行問題
 
因為小米迷電子書，所以會下載一些網路分享的.TXT，花樣文本電子書來看
(看.PDF，格式有點不是很便利，對於kindle來講，字體沒像ipad那樣可隨便變動，有點惋惜翻譯)
 
有時辰下載下來的檔案，看起來因沒有分段，一路到底，儘管有空格，逗點符號等區分句子跟場景。但是，終究不像段落那樣，給人看了有中段歇息的Fu~。
感受會是一大片文字海~，有溺斃的梗塞感~。像如許:

 
<若文章是用換行符號來做固定段落樣式的，想要去除換行的大大請看本文末段>

是以想行使word，的巨集指令加入換行號令，
問題來了......!!!
起首是，word換行指令是啥?
操縱錄製巨集指令體例，小米錄到word換行時，是用"Selection.TypeParagraph"這個敕令行。可是，小米依樣放入庖代命令時，word不給帳翻譯
 
所以小米起頭睜開爬文動作，恩，有看到"^p"是word換行指令，行欠亨!!
後來找到chr(10)，也不成，最後是chr(13)，搞定~。
 
十分困難，讓word，乖乖將轉出的文字內容換行了，小米迫不及待地將內容拷貝複製到notepad，上。
唉~，竟然照舊故天成翻譯公司，，還是不異狀態，一片字海，Orz.......|||
 
問題浪再度襲來......Orz.!!!
翻譯

將上面的所有可取代的再次統統用上，照樣一樣，因為notepad本身是很"純真"的文字顯示。輸入的，"n"或^13或其他換行字符都邑被乖乖原字顯現。
繞了一大圈，讓小米學了很多，固然有些用不大到。
(過去小米都利用notepad的這個純真的出現，將一些有參雜字型表格等設定複雜內容的工具，直接複製到notepad裡面，可以很快速地獲得所需文字，不必再去刪減點竄那些設定的動作，就因為它很單純，結果......此刻它太純真啦!!!，Orz....)



Selection.Find.Replacement.ClearFormatting

.Replacement.Text = Chr(13) + "　　" '這段是要將上行指令找到的空格取代成換行並加入分段的空格
.Forward = True




弄了老半天，以後....，小米忽然靈光一閃，呵呵
至於要將文字內容裡的不需要的換行部門砍掉的話，就簡單多了翻譯只要將文章複製到word裡面,行使word的取代號令-更多(M)-底下的指定體式格局(E)選段落標志(P)-

取代 就搞定了~不過要注意的是:若原文章沒有在段落部門留空格的話~ 哪可就是真真正正的文字海喔~ 當心