Excel HOWTO'er
Sendt den 03. Oktober, 2009 af Krishnan i Computere , Howto
Howto: Call en Excel makro fra en anden
Hvis du har et regneark, der har flere makroer, er det muligt at påberåbe sig en fra den anden. Du skal bruge udsagnet "kald [navn på makro at blive kaldt]" hver gang du ønsker en bestemt makro blive kaldt.
f.eks: Body of macro0 kan indeholde følgende kode til at påberåbe sig andre makroer
Hvis x = 1
kalder Macro1
ellers hvis x = 2
kalder Macro2
andet
kalder macro3
endif
* Edited senere *
Dette gælder kun for makroer, og det synes ikke at være muligt at påberåbe makroer ved hjælp af kald fra brugerdefinerede funktioner.
Howto: Tilføj knapper, afkrydsningsfelter, kombinationsfelter i Excel2007
Office 2003 havde "værktøjslinjen Formularer", der indeholdt alle de objekter, såsom knapper, afkrydsningsfelter kombinationsfelterne osv.
I Office 2007, har denne funktionalitet er flyttet til fanen Udvikler. Du er nødt til manuelt at aktivere fanen Udvikler på båndet baren som følger.
- Klik på overdimensionerede Office-logoet knappen i øverste venstre hjørne
- Klik på Excel-indstillinger knappen for at vise Excel-indstillinger i dialogboksen
- Klik på Populær i listen i venstre side af dialogen.
- Tjek 'Vis fanen Udvikler på båndet "
- Klik på OK-knappen.
I fanen Udvikler nu skal vises på båndet baren. Hvis du åbner fanen Udvikler, kan du finde Controls afsnit, som har en drop-down menu mærket Sæt hvor form og ActiveX-objekter er placeret.
Howto: Skift værdierne af de enkelte celler ved hjælp af makroer
For at gemme nummer 3 i celle F3, skal du bruge følgende kommando i kroppen af makroen:
Range ("F3"). Value = 3
Dette vil placere værdien 3 ind i celle F3 af det aktive regneark i den aktive projektmappe.
For at placere værdien i en anden projektmappe skal du bruge følgende kommando.
Workbooks ("BookName"). Worksheets ("ARKNAVN"). Range ("F3"). Value = 3
Den. Value Ejendommen kan også læse en værdi fra en celle.
x = Range ("F3"). Value
Uanset om. Egenskaben bruges til at læse en værdi eller tildele en værdi afhænger af, hvilken side af lighedstegnet det er placeret.
Dette gælder dog kun for makroer og ikke brugerdefinerede funktioner. Selv om det er muligt at læse en værdi for en bruger defineret funktion, og det synes ikke at være muligt at tildele en værdi til en celle.
) Public Function MyFunc (MacroName As String) Dim Msg, Style, Titel, Hjælp, Ctxt, Response, MyString \ R \ nMsg = \ "Vil du fortsætte? \" "Definér besked. \ R \ nStyle = vbYesNo + vbCritical + vbDefaultButton2 'Definér knapper. \ R \ nTitle = \ "MsgBox Demonstration \" "Definér titel. \ R \ nHelp = \ "DEMO.HLP \" 'Definer Hjælp-fil. \ R \ nCtxt = 1000 'Definer emne \ R \ n 'kontekst. \ R \ n 'vises på displayet. \ R \ nResponse = MsgBox (Msg, Style, Title, Hjælp Ctxt) \ R \ nHvis svar = vbYes Then 'Brugeren vælger Ja. \ R \ n MyString = \ "Ja \" "udføre en handling. \ R \ nElse 'brugeren vælger Nej \ R \ n MyString = \ "Nej \" "udføre en handling. \ R \ nEnd Hvis
"," Style = \ "background: # FFFFFF; padding: 2px, font-size: 10px; bredde: 550px; \" ");" onMouseOut = "GAL_hidepopup ();"> MsgBox . "Inside MyFunc Bestået argument" & MacroName
Application.Run MacroName
End Function
Relaterede stillinger:

















































