在 Google Chat 訊息中傳送及分享檔案
https://support.google.com/chat/answer/7651457?hl=zh-Hant&co=GENIE.Platform%3DDesktop
你可以直接從電腦、行動裝置或 Google 雲端硬碟，將檔案附加至 Google Chat 訊息中 (檔案大小上限為 200 MB)。
[取自google chat help]
可視為寫論文操作 `入門以上`
用WORD寫論文，你不知道的密技
https://www.youtube.com/live/gQ7K2hSHqcg?feature=share
@harry_5689, 1 年前 (已編輯)
只是大略標一下而已，希望能幫助各位快速找到自己想聽的內容~
成(U+6210)
6210(hex)→25104(十進位)
^u25104→可找到「成」
在尋找目標輸入「^u0034」
可只找到 "(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 字元 ^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) |
Raph Levien’s blog
Apr 4, 2019
4 無處不在的回落
5 網頁設計的字体回落機制
6 表情符號與各種應用的回落機制
#Windows #MS Word
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
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
注：英文為主
鳩摩羅什大師在譯場翻譯佛典，必須先考慮譯經的基本條件：
第一是有無梵本原文！當時要有僧人帶來的梵本佛經，或有能背誦經文的人到來，才有原文開譯。
羅什對很多經文都很熟悉， 《出三藏記集》說羅什能背誦甚多佛典，所以不少經文原本就在羅什心中。
但《高僧傳》也記載了譯場，因缺乏原典而令譯事受阻，如：佛若多羅熟悉《十誦律》，他來到長安，姚興便請他誦出律典梵本，由羅什譯出，但才完成了三分之二，弗洛多羅便去世，譯事中斷，及至另一位西域僧人曇摩流支帶梵本來長安，才能完成工作。
第二是譯場即使有原文也不能隨便翻譯，還要看主譯者是否熟悉經文。
如湯用彤在《漢魏兩晉南北朝佛教史》中說：「 ⋯⋯古今譯書，風氣頗有不同。今日識外洋文字，未悉西人哲理，即可譯哲人名著。而深通西哲之學者，則不從事譯書。然古昔中國譯經之巨子，必須先即為佛學之大師。」
NMKT 微博 https://m.weibo.cn/status/4853870016858123
