範圍值內如何同步變動? - Excel程式區 - 麻辣家族討論版版

麻辣家族討論版版 » Excel程式區 » 範圍值內如何同步變動?

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

[發問] 範圍值內如何同步變動?

中學生 Rank: 2

帖子: 91
主題: 5
精華: 0
積分: 130
點名: 2
作業系統: Win10
軟體版本: Office 2010
閱讀權限: 20
性別: 男
註冊時間: 2016-5-14
最後登錄: 2026-6-21

1^# 跳轉到 »

發表於 2017-11-6 14:06 | 顯示全部帖子

回復 1# renzhi2020

1.參考看看

Private Sub Worksheet_Change(ByVal Target As Range)
Dim KeyCells As Range
Set KeyCells = Range("A1:A5")
Set IntersectCells = Application.Intersect(KeyCells, Range(Target.Address))
If Not IntersectCells Is Nothing Then
For Each a In IntersectCells
Cells(a.Row, "B") = "=A" & a.Row & "*5"
Next
End If
End Sub

複製代碼

2.衍申問題的意思是例如：
工作表1的A1變動
工作表2的B1填入=工作表1!A1*5
是舉例的這樣嗎?

靜思自在 : 要用心，不要操心、煩心。

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