Excel - palaist makro, kad dati ievadīti šūnā

Ja lietotājs vēlas palaist makro Microsoft Excel, kad tiek konstatēts, ka D10 šūna ir aizpildīta, darblapas maiņas notikums jāizmanto Excel darblapā, nevis modulī. //www.4shared.com/file/89145449/43c8c38/Change_Value_of D10.htlml tiek lejupielādēts un sākotnējais kods, kas tika izmantots makro darbināšanai, ir iestatīts. Izstrādātāja cilnes Visual Basic ikona ir atlasīta Microsoft Excel-2007. Pēc darblapas apskates, kurā vēlams palaist kodu, deklarācijas un vispārīgie tiek atcelti un darba lapa ir atlasīta. Vārds “Selection” tiek noņemts no “Private Sub Worksheet_SelectionChange” koda logā. Lai mainītu vērtību D10 šūnā, '$ D $ 10' ir iestatītā mērķa adrese. Tas savukārt padarītu darblapas maiņas notikumu „Zvanīt” makro .

Izdevums
Risinājums
Piezīme

Izdevums

Man ir makro, kas darbojas, kad lietotājs noklikšķina uz pogas. Tā vietā es gribu, lai makro darbotos, kad ir aizpildīta šūna D10. D10 dati iegūti no datu validācijas nolaižamā saraksta, ja tas ir svarīgi. Tam vajadzētu būt vienkāršam, bet es to nespēju saprast.

Risinājums

Jūs varat saglabāt savu makro moduli vienu. Jums ir jāizmanto darblapas maiņas notikums darblapā, nevis modulī. Ļaujiet man paskaidrot: es sniegšu failu, kas iet kopā ar paskaidrojumu. Darba lapā diapazons A5: A25 ir aizpildīts ar cipariem. Ja ievadāt skaitlisko vērtību šūnā D10, diapazons G5: G10 kopēs to, kas ir A5: A25. Ja dzēšat vērtību D10, tad diapazona G5: G10 saturs tiks izdzēsts.

//www.4shared.com/file/89145449/43c8c38/Change_Value_of_D10.html

Neatkarīgi no tā, kāds bija jūsu sākotnējais kods, lai palaistu savu makro, ievietojiet to sākotnējā formā.

Tā kā jūs izmantojat programmu Excel 2007, jums tas ir jādara:

1) Noklikšķiniet uz cilnes Izstrādātājs.
2) Noklikšķiniet uz ikonas Visual Basic.
3) Kreisās rūts logā veiciet dubultklikšķi uz lapas, kurā nepieciešams jūsu kods.
4) Tagad koda loga augšdaļā jūs redzēsiet (Vispārīgi) ar nolaižamo un (Deklarācijas) ar nolaižamo.
5) Noklikšķiniet uz nolaižamā saraksta (Vispārīgi) un izvēlieties darblapu.
6) Tagad koda logā jūs redzēsiet privāto apakšlapu_izvēlnes atlasiChange (ByVal Target As Range)
7) Noņemiet vārdu "Selection". Jūs vēlaties noņemt "Selection", jo tas nozīmē, ka, noklikšķinot uz šūnas darblapā, kaut kas notiks. Jūs to nevēlaties, jūs vēlaties ievadīt vērtību D10. Tagad tas būtu jālasa privātajā apakšlapā_izmaiņa (ByVal Target As Range)
8) Šeit jūs vēlaties kodu ...

Privātās apakšlapas darba lapa_pārveidošana (pēc mērķa kā robežvērtība)

Ja Target.Address = "$ D $ 10", tad

Zvaniet MyMacro

Beigas Ja

Beigt Sub