Discussion :

[emac07]

Bonjour ,

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

Code :

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

Nom_Pl_Reel = CStr (Newval)

mais cela me genère une erreur

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

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

Code :

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

Nom_pl =CInt (Text_2)

et l'erreur suivante est générer

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

Merci de m'éclairer

[ucfoutu]

Bonjour,

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

La preuve :

Code :

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

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

[Pierre Fauconnier]

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?