Eski bir web tarayıcısı kullanıyorsunuz. Bu veya diğer siteleri görüntülemekte sorunlar yaşayabilirsiniz.. Tarayıcınızı güncellemeli veya alternatif bir tarayıcı kullanmalısınız.
Sub KacinciHaftadayizBulBakalim()
Dim Tarih As Date, Hafta As Integer
Tarih = Date
Hafta = DatePart("ww", Tarih, vbMonday, vbFirstJan1)
MsgBox "Bugün: " & Date & " --> Yılın " & Hafta & ". Haftası"
End Sub
Uygulama Adımları
Microsoft Visual Basic for Applications penceresini...