Petit test a modifier en VBA

dudulleray -  
 dudulleray -
Bonsoir a tous, Forum bonsoir



Excel 2007 VBA Windows 7 32 Bits

Je souhaiterai svp modifier le code ci-dessous en VBA

Merci pour aide et votre temps

Bonne soirée a tous

Cdlt Ray

=SI(MOIS(O1)<>MOIS(AUJOURDHUI());"";SOMME(O23-O16))

3 réponses

  1. f894009 Messages postés 17417 Date d'inscription   Statut Membre Dernière intervention   1 717
     
    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
    1
  2. dudulleray
     
    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
    0
  3. dudulleray
     
    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
    0