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

[發問] 如何用VBA根據前欄資料有否，來決定是否填入特定欄位資料。

RCRG

　暱稱: RCRG滾奶滾企

中學生 Rank: 2

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

1^# 跳轉到 » 正序看帖

打印

字體大小: tT

發表於 2019-2-14 11:30 | 只看該作者

[發問] 如何用VBA根據前欄資料有否，來決定是否填入特定欄位資料。

請問各位專家：

如果我想寫一個若excel的C欄若有資料，那麼對應的F欄就會自動複製M5欄位內的資料來填入；
當然C欄若沒有資料，那麼對應的F欄也會跟著沒有資料；
我想用VBA的巨集呈現出來，請問該如何寫呢?

有勞各位大大。

樓主熱帖

RCRG

　暱稱: RCRG滾奶滾企

中學生 Rank: 2

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

3^#

發表於 2019-2-20 10:57 | 只看該作者

回復 2# kim223824

測試過ok，非常感謝大大

TOP

kim223824

中學生 Rank: 2

帖子: 75
主題: 8
精華: 0
積分: 109
點名: 0
作業系統: windows XP
軟體版本: office 2010
閱讀權限: 20
性別: 男
來自: 高雄
註冊時間: 2015-4-19
最後登錄: 2024-8-10

2^#

發表於 2019-2-18 15:24 | 只看該作者

SUB TEXT()
         ROW1 = CELLS( ROWS.COUNT,"C").END(3).ROW
         FOR i = 2 TO ROW1
                  IF CELLS(i,"C").VALUE <> "" THEN
                           CELLS(i,"F").VALUE = CELLS(i,"M").VALUE
                  ELSE
                           CELLS(i,"F").VALUE = ""
                  END IF
         NEXT

END SUB

TOP

靜思自在 : 人的眼睛長在前面，只看到別人的缺點，絲毫看不到自己的缺點。

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