jours VBA

[OFFSET]

Bonjour à tous,

J'ai un problème à 10 sesterces avec VBA, je n'arrive pas à identifier le jour de la semaine d'une date.

Auriez-vous une idée?

Merci d'avance pour votre aide

A+ Offset

 

[tototiti2008]

Re : jours VBA

Bonjour Offset,

avec la fonction WeekDay, peut-être

Sub test()
    MsgBox Weekday(Date, vbMonday)
    MsgBox Format(Date, "dddd")
End Sub

 

[OFFSET]

Re : jours VBA

Merci pour la réponse, finalement je viens de trouver comme un grand en applicant ce code:

Dim X As Range

Worksheets("pli").Select
Set X = Worksheets("pli").Range("A1")

X.Select

Myvar = Application.WorksheetFunction.Weekday(X)

If Myvar = 4 Then

.......

Else
End If
End Sub

A+ OFFSET