[AC-2010] Problème avec #Type! [Résolu]

[Kevin80]

* Bonjour, *

Voilà j'aimerais savoir comment faire pour que #Type! ne s'affiche pas dans la zone de texte?

Merci d'avance

[Orion34080]

Dans quels cas de figure ton #Type! s'affiche-t-il ?
Quel code ?
Exemple ?

Michel

[Kevin80]

Voilà je m'explique j'ai 4 champs:
-le 1er "NBSemaines"
-le 2nd est un champ texte simple
-le 3ème "DateAccordPlan"
-le 4ème "DateDébutMontage"

Le but de cette manipulation est que la "DateDébutMontage" se saisisse toute seule.

Je rentre le "NBSemaines" par exemple 6 mais ca peut etre rien aussi.
Le champs texte peut etre "semaines après accord sur plan" ou bien "courant janvier" dans ce cas la je met rien dans "NBSemaines" et c'est la que le problème #Type! apparait ce qui est normal car il y a rien dans la ZDT "NBSemaines" c'est pour ceci que je vous demande comment faire pour que "#Types!" ne s'affiche pas même si dans "NBSemaines" il n'y a rien de saisie.

En faite on rajoute le nb de semaines à la "DateAccordPlan" ce qui me donne la datedébut montage.
Merci

[Kevin80]

Voici 2 illustrations qui vous serons plus claire:

[Orion34080]

A mon avis, si le calcul qui apparait dans ta rubrique "AUTO" se refait lorsque tu sélectionnes un item de ta liste déroulante (celle qui contient : "semaines apres accord sur plan" ou "courant janvier") c'est dans l'évenement "après MAJ" de cette liste déroulante qu'il faut que tu prévois

- de remettre à 0 la rubrique "NB Semaines"
- de remettre " " dans cette rubrique "AUTO" qui affiche pour l'instant "#TYPE!"

Ca pourrait ressembler à ça, le code "Apres MAJ" de la liste déroulante :

Code :

1
2
3
4
Private Sub MaListeDeroulante_AfterUpdate()
    Me.NbSemaines = 0
    Me.Auto = ""
End Sub

Et pourquoi pas, d'y intégrer aussi le calcul permettant de renseigner la Date de début Montage...

Michel

[Kevin80]

Ce n'est pas une liste déroulante mais une ZDT.
La ZDT Auto se fait avec grâce au NB qui est devant la ZDT "semaines après accord sur plan".

Cependant je ne peux pas mettre 0 dans cette zone car ca ne doit pas mettre "0 Courant Janvier" ceci ne veut rien dire surtout que je sors un accusé de réception ou c'est écrit dessus.

Il n'y a t'il pas une proprièté dans une ZDT qui empêcherait d'afficher ce "#Type!" ??

Merci d'avance

[Kevin80]

Code :

1
2
3
Private Sub DateAccord_Plan_AfterUpdate()
DatePrevisionnelle_Montage = DateAdd("j", ([NBSemainesAccordSurPlan] * 7), DateAccord_Plan)
End Sub

Voici ma syntaxe mais rien ne s'affiche dans la ZDT DatePrevisionnelle_Montage. Pourquoi?

[Kevin80]

Solution trouver c'est "d" qu'il faut mettre.

Merci