Excel中單元格值更改時(shí)如何運(yùn)行宏？
Excel中單元格值更改時(shí)如何運(yùn)行宏？
通常，在Excel中，我們可以按F5鍵或“運(yùn)行”按鈕執(zhí)行VBA代碼。 但是，您是否曾經(jīng)嘗試在單元格值更改時(shí)運(yùn)行特定的宏代碼？ 本文中，我將介紹一些快速技巧來處理Excel中的這項(xiàng)工作。
當(dāng)特定單元格值隨VBA代碼變化時(shí)運(yùn)行或調(diào)用宏
當(dāng)任何單元格值在使用VBA代碼的范圍內(nèi)更改時(shí)，運(yùn)行或調(diào)用宏
當(dāng)特定單元格值隨VBA代碼變化時(shí)運(yùn)行或調(diào)用宏要通過更改單元格值來運(yùn)行宏代碼，請按照以下VBA代碼執(zhí)行操作：
1。 如果單元格值更改，請右鍵單擊要執(zhí)行宏的工作表選項(xiàng)卡，然后選擇 查看代碼 從上下文菜單中，然后在打開的 適用于應(yīng)用程序的Microsoft Visual Basic 窗口，將以下代碼復(fù)制并粘貼到空白模塊中：
VBA代碼：單元格值更改時(shí)運(yùn)行宏：
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Address = "$A$1" Then
Call Mymacro
End If
End Sub
Copy
備注：在上面的代碼中， A1 是您要基于其運(yùn)行代碼的特定單元格， 宏 是您要運(yùn)行的宏名稱。 請根據(jù)需要更改它們。
2。 然后保存并關(guān)閉代碼窗口，現(xiàn)在，當(dāng)您在單元格A1中輸入或更改值時(shí)，將立即觸發(fā)特定代碼。
當(dāng)任何單元格值在使用VBA代碼的范圍內(nèi)更改時(shí)，運(yùn)行或調(diào)用宏如果要在單元格區(qū)域中任何一個(gè)單元格值更改時(shí)運(yùn)行或觸發(fā)宏，則以下代碼可能會對您有所幫助。
1。 如果單元格值更改，請右鍵單擊要執(zhí)行宏的工作表選項(xiàng)卡，然后選擇 查看代碼 從上下文菜單中，然后在打開的 適用于應(yīng)用程序的Microsoft Visual Basic 窗口，將以下代碼復(fù)制并粘貼到空白模塊中：
VBA代碼：當(dāng)任何單元格值在某個(gè)范圍內(nèi)變化時(shí)，運(yùn)行宏：
Private Sub Worksheet_Change(ByVal Target As Range)
If Not Intersect(Target, Range("A1:B100")) Is Nothing Then
Call Mymacro
End If
End Sub
Copy
備注：在上面的代碼中， A1：B100 是您要基于其運(yùn)行代碼的特定單元格， 宏 是您要運(yùn)行的宏名稱。 請根據(jù)需要更改它們。
2。 然后保存并關(guān)閉代碼窗口，現(xiàn)在，當(dāng)您在A1：B100的任何單元格中輸入或更改值時(shí)，將立即執(zhí)行特定代碼。
從多個(gè)工作簿中刪除所有宏
Kutools for Excels 批量刪除所有宏 實(shí)用程序可以幫助您根據(jù)需要從多個(gè)工作簿中刪除所有宏。 下載并免費(fèi)試用 Kutools for Excel 現(xiàn)在！
Kutools for Excel：具有300多個(gè)方便的Excel加載項(xiàng)，可以在30天內(nèi)免費(fèi)試用，沒有任何限制。 立即下載并免費(fèi)試用！
相關(guān)文章：
如何在Excel中打印之前自動運(yùn)行宏？
如何在Excel中根據(jù)單元格值運(yùn)行宏？
如何基于從Excel的下拉列表中選擇的值運(yùn)行宏？
如何通過單擊Excel中的超鏈接運(yùn)行宏？
從工作簿中選擇工作表時(shí)如何運(yùn)行宏？
最佳辦公生產(chǎn)力工具
將小時(shí)轉(zhuǎn)化為分鐘 Kutools for Excel!
準(zhǔn)備好增強(qiáng)您的 Excel 任務(wù)了嗎？ 利用的力量 Kutools for Excel - 您終極的節(jié)省時(shí)間的工具。 簡化復(fù)雜的任務(wù)并像專業(yè)人士一樣瀏覽數(shù)據(jù)。 以閃電般的速度體驗(yàn) Excel！
為什么需要 Kutools for Excel
??? 超過 300 項(xiàng)強(qiáng)大功能: Kutools 包含 300 多項(xiàng)高級功能，可簡化您在 1500 多種場景中的工作。
?? 卓越的數(shù)據(jù)處理能力：合并單元格、刪除重復(fù)項(xiàng)并執(zhí)行高級數(shù)據(jù)轉(zhuǎn)換 - 所有這些都不費(fèi)吹灰之力！
?? 高效的批量操作：當(dāng)你可以聰明地工作時(shí)，為什么還要付出額外的努力呢？ 輕松批量導(dǎo)入、導(dǎo)出、組合和調(diào)整數(shù)據(jù)。
?? 可定制的圖表和報(bào)告：訪問各種附加圖表并生成富有洞察力的報(bào)告。
??? 強(qiáng)大的導(dǎo)航窗格：通過強(qiáng)大的列管理器、工作表管理器和自定義收藏夾獲得優(yōu)勢。
?? 七種類型的下拉列表：通過各種功能和類型的下拉列表使數(shù)據(jù)輸入變得輕而易舉。
?? 用戶友好：對于初學(xué)者來說輕而易舉，對于專家來說是一個(gè)強(qiáng)大的工具。
立即下載，與 Excel 一起穿越時(shí)空！
閱讀更多
免費(fèi)下載... 采購...
Office Tab 為 Office 帶來選項(xiàng)卡式界面，讓您的工作更輕松
在Word，Excel，PowerPoint中啟用選項(xiàng)卡式編輯和閱讀，發(fā)布者，Access，Visio和Project。
在同一窗口的新選項(xiàng)卡中而不是在新窗口中打開并創(chuàng)建多個(gè)文檔。
每天將您的工作效率提高50％，并減少數(shù)百次鼠標(biāo)單擊！
閱讀更多
免費(fèi)下載... 采購...
版權(quán)聲明：本文內(nèi)容由網(wǎng)絡(luò)用戶投稿，版權(quán)歸原作者所有，本站不擁有其著作權(quán)，亦不承擔(dān)相應(yīng)法律責(zé)任。如果您發(fā)現(xiàn)本站中有涉嫌抄襲或描述失實(shí)的內(nèi)容，請聯(lián)系我們jiasou666@gmail.com 處理，核實(shí)后本網(wǎng)站將在24小時(shí)內(nèi)刪除侵權(quán)內(nèi)容。
版權(quán)聲明：本文內(nèi)容由網(wǎng)絡(luò)用戶投稿，版權(quán)歸原作者所有，本站不擁有其著作權(quán)，亦不承擔(dān)相應(yīng)法律責(zé)任。如果您發(fā)現(xiàn)本站中有涉嫌抄襲或描述失實(shí)的內(nèi)容，請聯(lián)系我們jiasou666@gmail.com 處理，核實(shí)后本網(wǎng)站將在24小時(shí)內(nèi)刪除侵權(quán)內(nèi)容。
相關(guān)文章
