Soru Hafta ve yıl ile tam tarihi bulma

[Lainathiel]

Merhabalar,

Hafta ve yıl ile tam tarihi bulmak istiyorum. Örneğin; 30. hafta 24. yıl tarihini 22.07.2024 gibi tarihe dönüştürmek için makro, formül önerebilir misiniz?

Teşekkürler.

 

[okan32]

Merhabalar,

Hafta ve yıl ile tam tarihi bulmak istiyorum. Örneğin; 30. hafta 24. yıl tarihini 22.07.2024 gibi tarihe dönüştürmek için makro, formül önerebilir misiniz?

Teşekkürler.

Sub HaftaTarihineDonustur()
    Dim hafta As Integer
    Dim yil As Integer
    Dim tarih As Date
      hafta = Range("A1").Value
    yil = Range("B1").Value
         tarih = DateSerial(yil, 1, (hafta - 1) * 7 + 1)
            Range("C1").Value = tarih
          MsgBox hafta & ". hafta, " & yil & " yılı tarihi: " & tarih
End Sub

 

[Korhan Ayhan]

Formülle çözüm...

 

[Lainathiel]

Herkese teşekkür ederim destekleri için.

Formülle çözüm...



Ekli dosyayı görüntüle 254097

Üyeliği olmadığı için bakamıyorum, mesaj olaraj direkt yazma şansınız var mı ?

 

[Korhan Ayhan]

İki resim paylaştım. Birisini görebiliyor olmanız gerekir.

=DATE(B2;1;B1*7-6)