※ 引述《aljinn (Smokeless Fire)》之銘言：
: (若是和其他不同軟體互動之問題 請記得一併填寫)
: 軟體:Office 365 Word
: 這問題應該很弱…不過我不會寫程式只好來求教 XD
: 這麼簡單的巨集
: Selection.Copy
: Selection.EndKey Unit:=wdStory
: Selection.PasteAndFormat (wdFormatOriginalFormatting)
: Selection.HomeKey Unit:=wdStory
: 但是第三行Selection.Paste會被說錯誤4605「此指令未提供」是怎麼回事？
經過soyoso大大回應我又查詢和測試了一下
相關討論很少，但又看到一兩篇相同/類似症狀的
官方給的建議幾乎都沒用(測不出同樣情況、認定是其他軟體干擾等等)
有人說什麼也沒做後來忽然就又能用了，原因依舊不明
但我自己試一下發現很奇怪
如果把第一句Selection.Copy拿掉，自己先copy好再執行後面指令就可以
粗略實驗幾次，感覺似乎是Selection.Copy和Paste系列全部指令會衝突？
這應該不是原本就存在的邏輯？而且以前不會啊(至少我改用365之前沒遇到過)
除了想再問問有沒有人知道原因
也想請教如果無法直接解決的話…有沒有繞過的辦法？
例如把Selection改成別的expression？(我其實完全不會VBA Orz)

成功了 @@ 感謝soyoso大大 雖然問題點依舊不明 XDDD

那如改以selection.range.copy的方式是否有機會達成呢如果還是不行的話，先宣告個變數(假設是r)dim r as rangeset r = selection.rangeselection.endkey ...selection.formattedtext = rselection.homekey ..這樣就沒使用到copy的部分了