2022年2月1日 星期二

【ExcelVBA教學】如何在VBA中動態判斷某一個儲存格的值是否等於某一個數字

這是網友問到的功能,因為他把程式碼寫在模組中,所以程式執行都沒作用,事件可以在工作表跟Thisworbook中找到,差別是一個是單一工作表另一個是所有工作表都會同時驅動。



address 回傳所在儲存格位置 例如:$A$1

column  回傳所在儲存格欄位順序 何如:range("a1").column 會回傳1

name 顯示物件名稱



Private Sub Workbook_SheetChange(ByVal Sh As Object, ByVal Target As Range)

    MsgBox Sh.Name & Target.Address & "hi"

End Sub


Private Sub Worksheet_Change(ByVal Target As Range)

if Target.address="$A$1" and Target.value=100 then 

MsgBox "儲存格A1的值等於100"

end if

End Sub



沒有留言:

張貼留言

告別舊時代爬蟲:擁抱 Google Books API 的 4 個開發關鍵與數位轉型啟示

1. 引言:當熟悉的工具失效時 身為一名開發者或是熱愛整理書訊的愛書人,你一定體會過那種「得心應手的工具突然失效」的挫敗感。或許你曾經長期依賴像 FindBook 這樣便利的平台,透過自動化腳本優雅地抓取書目資訊,直到某天系統無預警地報錯,查詢網址直接失效,原本順暢的流程瞬間斷裂...