【聲明】本站任何文章都可能有聯盟行銷連結，當你透過文章內的連結購買產品，我可能獲得分潤，這不會增加你任何成本，並且我分享的都是自己實際使用過的資訊，更多細節請點這裡。 Disclosure: Any post on this site may contain affiliate links, meaning I get commission if you decide to make a purchase through my links, at no cost to you.
為了簡化成容易理解，
在此就不使用變數，強制跑1～10列來當例子，
請在D槽準備好檔案 D:\test99.xls
//開啟要貼上的目的程式（WORD）
RunApp “WINWORD.exe”
row=1//我們從第一列開始
MyMaxRow=10//跑到第10列
//在您的電腦上需要安裝有Office辦公軟件,否則使用不了
//下面這句是打開Excel文檔工作表
Call Plugin.Office.OpenXls(“D:\test99.xls”)
//==For BEGIN=====================//
For i=row to MyMaxRow
//下面這句是向Excel文檔工作表(1)單元格(i, A)讀出內容存入(Text)變量
Text = Plugin.Office.ReadXls(1, i, 1)
//把Text這個變數放入剪貼板，等待貼上
Call Plugin.Sys.SetCLB(Text)
//Ctrl+V貼上然後Enter換列
KeyDown 17, 1
KeyPress 86, 1
KeyUp 17, 1
KeyPress “Enter”, 1
Next
//==For END=====================//
//下面這句是關閉Excel文檔工作表
Call Plugin.Office.CloseXls()
MessageBox “完成！讀取到的最後一個單元格內容是：” & Text
MessageBox “可以打開(D:\test99.xls)文件查看是否成功寫入內容”
這個例子是為了便於理解，在每個儲存格字數很少時可以正常運作，
實作上則因為記憶體剪貼簿的速度趕不上，常會出錯，
必須適當加上Delay以及其他動作，
本例來說列數為固定值，用For迴圈很直覺
如果不固定，用GOTO，那麼沒寫好還會有跳不出去的問題
阿淳的自在生活工具箱 除客座文章分類外，均為阿淳（chaneswin）原創，禁止商業使用，歡迎社群分享，轉載請註明作者與原文連結，禁止商業使用。有任何想法歡迎留言交流！
原文連結：按鍵精靈如何把excel資料逐列貼上(超級入門理解版)
尊貴的阿淳前輩：
對不起喔，造成您這麼大的困擾，感恩喔。
恭請撥冗答覆一下，謝謝，感恩喔。
前輩您好
CAUTION 主題：將EXCEL中的第一工作表，複製貼上記事本。
敬請看一下信件喔，謝謝，晚安，等好消息。
對不起，重複請刪除，請緊急處理一下，謝謝。
敬閱者
請問一下，這個腳本的邏輯相當好，但是我在測試時，只見記事本在動10列，但卻沒將EXCEL的資料貼上記事本，請幫忙一下，謝謝。
敬閱者
請問一下，這個腳本的邏輯相當好，但是我在測試時，只見記事本在動10列，但卻沒將EXCEL的資料貼上記事本，請幫忙一下，謝謝。