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

[發問] (已解決)關於某儲存格數字變動另一儲存格就回到1

freeffly

高中生 Rank: 3 Rank: 3

帖子: 586
主題: 123
精華: 0
積分: 763
點名: 0
作業系統: WINDOW7
軟體版本: Office 2003
閱讀權限: 50
性別: 男
註冊時間: 2010-5-16
最後登錄: 2017-3-14

熱烈參與勳章好學求知勳章

1^# 跳轉到 » 倒序看帖

打印

字體大小: tT

發表於 2011-6-21 17:48 | 只看該作者

[發問] (已解決)關於某儲存格數字變動另一儲存格就回到1

本帖最後由 freeffly 於 2012-2-22 17:00 編輯

我像要問一下當B4儲存格如果變換數字時
D4的數字就為1要怎麼寫?

我要將這各套用到圖表中
當B欄那各項目變換時D欄的項目就先回到第一個
這樣就能避免ABCD這幾各項目如果不一樣多時切換不會出現空白情形
不知道這樣說明會不會太難理解

事件.rar (2.01 KB)

樓主熱帖

字典兩各字還真難理解

FAlonso

中學生 Rank: 2

帖子: 135
主題: 19
精華: 0
積分: 165
點名: 0
作業系統: XP
軟體版本: 2003
閱讀權限: 20
性別: 男
來自: 香港
註冊時間: 2010-12-9
最後登錄: 2012-8-27

2^#

發表於 2011-6-21 19:19 | 只看該作者

Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Count <> 1 Or Target.Address <> "$B$4" Then
Exit Sub
Else
Range("D4") = 1
End If
End Sub

80 字節以內
不支持自定義 Discuz! 代碼

TOP

freeffly

高中生 Rank: 3 Rank: 3

帖子: 586
主題: 123
精華: 0
積分: 763
點名: 0
作業系統: WINDOW7
軟體版本: Office 2003
閱讀權限: 50
性別: 男
註冊時間: 2010-5-16
最後登錄: 2017-3-14

熱烈參與勳章好學求知勳章

3^#

發表於 2011-6-22 12:34 | 只看該作者

回復 2# FAlonso

試了一下只有直接修改儲存格的時候會變動
可是經由下拉清單改變好像不會變動
這種情形要怎麼處理?

字典兩各字還真難理解

TOP

oobird

　頭銜: 街友一族

超級版主 Rank: 8 Rank: 8

帖子: 1572
主題: 16
精華: 2
積分: 1521
點名: 0
作業系統: xp
軟體版本: office 2003
閱讀權限: 150
性別: 男
註冊時間: 2010-5-1
最後登錄: 2016-1-13

論壇貢獻勳章

4^#

發表於 2011-6-22 13:35 | 只看該作者

可是經由下拉清單改變好像不會變動？
應該還是會的
這個事件在儲存格內容發生改變時執行
他不會去管是直接輸入還是用下拉輸入的
程式可去除多餘的敘述：
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Count <> 1 Or Target.Address <> "$B$4" Then Exit Sub
Range("D4") = 1
End Sub

TOP

freeffly