Re: [算表] 當某欄位符合條件 執行巨集

作者: Linkey (Linkey)   2016-06-15 15:24:06
1.Refer:https://msdn.microsoft.com/zh-tw/library/office/ff839775.aspx
在worksheet裡新增事件
Private Sub Worksheet_Change(ByVal Target As Range)
If Not Intersect(Target, Range("A11")) Is Nothing _
And Target.Value = "A" Then
MsgBox "Run Sub A"
ElseIf Not Intersect(Target, Range("A11")) Is Nothing _
And Target.Value = "B" Then
MsgBox "Run Sub B"
End If
End Sub
2.巨集安全等級算是保護系統,要教育使用者正確觀念
不要隨意開啟不信任的檔案,略過有點本末倒置,以上個人觀點
存檔時選取excel 97-2003 xls,而非 xlsx 就不會強制xlsm
※ 引述《olivefox (Olive)》之銘言:
: 軟體:excel
: 版本:
: 兩個問題
: 1. 請問有沒有辦法
: 比如當SHEET1 A11="A"時,就執行某巨集
: 當A11="B"時,就執行某另一巨集
: 2. 我看過有個EXCEL檔案是.xls
: 但是它裡面是有巨集的
: 但是我有巨集的檔案excel都要求我存成xlsm
: 請問有人知道是怎麼辦到的嗎?
: 因為我現在要製作的檔案會給很多人填寫
: 不希望使用者打開時還會要問是否啟用巨集等安全等級問題
作者: olivefox (Olive)   2016-06-15 16:15:00
請問private做什麼用呢? 我這麼做沒反應 是不是還有什麼我沒注意到的(抱歉我道行很淺)
作者: Linkey (Linkey)   2016-06-15 16:20:00
https://www.youtube.com/watch?v=ZnnCm7tyqlghttps://www.youtube.com/watch?v=0EXdPcbsTZIhttps://goo.gl/Yr0ICr 我推薦看完這一系列我的 VBA 基礎都從這裡學的,每天花一點時間看,值得的
作者: olivefox (Olive)   2016-06-15 20:25:00
謝謝我懂了!我會找時間好好研讀的!

Links booklink

Contact Us: admin [ a t ] ucptt.com