2023年5月26日 星期五

word中用字元碼尋找字符

 

發現

  • 無法直接用十六進位 unicode尋找,不實用。
  •  ^unnnn 的 nnnn 是 unicode 字符的十進位數字碼(十六進位碼轉換),關閉萬用字元,u小寫。
    • Aha, it turns out that you have to enter the *decimal* value of the Unicode character, which Word's Symbol dialog provides only as hex. <sigh> And although Word's help quotes ^Unnnn, the capital U generates an error message. Luckily, you can use the Windows calculator to convert hex values to decimal.  https://microsoft.public.word.docmanagement.narkive.com/PLKbMqky/how-do-i-find-and-replace-bullet-symbols-not-style (WordMVP回答)


探索


(U+6210)

 6210(hex)→25104(十進位)

^u25104→可找到「成」


在尋找目標輸入「^u0034」

可只找到 "(U+0022),而不會同時找到「“」、「”」。

特殊碼尋找 "(U+0022)  


   "(U+0022)

 →尋找^u0034(ASCII(十進位)34, u小寫) 


   '(U+0027) 

→尋找^u0039(ASCII(十進位)39, u小寫)


  H(U+0048)

→^u0072 才找到 H(16進位 48=十進位 72)。


×(00D7), 乘號

^u00d7 找不到→不是十進位數字

^u00215, ^u0215, ^u215, 都可以找到「乘號」

「乘號」單獨混在一堆 "拉丁文-1 補充" 中

ÐÑÒÓÔÕÖרÙÚÛÜÝÞß (U+00D0~00DF)


nnnn 是由0~9組成的十進位數字

→只能找到 0255?→可找到全部

^u0255 找到 ÿ(U+00FF)

^u0256 找到 Ā(U+0100), ā(U+0101)

^u0257 找到 Ā(U+0100), ā(U+0101)

ĀāĂ㥹ĆćĈ, (U+0100)~(U+0108)


問題

  • 什麼情況用此招?知道unicode字元碼,但沒有字符?有字符就直接複製貼上去尋找。


參考資料

Unicode 字元 ^unnnn; 全形空格(U+3000, 12288)  ^u8195/u12288 vs 膕(U+8195); 半形空格 (U+0020, 32) ^32 or ^u8194 vs 膔(U+8194);

→8195, 8194找不到空格! 「^32/^u0032」可找到半形空格

8195 hex2003, em space; 8194 hex2002, en space

 

 十六進位轉換為十進位

00d7(hex) = 215(dec)

4EB(16) = 1259(10)
(4 * 162) + (14 * 161) + (11 * 160) = 1259(10)



#Unicode  #MS Word

2023年5月3日 星期三

字體回落

 

Font fallback deep dive

Raph Levien’s blog

Apr 4, 2019

  • Edge 中譯
  • 沒有一種字型可以覆蓋所有 Unicode,因此文本堆疊依賴於拼湊,每個拼湊都涵蓋腳本的某些子集。
  • 漢字統一是一個問題
  • 下面的示例中,文本是相同的 Unicode 。只有區域設置不同,字貌渲染結果就有差異。

Raph Levien’s blog

  • Performance considerations


小注:

  • 什麼地區用什麼地區字型
  • “字體回退” (Font fallback),即選擇字體來呈現任意文本字串。
  • 字型缺字時,如何選擇遞補字型→複合字型是選擇一


字谈字畅 202:大字小字落荧屏(podcast)

3 什麼是字体回落 

4 無處不在的回落

5 網頁設計的字体回落機制

6 表情符號與各種應用的回落機制



#Windows  #MS Word

2023年3月26日 星期日

語言學


語言癌不癌?

語言學家的看法(附「語言癌不癌」座談會台北場實況紀錄 DVD)


作者: 何萬順, 蔡維天, 張榮興, 徐嘉慧, 魏美瑤, 何德華  
出版社:聯經出版公司  
出版日期:2016/01/20
語言:繁體中文
定價:320元
電子書 優惠價208元

  • 語言潔癖
  • 語言偏執狂傾向→3個進一步探討議題
  1. 標準
  2. 溝通--調適性
  3. 身分認同
  • 沒有語言癌
  • 有效溝通的標準?
  • 美式英語標準
  1. 美國公共電視台 Do You Speak American | PBS https://www.pbs.org/speak/
  2. 標準的新聞英語。但不是制式的,也不是一成不變的。
  • 語言的多樣性有助個人風格及溝通
  • 註腳參照 (p43, note2) 和註腳文字 (p42) 不同頁。

語言之鑰

作者: 南方朔  
出版社:大田  
出版日期:2004/03/23
語言:繁體中文
定價:380元


  • 大田出版《語言是我們的居所》、《語言是我們的星圖》、《語言是我們的海洋》、《在語言的天空下》、《世紀末抒情》、《有光的所在》、《給自己一首詩》、《語言書是我們的希望》等豐富著作。
  • 在大田所出版的語言系列是南方朔針對語言研究的成果展現,內容豐富而博學精深,是人類思想與想像力結合的精闢之書。
  • 《語言之鑰》是這個系列的最後一本書,所謂「鑰」即是通往智慧大門的開端,集合所有語言的大成,是絕對不容錯過的語言寶典。


