Objet requis

Romane -  
eriiic Messages postés 24581 Date d'inscription   Statut Contributeur Dernière intervention   -
Bonjour,

Je suis sous la version de 2010 d'EXCEL.
Je souhaite réaliser une macro pour me permettre d'avoir un msgbox lorsqu'une date arrive à échéance.
voici mes lignes de code


Sub macro1()

If mois.decaler(a5) > 23 Then
MsgBox "okok"
Else
MsgBox "pasokok"
End If

End Sub


Et lorsque que je souhaite l'activer, il me sort un msg "Objet requis"..
j'ai éssayer de trouver une solution sur le site de Microsoft, mais cela ne convient pas.

2 réponses

  1. f894009 Messages postés 17417 Date d'inscription   Statut Membre Dernière intervention   1 717
     
    Bonjour,

    =mois.decaler(a5;2): c'est une formule a mettre dans une cellule, pas a utiliser en VBA
    0
  2. eriiic Messages postés 24581 Date d'inscription   Statut Contributeur Dernière intervention   7 281
     
    Bonjour,

    Tu peux le calculer, +3 mois :
    a = DateSerial(Year([A1]), Month([A1]) + 3, Day([A1]))

    eric

    En essayant continuellement, on finit par réussir.
    Donc plus ça rate, plus on a de chances que ça marche.(les Shadoks)
    En plus du merci (si si, ça se fait !!!), penser à mettre en résolu. Merci
    0