TextBox non Modifiable

[Bruce68]

Bonsoir à tous
A l'aide d'un UserForm j'initialise les noms avec une ComboBox puis chaque TextBox avec: TextBox = Cells(Lgn, 1) pour une vingtaine de TextBox.
Apres je recopie mes TextBox à l'aide de: Range ("D"& Lgn).Value = TextBox1, cela me permet de modifier certaines TextBox, avec ce systeme je peux modifier des TextBox qui ne devraient pas etre modifiees, quand c'est du texte j'ai remplace TextBox par Label mais pour des chiffres cela n'est pas possible ( ils sont considéres comme du texte et moi j'ai besoin de chiffres).
Comment faire pour resoudre cette enigme.
Merci de votre aide.

 

[Cousinhub]

Re : TextBox non Modifiable

Bonsoir,
essaie avec :

Range("A1").Value = CDbl(TextBox1.Value)

 

[Bruce68]

Re : TextBox non Modifiable

Bonsoir bhbh et le forum

Ta solution ne fonctionne pas, merci quand meme pour l'essai

 

[Bruce68]

Re : TextBox non Modifiable

Bonsoir à tous

Est il possible dans un UserForm de neutaliser des TextBox ou des valeurs sont entrees en automatiques, pour ne pa pouvoir les modifier par erreur.
Fichier joint TextBox en question couleur bleue.
Je vous remercie de votre aide

 

[Cousinhub]

Re : TextBox non Modifiable

Bonsoir,
mets leur propriété Enable à True (en espérant que cela fonctionne cette fois...)😉

 

[Bruce68]

Re : TextBox non Modifiable

Bonsoir bhbh
Merci de ta reponse mais voilà ou je dois mettre cela ?

 

[Cousinhub]

Re : TextBox non Modifiable

re-,
clic droit sur le textbox, propriétés
et recherche Enable, clique à droite, une flèche, choisis False (et non true comme dit précédemment) comme quoi....
Ce doit être l'heure....

 

[Bruce68]

Re : TextBox non Modifiable

Merci bhbh
je venais de trouver en cherchant un peut partout on trouve cela fonctione mais la lecteur devient tres difficille n'y t'il pas un moyen pour y remedier.
Merci de votre aide