Discussion :

[brunoaimej]

Bonjour,
J'ai un souci relatif au développement d'un programme de gestion de réservation. A l'ouverture du programme j'ai toujours ce message d'erreur.
Je suis sous W10 et excel 2016 64B

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
Sub Ce_Jour()
    Dim La_Date, Décalage_Date
    La_Date = [Date_Deb].Value
    Décalage_Date = DateDiff("d", La_Date, Int(Now)) - 14
    [_DC].Value = Décalage_Date
End Sub

Merci à tous pour votre aide.

[Menhir]

A l'ouverture du programme j'ai toujours ce message d'erreur.

Quel message ?

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

    Dim La_Date, Décalage_Date

Tu devrais déclarer le type de tes variables.

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

    La_Date = [Date_Deb].Value

C'est quoi [Date_Deb] ?

[Invité]

Bonjour à tous,

Je pense que [Date_Deb] et [_DC] sont des noms de cellules, et s'ils ne sont pas renseignés

[ylemasson]

Bonjour

Non je ne pense pas car les variables n'étant pas typées, la cellule peut tout à fait être vide. Je pencherais plutot pour un nommage défectueux. Etes-vous sur du nom de la cellule ? Sa portée est-elle correcte ? N'êtes vous pas en train de chercher un nom sur la mauvais feuille ?

Cdlt

[Menhir]

Je pense que [Date_Deb] et [_DC] sont des noms de cellules, et s'ils ne sont pas renseignés

"je pense que" ??? Tu n'as pas vérifié ?
Si tu as la solution du problème, quel est l'objet de ta demande ?

Tu n'as pas répondu à ma première question.

[Invité]

Bonjour Menhir,

Je pense que n'est pas l'auteur de la demande

[Menhir]

Mea Culpa mimimathy.