Problème avec CStr et CInt

Bonjour ,

J'utilise CStr pour faire la conversion d'un entier en String

Code:

---

Nom_Pl_Reel = CStr (Newval)

---

mais cela me genère une erreur

Citation:

---

Erreur d'Exécution '13' INCOMPATIBILITE DE TYPE

---

Et
pour la conversion d'une chaine de caractère en Entier j'utilise

Code:

---

Nom_pl =CInt (Text_2)

---

et l'erreur suivante est générer

Citation:

---

Erreur d'exécution '91': Variable objet ou variable de bloc With non définie

---

Merci de m'éclairer

Bonjour,

ton erreur est à chercher ailleurs que dans cet emploi ...

La preuve :

Code:

---

1 2 3 4 5 6 7 8 9 10

Option Explicit Private Sub Command1_Click() Dim newval As Integer, Nom_Pl_Reel As String, Nom_pl As Integer newval = 12 Nom_Pl_Reel = CStr(newval) MsgBox Nom_Pl_Reel   Nom_pl = CInt("14") MsgBox Nom_pl End Sub

---

Fonctionnera bien et sans message d'erreur ;)

Bonjour

Pour le premier problème, c'est probablement que
Nom_Pl_Reel n'est pas une variable de type string
et que NewVal n'est pas une valeur qui peut être traduite en chaine de caractères puis dans le type défini pour Nom_Pl_Reel

Donc =>, faire attention au transtypage implicite de VB(A). C'est parfois surprenant à manipuler. Faire également attention au typage de tes variables.

Pour la deuxième erreur, je suppose que Text_2 est un contrôle (zone de texte, probablement) qui n'est pas accessible au moment de traiter sa propriété par défaut (Userform fermé, ...)

Donc => Vérifier que l'objet qui contient le contrôle est chargé et/ou ouvert. Faire attention à l'utilisation des propriétés par défaut...


Ok?