Excel'de hafta numarasını tarihe veya tam tersine nasıl dönüştürürüm?

Excel'de tarihler ve hafta numaralarıyla çalışmak, iş analitiği, proje planlama ve raporlamada yaygın bir ihtiyaçtır. Örneğin, belirli bir tarihin hangi haftaya denk geldiğini öğrenmek isteyebilirsiniz veya belirli bir yılda belirli bir hafta numarası için tarih aralığını belirlemek isteyebilirsiniz. Ancak Excel, hafta numaralarını tam tarih aralıklarına dönüştürmek veya bu işlemi hızlıca tersine çevirmek için doğrudan yerleşik seçenekler sunmaz. Bu ihtiyaçları karşılamak için, özel gereksinimlerinize ve işlemek istediğiniz veri miktarına bağlı olarak çeşitli formüller, VBA çözümleri ve diğer Excel özelliklerini kullanabilirsiniz. Aşağıda, Excel'de bu görevi gerçekleştirmek için birkaç pratik yöntem bulunmaktadır.

Formüllerle hafta numarasını tarihe dönüştürme

Formüllerle tarihi hafta numarasına dönüştürme

VBA kodlarıyla hafta numarası ve tarih arasında dönüştürme

Formüllerle hafta numarasını tarihe dönüştürme

Diyelim ki çalışma sayfanızda belirli bir yıl ve hafta numarası girildi (örneğin, 2015 hücrede B1 ve 15 hücrede B2). Bu haftanın gerçek başlangıç tarihini (Pazartesi) ve bitiş tarihini (Pazar) hesaplamak isteyebilirsiniz. Bu, programlama planlaması yaparken, haftalık özetler hazırlarken veya haftalık raporlama dönemlerine referans verirken özellikle yararlı olabilir.

Belirtilen hafta numarası için tarih aralığını hesaplamak için aşağıdaki Excel formüllerini kullanabilirsiniz:

1. Başlangıç tarihini görüntülemek için boş bir hücre seçin (burada, hücre B5). Aşağıdaki formülü girin ve Enter tuşuna basın. Formül, tarihi temsil eden bir seri numarası döndürecektir.

=MAX(DATE(B1,1,1),DATE(B1,1,1)-WEEKDAY(DATE(B1,1,1),2)+(B2-1)*7+1)

2. Aynı haftanın bitiş tarihi için (örneğin, hücre B6'da), aşağıdaki formülü girin ve ardından Enter tuşuna basın. Formül, belirtilen haftanın son günü için seri numarasını döndürecektir.

=MIN(DATE(B1+1,1,0),DATE(B1,1,1)-WEEKDAY(DATE(B1,1,1),2)+B2*7)

Not: Yukarıdaki formüllerde, B1 yılı içeren hücredir (örneğin, 2015) ve B2 dönüştürmek istediğiniz hafta numarasını içerir. Gerçek çalışma sayfanız için bu hücre referanslarını gerektiği gibi ayarlayın.

3. Formüller başlangıçta biçimlendirilmiş tarihler yerine sayılar döndürür. Doğru tarih formatını görüntülemek için, her iki formül hücresini de seçin ve gidin Ana Sayfa > Sayı Biçimi açılır menü > Kısa Tarih. Bu, değerleri tanınabilir tarihler haline getirecektir.

Formüllerle tarihi hafta numarasına dönüştürme

Tersine, belirli bir tarihin hangi haftaya denk geldiğini belirlemek isteyebilirsiniz. Excel, bu amaç için WEEKNUM fonksiyonunu sağlar. Bu, zaman çizelgesi verilerini analiz ederken, haftalık raporlar oluştururken veya teslimatları ve olayları haftalık olarak izlerken özellikle kullanışlıdır.

1. Hafta numarasının çıktısını almak için boş bir hücre seçin. Aşağıdaki formülü girin (tarihinizin B1'de olduğunu varsayarsak):

=WEEKNUM(B1,1)

2. Ardından, Entertuşuna basın. Bu formül, haftanın ilk günü Pazar olarak kabul edildiğinde hafta numarasını döndürür.

Notlar:

(1) Bu formülde, B1 dönüştürmek istediğiniz tarihi içeren hücredir.

(2) Haftaları Pazartesi gününden başlayarak saymayı tercih ederseniz (ISO hafta sisteminde yaygın olan), formülün şu versiyonunu kullanın:

=WEEKNUM(B1,2)

VBA kodlarıyla hafta numarası ve tarih arasında dönüştürme

Bu makalede, iki VBA rutinini inceleyeceğiz: biri hafta numarasını (ve yılı) karşılık gelen tarih aralığına dönüştüren, diğeri ise belirli bir tarih için ISO hafta numarasını belirleyen rutinler.

Hafta numarasını tarih aralığına dönüştürme:

1. Geliştirici > Visual Basic'e tıklayarak VBA Düzenleyicisini açın. Açılan pencerede Ekle > Modül'e tıklayın ve aşağıdaki kodu modüle yapıştırın:

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. Makroyu düğmesini kullanarak çalıştırın. Yıl ve hafta numarası için size soracak, ardından ilgili tarih aralığını bir iletişim kutusunda gösterecektir.

Tarihi hafta numarasına dönüştürme:

1. Aşağıdaki VBA kodunu kopyalayıp modüle yapıştırın:

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. Bu kodu ekledikten ve çalıştırdıktan sonra, hedef tarihinizi girin ve makro hafta numarasını Pazartesi gününü haftanın başlangıcı olarak kabul ederek gösterecektir. Kodu, WeekNum'daki ikinci argümanı değiştirmek suretiyle Pazar gününü haftanın başlangıcı olarak ayarlayabilirsiniz.

İlgili makaleler:

Excel'de iki tarih arasında belirli hafta içi günlerin sayısını nasıl sayarım?

Excel'de tarihe gün / ay / yıl ekleme / çıkarma nasıl yapılır?