Excel問題

2008-04-18 6:25 am
在同一活頁簿內,有2個工作表,在1的工作表內,在有數值1-10,如想在2的工作表內指定的儲存格輸入任何一個數值(1-10),在1工作表內的相同數值便會highlight 或刪除,請問有何方法?

回答 (2)

2008-04-18 6:59 am
✔ 最佳答案
Highlight/刪除或清除內容, 均是動作, 除非用人手一格格做, 否則一定要用VBA, 不是一般方法或公式可以做到的
注意: 用VBA刪除或清除內容后, 是無法還原

2008-04-18 17:36:20 補充:
Sharonwsf0819 的VBA,
將Cells(1,1).CurrentRegion 改成 Activesheet.UsedRange應更佳, 否則會有走雞
變色前亦應先將範圍的(上次留下)變色清除
無需分兩次循環, 用For each一次便可

2008-04-18 17:37:01 補充:
Private Sub findNum_Click()
num = [f2]
Set xx = ActiveSheet.UsedRange
xx.Interior.ColorIndex = xlNone
For each x in xx
If x.value = num Then x.Interior.ColorIndex = 6
Next
End Sub

2008-04-18 17:37:29 補充:
其實變色, 用條件格式比VBA更佳
全選Cells
公式是 =A1=$F$2
2008-04-19 12:26 am
要做到唔難既, 但真係要用VBA囉..我就寫左個簡單既VBA,可以做到. (為左簡單法, 我將所有野放晒同一個WORKSHEET度):


Private Sub findNum_Click()

num = Range("F2")
lastrow = Cells(1, 1).CurrentRegion.Rows.Count
lastcol = Cells(1, 1).CurrentRegion.Columns.Count
i = 1
Do While i <= lastcol

For r = 1 To lastrow
If Cells(r, i) = num Then Cells(r, i).Interior.ColorIndex = 6
Next

i = i + 1

Loop
End Sub


以上既vba可以做到, 當你在F2一格KEY IN 任何一個數字, 個VBA會幫你check同一版內某個範圍內既數字裡面, 有冇果個數字; 有的話, 就highlight in Yellow.
希望可以幫到你, 有問題email我丫~~


收錄日期: 2021-04-13 15:26:49
原文連結 [永久失效]:
https://hk.answers.yahoo.com/question/index?qid=20080417000051KK02832

檢視 Wayback Machine 備份