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 試算表高手才知道的「訂單自動拆解術」

  1. 引言:被淹沒在訂單資料裡的你,需要更聰明的做法 你是否曾經面對過這樣的畫面:從系統匯出的訂單資料中,產品名稱、數量、單價全部擠在同一個儲存格裡,中間只用簡單的分號隔開?為了計算庫存或整理報表,你只能苦命地動用「複製、貼上」大法,一筆一筆將資料拆分到正確的欄位。這種重複性...