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

[Linkey (Linkey)]

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
:    請問有人知道是怎麼辦到的嗎?
:    因為我現在要製作的檔案會給很多人填寫
:    不希望使用者打開時還會要問是否啟用巨集等安全等級問題

--
※ 發信站: 批踢踢實業坊(ptt.cc), 來自: 36.226.237.133
※ 文章網址: https://www.ptt.cc/bbs/Office/M.1465975451.A.C58.html
※ 編輯: Linkey (36.226.237.133), 06/15/2016 15:25:22
※ 編輯: Linkey (36.226.237.133), 06/15/2016 15:30:00
推 olivefox: 請問private做什麼用呢? 我這麼做沒反應 是不是還有
→ olivefox: 什麼我沒注意到的(抱歉我道行很淺)
→ Linkey: https://www.youtube.com/watch?v=ZnnCm7tyqlg
→ Linkey: https://www.youtube.com/watch?v=0EXdPcbsTZI
→ Linkey: https://goo.gl/Yr0ICr  我推薦看完這一系列
→ Linkey: 我的 VBA 基礎都從這裡學的，每天花一點時間看，值得的
推 olivefox: 謝謝我懂了!我會找時間好好研讀的！