Innholdsfortegnelse:
Video: Web Scraping with Nokogirl/Kimono by Robert Krabek 2024
Her finner du noen relativt enkle tilpassede Excel VBA-regnearkfunksjoner som også er veldig nyttige. Disse funksjonene kalles wrapperfunksjoner fordi de består av kode som er pakket innom egentlige VBA-elementer. Med andre ord tillater de deg å bruke VBA-funksjoner i regnearkformler.
Funksjon Bruker () 'Returnerer navnet på den nåværende brukeren Bruker = Program. Brukernavn Sluttfunksjon
Denne funksjonen gir i hovedsak formene dine tilgang til egenskapen UserName i applikasjonsobjektet.
Nummerformatfunksjonen
Denne funksjonen viser bare tallformatet for en celle. Det kan være nyttig hvis du må sikre at en gruppe celler alle har samme nummerformat.
Funksjon NumberFormat (Cell) 'Returnerer cellens nummerformat NumberFormat = Cell (1). NumberFormat End Function
Merk bruk av Cell (1)? Hvis et multicell-område brukes som argument, blir bare den første cellen brukt.
Du kan enkelt skrive lignende funksjoner som returnerer en celles tekstfarge, bakgrunnsfarge, skrift osv.
Funksjonen ExtractElement
Denne innpakningsfunksjonen returnerer en substring fra en tekststreng som inneholder flere elementer, adskilt av et skilletegn. For eksempel returnerer denne formelen ku, som er det tredje elementet i en streng som bruker et mellomrom som en separator. Argumentene kan selvsagt være cellehenvisninger.
= ExtractElement ("hund hest ku katt", 3, "")
Her er koden, som er en wrapper for VBAs Split-funksjon:
Function ExtractElement (Txt, n, Sep) 'Returnerer det neste elementet i en tekststreng, hvor elementene er adskilt med et spesifisert separatortegn ExtractElement = Split (Application. Trim (Txt), Sep) (n - 1) Sluttfunksjon
Bildet nedenfor viser ExtractElement-funksjonen som brukes i regnearkformler. Kolonne A inneholder tekststrengen, kolonne B inneholder elementnummeret som skal trekkes ut, og kolonne C inneholder avgrenseren (celler som ser ut til å være tomme, inneholder et mellomrom).
Bruk ExtractElement-funksjonen til å returnere et element fra en streng.SayIt-funksjonen
Denne enkle funksjonen er en wrapper for Speak-metoden i Applikasjonen. Taleobjekt. Den bruker en syntetisert stemme til å "snakke" argumentet.
Funksjon SayIt (txt) 'Snakker argumentet Application. Tale. Snakk txt, True End-funksjon
Her er et eksempel:
= IF (C10> 10000, SayIt ("Over budsjett"), "OK")
Formelen kontrollerer celle C10. Hvis verdien er større enn 10 000, snakker funksjonen teksten: "Over budsjett."Hvis verdien er mindre enn 10 000, viser funksjonen teksten OK (og sier ikke noe).
Bruk sparsomt. Hvis du bruker denne funksjonen mer enn en gang, kan det være veldig forvirrende. Husk også at denne funksjonen blir evaluert hver gang regnearket er beregnet, så stemmen kan bli svært irriterende hvis du gjør mange endringer. Denne funksjonen er trolig mer egnet til underholdningsformål.
IsLike-funksjonen
VBAs Like-operatør er en svært fleksibel måte å sammenligne tekststrenger med. Sjekk det ut i VBA Help-systemet. Denne funksjonen gir denne kraften til regnearkformlene:
Funksjon IsLike (tekst, mønster) 'Returnerer sant hvis det første argumentet er som det andre IsLike = tekst Som mønster Sluttfunksjon