Cum se execută macro când valoarea celulei se schimbă în Excel?
În mod normal, în Excel, putem apăsa tasta F5 sau butonul Executare pentru a executa codul VBA. Dar, ați încercat vreodată să rulați codul macro specific atunci când se schimbă valoarea unei celule? În acest articol, voi introduce câteva trucuri rapide pentru a face față acestei sarcini în Excel.
Rulați sau apelați macrocomanda atunci când o anumită valoare a celulei se modifică cu codul VBA
Rulați sau apelați macrocomanda atunci când o anumită valoare a celulei se modifică cu codul VBA
Pentru a rula un cod macro modificând valoarea unei celule, următorul cod VBA vă poate face o favoare, vă rugăm să procedați astfel:
1. Faceți clic dreapta pe fila de foaie pe care doriți să executați macrocomanda dacă se modifică valoarea celulei, apoi alegeți Afișați codul din meniul contextual și în meniul deschis Microsoft Visual Basic pentru aplicații fereastră, copiați și lipiți următorul cod în modulul gol:
Cod VBA: Rulați macrocomanda atunci când valoarea celulei se modifică:
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Address = "$A$1" Then
Call Mymacro
End If
End Sub
notițe: În codul de mai sus, A1 este celula specifică pe care doriți să rulați codul, Mymacro este numele macro pe care doriți să îl rulați. Vă rugăm să le schimbați în funcție de nevoile dvs.
2. Și apoi salvați și închideți fereastra de cod, acum, când introduceți sau modificați valoarea în celula A1, codul specific va fi declanșat simultan.
Rulați sau apelați macrocomanda atunci când orice valoare a celulei se modifică într-un interval cu cod VBA
Dacă doriți să rulați sau să declanșați o macrocomandă atunci când valoarea unei celule se schimbă într-un interval de celule, următorul cod vă poate ajuta.
1. Faceți clic dreapta pe fila de foaie pe care doriți să executați macrocomanda dacă se modifică valoarea celulei, apoi alegeți Afișați codul din meniul contextual și în meniul deschis Microsoft Visual Basic pentru aplicații fereastră, copiați și lipiți următorul cod în modulul gol:
Cod VBA: Rulați macrocomanda atunci când orice valoare a celulei se modifică într-un interval:
Private Sub Worksheet_Change(ByVal Target As Range)
If Not Intersect(Target, Range("A1:B100")) Is Nothing Then
Call Mymacro
End If
End Sub
notițe: În codul de mai sus, A1: B100 este celulele specifice pe care doriți să rulați codul, Mymacro este numele macro pe care doriți să îl rulați. Vă rugăm să le schimbați în funcție de nevoile dvs.
2. Și apoi salvați și închideți fereastra de cod, acum, când introduceți sau modificați valoarea în oricare dintre celulele A1: B100, codul specific va fi executat simultan.
Eliminați toate macrocomenzile din mai multe registre de lucru
Kutools pentru Excel's Eliminați în lot toate macrocomenzile utilitarul vă poate ajuta să eliminați toate macrocomenzile din mai multe registre de lucru după cum aveți nevoie. Descărcați și probați gratuit Kutools pentru Excel acum!
Kutools pentru Excel: cu mai mult de 300 de programe de completare Excel la îndemână, încercați fără limitări în 30 de zile. Descărcați și proba gratuită acum!
Legate de articole:
Cum se execută macro automat înainte de a imprima în Excel?
Cum se execută macro pe baza valorii celulei în Excel?
Cum se execută macro pe baza valorii selectate din lista derulantă în Excel?
Cum se execută macro făcând clic pe hyperlinkuri în Excel?
Cum se execută macro când foaia este selectată dintr-un registru de lucru?
Cele mai bune instrumente de productivitate de birou
Îmbunătățiți-vă abilitățile Excel cu Kutools pentru Excel și experimentați eficiența ca niciodată. Kutools pentru Excel oferă peste 300 de funcții avansate pentru a crește productivitatea și a economisi timp. Faceți clic aici pentru a obține funcția de care aveți cea mai mare nevoie...
Fila Office aduce interfața cu file în Office și vă face munca mult mai ușoară
- Activați editarea și citirea cu file în Word, Excel, PowerPoint, Publisher, Access, Visio și Project.
- Deschideți și creați mai multe documente în filele noi ale aceleiași ferestre, mai degrabă decât în ferestrele noi.
- Vă crește productivitatea cu 50% și reduce sute de clicuri de mouse pentru dvs. în fiecare zi!