Ved hjælp af en kombination af indbyggede funktioner i Microsoft Excel og funktioner, du opretter ved hjælp af VBA kan hjælpe dig med at finde løsninger på mere komplekse problemer. Du kan oprette funktioner i et VBA -modul i Excel , som vil returnere et resultat baseret på en input parameter. Den funktion, du oprettede vil være til rådighed til brug i Excel sammen med alle andre Excel indbyggede funktioner . I et par trin, kan du oprette en funktion til at returnere den aktuelle dag som en String , der bygger på det nuværende system dato. Instruktioner
1
Klik A1 og skriv " = NOW () " for at få det nuværende system dato. Klik på " Udvikler " fanen og klik på " Visual Basic " for at starte VB Editor. Klik på " Indsæt" menuen og klikke på " Modul " for at indsætte en ny kode modul
2
Opret en ny funktion med en " Date" datatype variabel som input parameter : .
< P > Public Function getDayOfWeek ( dateEntered Som Date )
3
Opret en variabel til at holde den dag nummer : Hej
Dim dayNum As Integer
4
Brug " Ugedag "-funktionen til at returnere den dag nummer ved hjælp af " dateEntered " variable : Hej
dayNum = Weekday ( dateEntered , vbSunday )
5
Brug en "Case" erklæring til bestemme dagen og returnere den dag navnet som en String : Hej
Vælg Case dayNum
Case 1
getDayOfWeek = "Sunday "
Case 2 < br >
getDayOfWeek = "Monday "
Case 3 fotos
getDayOfWeek = " Tuesday"
Case 4 fotos
getDayOfWeek = " onsdag"
sag 5
getDayOfWeek = " Thursday"
Case 6 fotos
getDayOfWeek = "Friday "
sag 7
getDayOfWeek = "Saturday "
End Vælg
6
Afslut din funktion ved at skrive " End Function" i sidste ende. Skift tilbage til Microsoft Excel og skrive " = getDayOfWeek (A1 )" i B1 for at vise den aktuelle dag ved hjælp af datoen i A1 .