Petit test a modifier en VBA

Bonjour,

A adapter suivant votre besoin,

Sub test()
    With Worksheets("feuil1")
        If Month(.Range("O1")) <> Month(Now) Then
            .Range("A3") = ""
        Else
            .Range("A3") = .Range("O23") - .Range("O16")
        End If
    End With
End Sub

Bonsoir f894009

Merci pour la réponse et la traduction en VBA, cela va mettre bien utile enfin j'espere

je teste demain matin de bonne heure, neurones en régénération ihihihi

bonne soirée a toi et encore merci

Cordialement Raymond

Bonjour f894009

j'ai adapter a mon besoin et c'est bon pour moi

encore merci pour la traduction

Merci beaucoup et une très bonne journée a toi

Cordialement Raymond