Atentionare pentru ziua de sambata si duminica

[ccirtina]

Cum fac sa se afiseze un mesaj daca data afisata cade intr-o zi de sambata, duminica?
Am atasat exemplul cu care lucrez, bineinteles ca aceste metode le putem folosi si in alte lucrari.
Va multumesc.

[Dr.Windows]

Poti folosi functia WEEKDAY in VBA (nu te speria ca link-ul este pentru Access 2007 - la fel se apeleaza si in Word 2003/2007).

Un mic exemplu ar fi asa:

Cod: Selectaţi tot

Sub TestWeekday()
    Dim lDate As Date
    Dim nDay As Byte
    
    lDate = Date
    nDay = Weekday(lDate)
    If nDay = 1 Or nDay = 7 Then
        MsgBox "Astazi este weekend"
    Else
        MsgBox "Astazi NU este weekend"
    End If
End Sub