Excel Howtos
Iesūtīts gada 03. Okt, 2009 ar Krishnan in Datori un HOWTO
Howto: Zvanīt vienu programmas Excel makro no citas
Ja jums ir izklājlapu, kas ir vairākas makro, ir iespējams izmantot kādu no citām. Jums nepieciešams izmantot apgalvojumu "aicinājumu [nosaukums makro saukt]" katru reizi, kad vēlaties kādu īpašu makro saukt.
piemēram: korpuss macro0 varētu saturēt šādu kodu, lai izmantotu citu makro
ja x = 1
zvaniet macro1
cits, ja x = 2
zvaniet macro2
cits
zvaniet macro3
Endif
* Edited vēlāk *
Tas attiecas tikai uz Makro un tas nešķiet iespējams atsaukties makro, izmantojot zvanu funkciju no lietotāja definētas funkcijas.
Howto: pievienot pogas, izvēles rūtiņas, comboboxes in Excel2007
Birojs 2003 bija "Forms rīkjoslu", kas ietverti visi objekti, piemēram, pogas, izvēles rūtiņas, kas comboboxes uc
Office 2007, šī funkcionalitāte ir pārcelta uz cilnē Izstrādātājs. Jums ir manuāli ļautu izstrādātāja cilni lenti bārā šādi.
- Noklikšķiniet uz negabarīta Office logo pogas augšējā kreisajā stūrī
- Noklikšķiniet uz Excel opcijas pogas, lai parādītu Excel opcijas logu
- Noklikšķiniet uz Populārs sarakstā kreisajā pusē dialogā.
- Pārbaudiet 'Rādīt izstrādātāja cilni lenti "
- Noklikšķiniet uz pogas Labi.
Šajā cilnē Izstrādātājs tagad vajadzētu parādīties lentē bārā. Ja jūs atvērtu cilni Izstrādātājs, jūs varat atrast Vadīklas sadaļā, kurai ir nolaižamo izvēlni ar nosaukumu Ievietojiet kur forma un ActiveX vadīklas tiek novietotas.
Howto: Maina vērtības atsevišķu šūnu, izmantojot makro
Uzglabāt skaits 3 šūnā F3, izmantojiet šādu komandu korpusa makro:
Diapazons ("F3") vērtība = 3.
Tas radītu vērtību 3 uz šūnā F3 aktīvās darblapas aktīvās darbgrāmatas.
Lai ievietotu vērtību citā darbgrāmatā izmantot šādu komandu.
Darbgrāmatas ("BookName"). Darblapas ("SheetName"). Klase ("F3") vērtība = 3.
. Vērtība īpašumu var arī nolasīt vērtību no šūnas.
x = Range ("F3"). Vērtība
Vai. Vērtība īpašums tiek izmantots, lai izlasītu vērtību vai piešķirt vērtību atkarīgs kurā pusē vienādības zīme tiek ievietots.
Tomēr tas attiecas tikai uz Makro un nevis lietotāja definēts funkcijas. Lai gan tas ir iespējams nolasīt vērtību uz lietotāja definēta funkcija un tā nešķiet iespējams piešķirt vērtību šūnā.
) Dim Msg, Style, Title, Help, Ctxt, Response, MyString \r\nMsg = \"Do you want to continue ?\" ' Define message. Sabiedrības funkcija MyFunc (makrosa_nosaukums Kā String) Dim Ziņu, Stils, Nosaukums, palīdzība, Ctxt, reaģēšana, MyString \ r \ nMsg = \ "Vai vēlaties turpināt \!" 'Definēt ziņu. \ R \ nStyle = vbYesNo + vbCritical + vbDefaultButton2 'Definēt pogas. \ R \ nTitle = \ "MsgBox pierādīšana \" 'Definēt nosaukumu. \ R \ nHelp = \ "DEMO.HLP \" 'Definēt Palīdzība failu. \ R \ nCtxt = 1000 'Definēt tēmu \ r \ n' konteksts. \ R \ n 'Displeja ziņu. \ R \ nResponse = MsgBox (MSG, stils, Nosaukums, Palīdzība, Ctxt) \ r \ nJa atbildes = vbYes Tad "Lietotājs izvēlējās Jā. \ R \ n MyString = \ "Jā \" "Veikt kādu darbību. \ R \ nElse 'Lietotāja izvēlējās Nr \ r \ n MyString = \ "Nē \" "Veikt kādu darbību. \ R \ nEnd Ja
"," Stils = \ "fona: # FFFFFF; padding: 2px; font-size: 10px; platums: 550px; \" ");" onMouseOut = "GAL_hidepopup ();"> MsgBox . "Inside MyFunc Nodots argumentu" un makrosa_nosaukums
Application.Run makrosa_nosaukums
End Function
Related posts:

















































