[VBA] Affecter une valeur à une zone de texte récalcitrante

Affecter une valeur à une zone de texte récalcitrante [VBA] - VB/VBA/VBS - Programmation

Marsh Posté le 08-12-2006 à 11:19:30    

Salut,
 
je veux bêtement affecter en VBA (Access 97) une valeur à une zone de texte :

Code :
  1. Forms("IndexingForm" )("ztProcess" ).Value = "blabla"


Mais voilà ce que ça me dit à l'exécution :

Citation :

Impossible d'attribuer une valeur à cet objet
* L'objet est peut-être un contrôle sur un formulaire en lecture seule.
* Il peut être un formulaire en mode Création.
* Il est possible aussi que al valeur soit trop grande pour ce champ


Mes réponses :
1) Je ne pense pas, j'ai regardé les pptés du formulaire : Entrée données = Oui
2) Non
3) C'est une bête zone de texte
 
J'ai même essayé d'ajouter ça avant, sans succès :

Code :
  1. Forms("IndexingForm" )("ztUse" ).Enabled = True
  2. Forms("IndexingForm" )("ztUse" ).Locked = False


(je pense que le Enabled=True est inutile pour ça en plus)
 
 
What is the problem ? :cry:


Message édité par Peanuty le 08-12-2006 à 13:04:34
Reply

Marsh Posté le 08-12-2006 à 11:19:30   

Reply

Marsh Posté le 08-12-2006 à 12:18:10    

d'ou vient ta valeur? d'une table? comment tu la retrouve ?par un recordset?
si tel est le cas fais simplement
me!zone=rst!valeure   rst etant ton recordset

Reply

Marsh Posté le 08-12-2006 à 12:44:14    

Elle vient d'une liste déroulante (zone de liste modifiable) :  

Code :
  1. Forms("IndexingForm" )("ztUse" ).Value = Forms("IndexingForm" )("zlmUse2" ).Value


 
Mais j'ai l'impression que le problème vient des propriétés de ma zone de texte ou quelquechose comme ça, parce que la mise à jour d'une autre zone de texte fonctionne, elle :

Code :
  1. Forms("IndexingForm" )("ztReleaseMinor2" ).Value = Str(Val(Forms("IndexingForm" )("ztReleaseMinor" ).Value) + 1)

Reply

Sujets relatifs:

Leave a Replay

Make sure you enter the(*)required information where indicate.HTML code is not allowed