Ved hjelp av en kombinasjon av innebygde funksjoner i Microsoft Excel og funksjoner du oppretter ved hjelp av VBA kan hjelpe deg å finne løsninger på mer komplekse problemer . Du kan lage funksjoner i en VBA- modul i Excel som vil returnere et resultat basert på en inndataparameter . Funksjonen du laget vil være tilgjengelig for bruk i Excel sammen med alle andre Excel innebygde funksjoner . I noen få trinn kan du lage en funksjon for å returnere den aktuelle dagen som en String , basert på dagens system dato. Instruksjoner
en
Klikk A1 og skriv inn " = NÅ ( ) " for å få dagens system dato. Klikk på " Developer " og klikk " Visual Basic " for å starte VB Editor. Klikk på " Insert"-menyen og klikk " Module" for å sette inn en ny kode modul
2
Opprett en ny funksjon med en " Date" datatype variabelen som et innspill parameter : .
< P > Public Function getDayOfWeek ( dateEntered Som Date )
3
Lag en variabel til å holde dagen nummer:
Dim dayNum As Integer
4
Bruk " Weekday " funksjonen til å returnere dagen ved hjelp av " dateEntered " variable : en
dayNum = Weekday ( dateEntered , vbSunday )
5
Bruk en "Case" uttalelse til bestemme dag og returnere dagen navn som en String : en
Velg sak dayNum
sak 1
getDayOfWeek = "Søndag"
tilfelle 2
getDayOfWeek = " Mandag "
sak 3
getDayOfWeek = " tirsdag "
sak 4
getDayOfWeek = " onsdag "
sak 5
getDayOfWeek = " Torsdag "
sak 6
getDayOfWeek = " fredag "
sak 7
getDayOfWeek = " Lørdag "
End Velg
6
End din funksjon ved å skrive " End Function" på slutten. Bytt tilbake til Microsoft Excel og skriv inn " = getDayOfWeek ( A1 )" i B1 å vise den aktuelle dagen ved hjelp av datoen i A1 .