By Joe Smith 06. február 2023-én, hétfőn
Csatlakozik a következő témákhoz: Excel
Válaszok 0
Kedvencek 0
Nézetek 1.9K
Szavazatok 0
Jó napot kívánok

Találkoztam olyan VBA-kóddal, amely nagyon jól bevált egy makró kiváltására az Excelben, amikor egy adott cellára kattintunk. Lásd alább:


Explicit lehetőség

Private Sub Worksheet_SelectionChange (ByVal Target as Range)
Ha Selection.Count = 1 Akkor
Ha nem metszik(cél, tartomány("D4")) akkor semmi
Hívja a MyMacro-t
Ha véget
Ha véget
End Sub


Próbálok még 3 ilyen forgatókönyvet hozzáadni ugyanahhoz a kódhoz, de nincs tapasztalatom a kódolással kapcsolatban, így a hibaelhárítás nem vezetett sehova. Kérjük, nézze meg az alábbi példát, hogy mit próbálok csinálni, és ha lehetséges, javítsa ki a kódot:


Explicit lehetőség

Private Sub Worksheet_SelectionChange (ByVal Target as Range)
Ha Selection.Count = 1 Akkor
Ha nem metszik(cél, tartomány("D4")) akkor semmi
Hívja a MyMacro1-et
Ha véget
Ha véget
Ha Selection.Count = 1 Akkor
Ha nem metszik(cél, tartomány("E10")) akkor semmi
Hívja a MyMacro2-et
Ha véget
Ha véget
Ha Selection.Count = 1 Akkor
Ha nem metszik(cél, tartomány("G23")) akkor semmi
Hívja a MyMacro3-et
Ha véget
Ha véget
Ha Selection.Count = 1 Akkor
Ha nem metszik(cél, tartomány("J33")) akkor semmi
Hívja a MyMacro4-et
Ha véget
Ha véget
End Sub



Arra számítottam, hogy az általam létrehozott különféle makrók (amelyek jól működnek) automatikusan lefutnak, amikor a kódban megjelölt cellákra kattintanak


Minden segítséget nagyra értékelünk!
A teljes hozzászólás megtekintése