Hoe converteert u een weeknummer naar een datum, of vice versa, in Excel?
Werken met datums en weeknummers in Excel komt veelvuldig voor bij bedrijfsanalyses, projectplanning en rapportages. U wilt bijvoorbeeld weten in welke week een bepaalde datum valt of de bijbehorende datumreeks bepalen voor een specifiek weeknummer in een gegeven jaar. Helaas biedt Excel geen directe, ingebouwde functie om een weeknummer eenvoudig om te zetten naar een volledige datumreeks – of vice versa. Gelukkig zijn er diverse oplossingen beschikbaar: afhankelijk van uw specifieke behoeften en de hoeveelheid data die u wilt verwerken, kunt u gebruikmaken van slimme formules, VBA-scripts of andere Excel-functies. Hieronder vindt u praktische methoden om deze taak efficiënt uit te voeren in Excel.
Converteer Weeknummer naar datum met formules
Converteer datum naar Weeknummer met formules
Converteer tussen Weeknummer en datum met VBA-code
Converteer Weeknummer naar datum met formules
Stel dat u een specifiek jaar en een weeknummer in uw werkblad heeft ingevoerd (bijvoorbeeld)2015 in cel B1 en 15 in cel B2). Dan kunt u de werkelijke startdatum (maandag) en einddatum (zondag) van die week berekenen — bijvoorbeeld voor planning, het opstellen van wekelijkse samenvattingen of het raadplegen van wekelijkse rapportageperiodes.
Gebruik de volgende Excel-formules om de Datumreeks voor de opgegeven Weeknummer te berekenen:
1. Selecteer een lege cel om de startdatum weer te geven (hier cel)B5). Voer de volgende formule in en druk op Enter. De formule retourneert een serienummer dat de datum vertegenwoordigt.
=MAX(DATE(B1,1,1),DATE(B1,1,1)-WEEKDAY(DATE(B1,1,1),2)+(B2-1)*7+1) 2. Voer in cel B6 de volgende formule in voor de einddatum van dezelfde week en druk op Enter. De formule retourneert het serienummer van de laatste dag van de opgegeven week.
=MIN(DATE(B1+1,1,0),DATE(B1,1,1)-WEEKDAY(DATE(B1,1,1),2)+B2*7)
Opmerking: In bovenstaande formules bevat B1 het jaar (bijvoorbeeld 2015) en bevat B2 het weeknummer dat u wilt converteren. Pas deze celverwijzingen indien nodig aan uw eigen werkblad aan.
3. De formules leveren in eerste instantie getallen op in plaats van opgemaakte datums. Selecteer beide formulecellen en ga naar Start > Getalnotatie-keuzelijst > Korte datum om de juiste datumnotatie weer te geven. Zo worden de waarden automatisch omgezet naar herkenbare datums.
Tips: Deze formules zijn gebaseerd op het ISO-weekdatumsysteem (waarbij weken op maandag beginnen), dat veel wordt gebruikt in Europese loonadministratie- en rapportagestandaarden. Als uw organisatie een ander weeknummersysteem hanteert, kunnen de resultaten afwijken. Controleer de uitkomsten altijd dubbel voor jaren die midden in de week beginnen (bijvoorbeeld wanneer 1 januari geen maandag is) of jaren met 53 weken.
Converteer datum naar Weeknummer met formules
U kunt ook het weeknummer bepalen waarin een bepaalde datum valt. Daarvoor gebruikt u de functie WEEKNUMMER in Excel. Dit is vooral handig bij het analyseren van urenregistraties, het genereren van wekelijkse rapporten of het bijhouden van leveringen en evenementen per week.
1. Kies een lege cel voor het weeknummer en voer de volgende formule in (ervan uitgaande dat uw datum in)B1 staat):
=WEEKNUM(B1,1) 2. Druk vervolgens op Enter. Deze formule retourneert het weeknummer, waarbij zondag als eerste dag van de week wordt beschouwd.
Opmerkingen:
(1) In deze formule bevat B1 de cel met de datum die u wilt converteren.
(2)Als u weken liever laat beginnen op maandag (zoals in het ISO-weksysteem), gebruikt u deze versie van de formule:
=WEEKNUM(B1,2) Converteer tussen Weeknummer en datum met VBA-code
In dit artikel bespreken we twee VBA-routines: één die een weeknummer (en jaar) omzet naar de bijbehorende datumreeks, en een andere die het ISO-weeknummer bepaalt voor een willekeurige datum.
Converteer Weeknummer naar Datumreeks:
1. Open de VBA-editor door te klikken op Ontwikkelaar > Visual Basic. Klik in het venster dat verschijnt op Invoegen > Module en plak de onderstaande code in de module:
Sub WeekNumberToDateRange()
Dim YearNum As Long
Dim WeekNum As Long
Dim FirstDay As Date, LastDay As Date
Dim Jan4 As Date
YearNum = Application.InputBox("Enter the year:", "KutoolsforExcel", Year(Date), Type:=1)
If YearNum < 1 Then Exit Sub
WeekNum = Application.InputBox("Enter the week number:", "KutoolsforExcel", 1, Type:=1)
If WeekNum < 1 Then Exit Sub
Jan4 = DateSerial(YearNum, 1, 4)
FirstDay = Jan4 - Weekday(Jan4, vbMonday) + 1
FirstDay = FirstDay + (WeekNum - 1) * 7
LastDay = FirstDay + 6
MsgBox "Start date: " & Format(FirstDay, "yyyy-mm-dd") & vbCrLf & _
"End date: " & Format(LastDay, "yyyy-mm-dd"), _
vbInformation, "KutoolsforExcel"
End Sub
2. Voer de macro uit met de knop
. U wordt gevraagd het jaar en het weeknummer in te voeren; daarna verschijnt de bijbehorende datumreeks in een dialoogvenster.
Converteer datum naar Weeknummer:
1. Kopieer de volgende VBA-code en plak deze in de module:
Sub DateToWeekNumber()
Dim InputDate As Date
Dim WeekNum As Integer
InputDate = Application.InputBox("Enter the date (yyyy-mm-dd):", "KutoolsforExcel", Date, Type:=2)
WeekNum = WorksheetFunction.WeekNum(InputDate, 2)
MsgBox "The week number is: " & WeekNum, vbInformation, "KutoolsforExcel"
End Sub
2. Nadat u deze code hebt ingevoegd en uitgevoerd, voert u de gewenste datum in wanneer daarom wordt gevraagd. De macro toont het weeknummer waarbij maandag als begin van de week geldt. U kunt de code aanpassen door het tweede argument in WeekNummer te wijzigen in 1 voor weken die op zondag beginnen.
vbMaandagof vbZondagin de VBA-code dienovereenkomstig aan.Converteer met één klik meerdere niet-Standaard opmaak-datums naar normale datums in Excel
Met het hulpprogramma van Kutools voor Excel herkent en converteert u in één klik eenvoudig niet-standaard datums of getallen (zoals yyyymmdd) of platte tekst naar de standaard datumnotatie in Excel – voor meer productiviteit en minder handmatige conversiefouten! Start nu uw gratis 30-daagse proefversie met alle functies!
Gerelateerde artikelen:
Hoe telt u het aantal keren dat een specifieke weekdag voorkomt tussen twee datums in Excel?
Hoe voegt u dagen, maanden of jaren toe aan een datum in Excel of trekt u deze ervan af?
Beste Office-productiviteitshulpmiddelen
Geef uw Excel-vaardigheden een boost met Kutools voor Excel en ervaar efficiëntie zoals nooit tevoren.Kutools voor Excel biedt meer dan 300 geavanceerde functies om de productiviteit te verhogen en Tijd besparen.Klik hier om de functie te krijgen die u het meest nodig heeft...
Office Tab brengt een tabbladinterface naar Office en maakt uw werk veel eenvoudiger
- Schakel tabbladbewerking en -lezen in voor Word, Excel, PowerPoint, Publisher, Access, Visio en Project.
- Open en maak meerdere documenten aan in nieuwe tabbladen binnen hetzelfde venster, in plaats van in afzonderlijke vensters.
- Verhoogt uw productiviteit met 50 % en bespaart u dagelijks honderden muisklikken!
Alle Kutools-add-ins in één installatieprogramma.
Kutools for Office bundelt add-ins voor Excel, Word, Outlook en PowerPoint, plus Office Tab Pro—ideaal voor teams die met meerdere Office-apps werken.
- Alles-in-één suite— add-ins voor Excel, Word, Outlook & PowerPoint plus Office Tab Pro
- Één installatieprogramma, één licentie— binnen enkele minuten klaar (MSI-geschikt)
- Werkt beter samen— gestroomlijnde productiviteit in alle Office-apps
- 30 dagen volledig functionele proefversie— geen registratie, geen creditcard
- Beste prijs-kwaliteitverhouding— bespaar ten opzichte van het afzonderlijk kopen van add-ins