kuu
2006-06-19, 11:20 PM
各位大家好:
小弟有一個WORD需要常用到上、下標
如CM^2→(^2需要改為上標)
或CH4 →(4需要改為下標)
有沒有辦法讓產生錄製巨集讓固定的字元自動改為上下標
瑤
贊助商連結
小弟有一個WORD需要常用到上、下標
如CM^2→(^2需要改為上標)
或CH4 →(4需要改為下標)
有沒有辦法讓產生錄製巨集讓固定的字元自動改為上下標
瑤
贊助商連結
贊助商連結 kuu 2006-06-19, 11:20 PM 各位大家好: 小弟有一個WORD需要常用到上、下標 如CM^2→(^2需要改為上標) 或CH4 →(4需要改為下標) 有沒有辦法讓產生錄製巨集讓固定的字元自動改為上下標 瑤 贊助商連結 mis339 2006-06-19, 11:29 PM 不曉得你有沒有玩過「取代」,裡面有「更多」,最下面可以選格式,你可以用它來變成上下標!會了嗎? kuu 2006-06-20, 12:09 AM 阿斌兄您好: 我試過用巨集就是不會出現上標耶 若直接以手動處理,就沒有問題! 但是我需要的是用巨集處理耶…請問 有沒有什麼辦法? 瑤 mis339 2006-06-20, 10:28 AM 把以下兩段程式加到你的巨集吧! Sub 上標() With Selection.Font .Superscript = True End With End Sub Sub 下標() With Selection.Font .Subscript = True End With End Sub DDSC 2006-06-20, 11:19 AM 巨集不是有錄製,就可很容易設成 HOT-KEY 方式,我都設成 ALT-1 上標,ALT-2下標, 打類似 1/4 這種的,一個上,一個下,比用ASCII好用,好看。 mis339 2006-06-20, 01:10 PM 用錄製的好處是簡單、方便、快速,但是會多很多不必要的程式碼! 所以我的做法是如果遇到不會的就先用錄製,再把不要的程式碼給刪掉! kuu 2006-06-20, 10:26 PM 阿斌兄您好: 我現在的問題是,要用取代的方式,將所以cm*2全部一次改為cm^2 但我希望作到的是cm2(2應為上標),我錄製的程式碼如下 請問要怎麼更改才能達到我的需求? 瑤 Sub 巨集20() ' ' 巨集20 巨集 ' 巨集錄製於 2006/6/20,錄製者 kuu ' Selection.Find.ClearFormatting Selection.Find.Replacement.ClearFormatting With Selection.Find .Text = "*2" .Replacement.Text = "^^2" .Forward = True .Wrap = wdFindContinue .Format = False .MatchCase = False .MatchWholeWord = False .MatchByte = True .MatchAllWordForms = False .MatchSoundsLike = False .MatchWildcards = False .MatchFuzzy = False End With Selection.Find.Execute Replace:=wdReplaceAll End Sub |
|