#語言

2023年3月1日 星期三

列出樣式的敘述文字 巨集

 


Sub 列出所有樣式的敘述文字_1A()

'作用:找出每一個styles, 將其description寫到文件最後


'ver

'     摘自 《WORD排版藝術》 VBA10-23

'       自訂樣式不論是否有使用皆會列出;預設樣式則會列出部份未使用

'   1A  增加說明


' 好像是列出可用樣式清單,不論有顯示或沒有顯示?可先刪不要者。

' styles數目是什麼?空白文件也顯示100多?



ActiveDocument.Paragraphs.Last.Range.InsertAfter (Chr(10) + "styles description: ")     '將資料標題寫到作用中文件最後


    'MsgBox Application.Styles.Count                            '原書程式

    'application下面沒有styles,改成Application.ActiveDocument. Application可省略

MsgBox ActiveDocument.Styles.Count             '顯示styles數目.


Dim nowStyle As Style

For Each nowStyle In ActiveDocument.Styles

    If nowStyle.InUse = True Then                           '使用中才成立,結果全部跑出來? InUse沒有作用

        ActiveDocument.Paragraphs.Last.Range.InsertAfter (Chr(10) + nowStyle.NameLocal)         '顯示結果在文件最後

        ActiveDocument.Paragraphs.Last.Range.InsertAfter (vbCr + "    " + nowStyle.Description)

    End If                                                  'vbCr=Chr(10)

Next


End Sub





#VBA    #MS Word

以未格式化文字貼上 巨集

 


Sub 以未格式化貼上文字()

'

' 以未格式化文字貼上 巨集

' 巨集錄製於 2012/11/28,錄製者 SMC

'

'

'作用

'    以「未格式化文字」及「inline」方式貼上

'    選擇性貼上_未格式化文字

'

'

    Selection.PasteSpecial Link:=False, DataType:=wdPasteText, Placement:= _

        wdInLine, DisplayAsIcon:=False

        '以「未格式化文字」貼上, 不以「貼上連結」貼上, 以「inline」方式貼上, 不以「以圖示顯示」貼上。

End Sub



注:「 _」指令太長換行連接符


#VBA    #MS Word

刪除書籤 巨集

 

Option Explicit        '強制變數需要在程式中宣告


Sub 刪除書籤2()

'

' 刪除書籤

' 巨集於 2012/9/27

'


Dim LoopNo As Integer

Dim i As Integer


LoopNo = ActiveDocument.Bookmarks.Count            '書籤數目

MsgBox "隱藏書籤不可打開"           '提示注意動作。

MsgBox "刪除書籤數量:" & LoopNo

For i = 1 To LoopNo

    ActiveDocument.Bookmarks(1).Delete       '刪除第1個位置書籤。

                             '索引編號代表書籤在 [書籤] 對話方塊中依字母順序排列的書籤清單內的位置。刪除列名第一個的書籤,直到所有書籤刪完。

Next


End Sub



問AI 解答--未測 →看起來可行。從第一筆書籤,依次往下刪除,直至無書籤。

以下是一個可以去除Word文件中所有書籤的巨集:


Sub RemoveBookmarks()

    Dim bm As Bookmark

    For Each bm In ActiveDocument.Bookmarks

        bm.Range.Delete

    Next bm

End Sub


使用方法:

打開你要去除書籤的Word文件

按下Alt + F11,打開VBA編輯器

點選Insert > Module,新增一個模組

複製上述的巨集程式碼到模組視窗中

按下F5或在編輯器中點選Run Sub/UserForm,執行巨集

執行完畢後,關閉VBA編輯器,你的書籤就被刪除了。

請注意,這個巨集將會刪除文件中所有的書籤,請確認您已經保存好文件,並且不會影響到您的其他內容。



#VBA    #MS Word   #AI

2023年2月16日 星期四

排版需求文書


目次

 中文排版需求

 日文排版需求

 藏文排版需求

 韓文排版需求


注:英文為主



中文排版需求

Requirements for Chinese Text Layout
中文排版需求
Latest published version: https://www.w3.org/TR/clreq/
Latest editor's draft: https://w3c.github.io/clreq/ (最新草稿)

摘要
本文書整理了中文(漢字)書寫系統於排版上的需求。一方面說明需求事項以明確描述中文排版之需求與問題;另一方面也提與既有標準(如萬國碼)的對應,冀求透過本文書能在實作層級更能有效地促進實現。

這一份文件:
  • 不是一份照做就對,不照做就錯的「排版規範」。
  • 不會提供具體的 CSS 範本,讓前端工程師可以直接使用。
  • 是整理中文書籍,也包括雜誌、報紙等排版規則的完整文件。
  • 是作為「印刷出版」與「數字出版」,於技術上接軌的文件。
  • 英、簡、繁語言對照