如何利用VBA一鍵自動填入1或3呢?

　暱稱: RCRG滾奶滾企

帖子: 95
主題: 24
精華: 0
積分: 118
點名: 0
作業系統: XP
軟體版本: Office 2003
閱讀權限: 20
性別: 男
註冊時間: 2015-11-10
最後登錄: 2020-5-25

11^# 跳轉到 »

發表於 2015-11-21 13:21 | 只看該作者

回復 10# 准提部林

好怪，把您的VBA貼在Sheet2工作表後，在C欄裡一直修改內容，也沒見他自動填入呢?
是我貼錯位置還是需要甚麼其他動作嗎?

對了！我會觸發的 "自動填入" 的修改C欄的範圍有增加到C3:C200喔，因為有時使用者會異動到100多列，所以我乾脆把範圍增加到C200也會觸發。

TOP

准提部林

版主 Rank: 7 Rank: 7 Rank: 7

帖子: 2848
主題: 10
精華: 0
積分: 2903
點名: 0
作業系統: 〔略〕
軟體版本: 〔略〕
閱讀權限: 100
性別: 男
來自: 〔略〕
註冊時間: 2013-5-13
最後登錄: 2026-7-25

12^#

發表於 2015-11-21 13:54 | 只看該作者

回復 11# RCRG

公式及程式不是膏藥貼了就用, 先去了解一下, 有問題試著去修改再測試看看~~

TOP

RCRG

　暱稱: RCRG滾奶滾企

中學生 Rank: 2

帖子: 95
主題: 24
精華: 0
積分: 118
點名: 0
作業系統: XP
軟體版本: Office 2003
閱讀權限: 20
性別: 男
註冊時間: 2015-11-10
最後登錄: 2020-5-25

13^#

發表於 2015-11-21 18:31 | 只看該作者

回復 10# 准提部林

謝謝准大的指正，測試的的結果，我好像找不到修改C欄位後就自動填入的，有一些都是我只是滑鼠點選C欄位，還沒修改就填入了，不知還有其他可以選嗎

TOP

准提部林

版主 Rank: 7 Rank: 7 Rank: 7

帖子: 2848
主題: 10
精華: 0
積分: 2903
點名: 0
作業系統: 〔略〕
軟體版本: 〔略〕
閱讀權限: 100
性別: 男
來自: 〔略〕
註冊時間: 2013-5-13
最後登錄: 2026-7-25

14^#

發表於 2015-11-21 20:15 | 只看該作者

回復 13# RCRG

Private Sub Worksheet_Change(ByVal Target As Range)
Private Sub Worksheet_SelectionChange(ByVal Target As Range)

看一下兩者不同處, 可參考VBE說明~~事件~~

TOP

RCRG

　暱稱: RCRG滾奶滾企

中學生 Rank: 2

帖子: 95
主題: 24
精華: 0
積分: 118
點名: 0
作業系統: XP
軟體版本: Office 2003
閱讀權限: 20
性別: 男
註冊時間: 2015-11-10
最後登錄: 2020-5-25

15^#

發表於 2015-11-22 04:12 | 只看該作者

回復 14# 准提部林

謝謝准大解答，參照您的答案，我自己再變更一下手法，也算是可以自動觸發了，再一次感謝您多次的幫忙！

TOP

RCRG

　暱稱: RCRG滾奶滾企

中學生 Rank: 2

帖子: 95
主題: 24
精華: 0
積分: 118
點名: 0
作業系統: XP
軟體版本: Office 2003
閱讀權限: 20
性別: 男
註冊時間: 2015-11-10
最後登錄: 2020-5-25

16^#

發表於 2015-11-24 16:39 | 只看該作者