求 Word 巨集或 VBA

Question

求 Word 巨集或 VBA

我想將下列題庫
https://lh3.googleusercontent.com/-3UxCN1PESI4/VV6aPFtp55I/AAAAAAAATcU/oIf8mPmJgzI/s2048/20150522A.jpg

整理成如下型式(半形逗號分隔)
https://lh3.googleusercontent.com/-3SwKO-HdS-8/VV6aPA3jYwI/AAAAAAAATcQ/Itspqhmw5bc/s2048/20150522B.jpg
 
因題目有兩種型式混合在一起

型式1：共7列併一列
題號
題目
選項1
選項2
選項3
選項4
答案

型式2：共8列併一列
題號
題目
選項1
選項2
選項3
選項4
答案
解釋

所以我想設計兩個快速鍵
當我游標在題號那列時
由我判斷是哪一種型式
再來按快速鍵快速鍵讓他合併
當然如果一個快速鍵(或按鈕)就可以解決更好

測試題庫如下(實際題庫有300題)
1
小毛有便祕的毛病.她應該如何改善？
吃高纖餅乾
喝健康醋
多攝取富含纖維素的蔬菜水果
喝來路不明補藥
C
2
下列哪種行為對健康有幫助？
常和家人吵架
每天熬夜唸書
愉快的與人相處
每天愁眉苦臉
C
3
世界禁菸日是哪一天?
4月30日
5月31日
6月3日
7月31日
B
世界禁菸日為5月31日。
4
請問小新什麼時候刷牙、漱口最好.才可以保持良好口腔衛生？
每天早上
每天睡前
每次吃東西後
以上皆是
D
5
下列何者不是保護心臟健康的方法？
早睡早起
避免抽煙喝酒
食用高鹽食物
注意飲食
C
食用高鹽食物.易導致身體水腫、高血壓.進而影響心臟的功能。

e · Accepted Answer

謝謝指正 經指正才發現回答錯誤一堆 還好你看得懂
題目個位數
反白第1至第9題倒數第1個字之前
Ctrl+H 
尋找目標輸入^#^p
取代為 ^&^t→全部取代→否
尋找目標輸入^p
取代為 ,→全部取代→否
尋找目標輸入^#,^t
取代為 ^p^&→全部取代→否
尋找目標輸入^t
取代為 不用輸入任何字→全部取代→否
尋找目標輸入,^p
取代為 ^p→全部取代→否
第1行段落標記反白→Delete  題目十位數
反白第10至第99題倒數第1個字之前(最後一行不能全反白)
Ctrl+H 
尋找目標輸入^#^#^p
取代為 ^&^t→全部取代→否
尋找目標輸入^p
取代為 ,→全部取代→否
尋找目標輸入^#^#,^t
取代為 ^p^&→全部取代→否
尋找目標輸入^t
取代為 不用輸入任何字→全部取代→否
尋找目標輸入,^p
取代為 ^p→全部取代→否
第1行段落標記反白→Delete  題目百位數
反白第100至第300題倒數第1個字之前(最後一行不能全反白)
Ctrl+H 
尋找目標輸入^#^#^#^p
取代為 ^&^t→全部取代→否
尋找目標輸入^p
取代為 ,→全部取代→否
尋找目標輸入^#^#^#,^t
取代為 ^p^&→全部取代→否
尋找目標輸入^t
取代為 不用輸入任何字→全部取代→否
尋找目標輸入,^p
取代為 ^p→全部取代→否
第1行段落標記反白→Delete

祝一切順利

求 Word 巨集或 VBA

1 個解答