請教語法上的問題？ - Excel程式區 - 麻辣家族討論版版

麻辣家族討論版版 » Excel程式區 » 請教語法上的問題？

返回列表下一主題上一主題發帖

請教語法上的問題？

　暱稱: Raymond Chien

中學生 Rank: 2

帖子: 109
主題: 12
精華: 0
積分: 177
點名: 0
作業系統: win10
軟體版本: office2013
閱讀權限: 20
性別: 男
來自: 高雄
註冊時間: 2017-11-19
最後登錄: 2023-7-5

1^# 跳轉到 »

發表於 2018-4-19 22:09 | 顯示全部帖子

回復 1# skyutm

要先切換工作表，所以要多一句Sheets("總成績").Activate，完整程式碼:

Sub 自動複製成績()
Sheets("國平時").Range("Q2:Q22").Select
Selection.Copy
Sheets("總成績").Activate
Sheets("總成績").Range("C2").Select
ActiveSheet.Paste
End Sub

複製代碼

Excel VBA網頁資料收集教學:
http://forum.twbts.com/thread-20848-1-1.html

　暱稱: Raymond Chien

中學生 Rank: 2

帖子: 109
主題: 12
精華: 0
積分: 177
點名: 0
作業系統: win10
軟體版本: office2013
閱讀權限: 20
性別: 男
來自: 高雄
註冊時間: 2017-11-19
最後登錄: 2023-7-5

2^#

發表於 2018-4-20 19:19 | 顯示全部帖子

回復 6# skyutm

這種複製方法是複製相對位置，請問S大是只要複製數字就好嗎?

Excel VBA網頁資料收集教學:
http://forum.twbts.com/thread-20848-1-1.html

　暱稱: Raymond Chien

中學生 Rank: 2

帖子: 109
主題: 12
精華: 0
積分: 177
點名: 0
作業系統: win10
軟體版本: office2013
閱讀權限: 20
性別: 男
來自: 高雄
註冊時間: 2017-11-19
最後登錄: 2023-7-5

3^#

發表於 2018-4-20 21:20 | 顯示全部帖子

回復 8# skyutm

Sub 自動複製成績()
Sheets("國平時").Range("Q2:Q22").Copy
Sheets("總成績").Activate
Sheets("總成績").Range("C2").PasteSpecial Paste:=xlPasteValues
End Sub

複製代碼

Excel VBA網頁資料收集教學:
http://forum.twbts.com/thread-20848-1-1.html

　暱稱: Raymond Chien

中學生 Rank: 2

帖子: 109
主題: 12
精華: 0
積分: 177
點名: 0
作業系統: win10
軟體版本: office2013
閱讀權限: 20
性別: 男
來自: 高雄
註冊時間: 2017-11-19
最後登錄: 2023-7-5

4^#

發表於 2018-4-20 21:45 | 顯示全部帖子

回復 10# skyutm

應該把程式加入版主的程式就OK了

Excel VBA網頁資料收集教學:
http://forum.twbts.com/thread-20848-1-1.html

靜思自在 : 小事不做、大事難成。

返回列表下一主題上一主題