Kodas pridėtas prie darbalapio BeforeDoubleClick įvykis bus įvykdytas Excel VBA du kartus spustelėdami langelį darbalapyje.
1. Atidarykite „Visual Basic“ redaktorių.
2. „Project Explorer“ dukart spustelėkite lapą (pavyzdžiui, Sheet1).
3. Iš kairiojo išskleidžiamojo sąrašo pasirinkite Darbo lapas. Išskleidžiamajame dešiniajame sąraše pasirinkite „BeforeDoubleClick“.
Pastaba: simbolis „_“ naudojamas teiginiui pratęsti naujoje eilutėje (kad būtų parodytas visas kodas).
Į darbalapį „BeforeDoubleClick Event“ pridėkite šias kodo eilutes:
4. Žemiau esanti kodo eilutė aktyvų langelį nuspalvina raudona spalva.
Tikslas.Šriftas.Spalva = vbRed
5. Jei nenorite, kad vyktų numatytasis dvigubo paspaudimo veiksmas (langelio redagavimo režimas), nustatykite „Cancel“ argumentą į true.
Atšaukti = tiesa
6. Išbandykite programą dukart spustelėdami langelį 1 lape.
Rezultatas: