Månadsindex från månadsnamn

If manad = "februari" then
manad = "2"
Elseif manad = "juni" then
manad = "6"
End if

det var en ful lösning. Det måste ju finnas några funktioner för detta...

Function getMonth(monthNr)

	Select Case monthNr
		Case 1 manad = "Januari"
		Case 2 manad = "Februari"
		Case 3 manad = "Mars"
		Case 4 manad = "April"
		Case 5 manad = "Maj"
		Case 6 manad = "Juni"
		Case 7 manad = "Juli"
		Case 8 manad = "Augusti"
		Case 9 manad = "September"
		Case 10 manad = "Oktober"
		Case 11 manad = "November"
		Case 12	manad = "December"
	End Select
	
	getMonth = manad
	
End Function

Oj, du får kanske vända på det om du skall göra som du skrev i ditt första inlägg.

Var får du månadsnamnet ifrån?

Det känns bättre att ha ett datum i variabeln istället, så kan du använda datumfunktioner som Month(), MonthName() osv.

Anders:
Det har du rätt i. Jag skall ordna det så löser det sig...