Kotara "Ketsahalo ea Excel»e sebelisoa ho bontša liketso tse itseng tse entsoeng ke mosebedisi ho Excel. Ka mohlala, ha mosebedisi a fetola leqephe la buka ea mosebetsi, sena ke ketsahalo. Ho kenya data ka seleng kapa ho boloka buka ya mosebetsi le tsona ke diketsahalo tsa Excel.
Liketsahalo li ka amahanngoa le leqephe la mosebetsi la Excel, lichate, buka ea mosebetsi, kapa ka kotloloho ho Excel application ka boeona. Baetsi ba mananeo ba ka etsa khoutu ea VBA e tla etsoa ka bo eona ha ketsahalo e etsahala.
Mohlala, ho etsa hore macro e sebetse nako le nako ha mosebelisi a fetola leqephe la mosebetsi bukeng ea Excel, o tla etsa khoutu ea VBA e tla sebetsa nako le nako ha ketsahalo e etsahala. SheetActivate buka ea mosebetsi.
'Me haeba u batla hore macro e sebetse nako le nako ha u ea leqepheng le itseng la mosebetsi (mohlala, Sheet1), joale khoutu ea VBA e tlameha ho amahanngoa le ketsahalo eo kenya tshebetsong tshwariso ya bakeng sa lakane ena.
Khoutu ea VBA e reretsoeng ho sebetsana le liketsahalo tsa Excel e tlameha ho behoa leqepheng le loketseng la mosebetsi kapa nthong ea buka ea mosebetsi fensetereng ea mohlophisi oa VBA (mohlophisi a ka buloa ka ho tobetsa). Alt + F11). Ka mohlala, khoutu e lokelang ho etsoa nako le nako ha ketsahalo e itseng e etsahala boemong ba leqephe e lokela ho behoa fensetereng ea khoutu bakeng sa leqephe leo. Sena se bontšoa setšoantšong:
Ho Visual Basic editor, u ka sheba sete ea liketsahalo tsohle tsa Excel tse fumanehang bukeng ea mosebetsi, leqephe la mosebetsi, kapa boemong ba lichate. Bula fensetere ea khoutu bakeng sa ntho e khethiloeng ebe u khetha mofuta oa ntho ho tsoa ho menu e theoha e ka holimo ho fensetere. Lenane la ho theoha le letona le ka holimo ho fensetere le tla bontša liketsahalo tse hlalositsoeng bakeng sa ntho ena. Setšoantšo se ka tlase se bontša lethathamo la liketsahalo tse amanang le leqephe la mosebetsi la Excel:
Tobetsa ketsahalong e lakatsehang ho menu e theoha e nepahetseng, 'me mokhoa o tla kenngoa ka mokhoa o ikemetseng fensetereng ea khoutu bakeng sa ntho ena. Sehlooho. hloohong ea ts'ebetso Sehlooho Excel e kenya ka bo eona likhang tse hlokahalang (haeba li teng). Sohle se setseng ke ho kenyelletsa khoutu ea VBA ho fumana hore na ke liketso life tseo mokhoa o lokelang ho li etsa ha ketsahalo e lakatsehang e fumanoa.
mohlala
Mohlaleng o latelang, nako le nako ha ho khethoa sele B1 leqepheng la mosebetsi Sheet1 lebokoso la molaetsa le a hlaha.
Ho etsa ketso ena, re hloka ho sebelisa ketsahalo ea leqephe Khetho_Phetoho, e etsahalang nako le nako ha khetho ea sele kapa mofuta oa lisele o fetoha. Mosebetsi Khetho_Phetoho e amohela joalo ka khang shebiloeng be ntho -. Ke kamoo re tsebang hore na ke mefuta efe ea lisele e khethiloeng.
Event Khetho_Phetoho e etsahala ka khetho efe kapa efe e ncha. Empa re hloka hore sete ea liketso e etsoe feela ha sele e khethiloe B1. Ho etsa sena, re tla latela ketsahalo feela sebakeng se boletsoeng shebiloeng. E sebelisoa joang khoutung ea lenaneo e bontšitsoeng ka tlase:
'Khoutu ea ho hlahisa lebokose la molaetsa ha sele B1 e khethoa 'leqepheng la mosebetsi la hajoale. Private Sub Worksheet_SelectionChange(ByVal Target As Range) 'Sheba hore na cell B1 e khethiloe Haeba Target.Count = 1 And Target.Row = 1 And Target.Column = 2 Ebe 'Haeba cell B1 e khethiloe, joale etsa MsgBox e latelang "O na le khetha sele B1" End If End Sub