Discussion :

[Gualino]

Bonsoir.

En option strict OFF, ceci fonctionne

Code :

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

TextBoxCpX.Text = Val(xlWorkSheet.Cells(3, 3).value).ToString("F2")

Mais en option strict ON, je ne m'en sort pas.

Y a t il un moyen de mettre Strict OFF juste pour quelque lignes?

Edit
Et encore, çà ne fonctionne que pour les nombres....

[chrismonoye]

Bonjour,
peut être un problème de Cast.
Principalement :

Lorsqu'une méthode ou une propriété retourne Object, vous devez convertir explicitement (en Visual Basic) l'objet en type correct dans les projets Visual Basic dans lesquels Option Strict est activé.

Genre :

Code :

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

1
2
        Dim castRange As xls.Range = CType(objFeuille.Cells(1, 3), xls.Range)
        Me.txtValeur.Text = Val(castRange.Value).ToString("F2")

A voir.

[hunteshiva]

Bonjour,

Et encore, çà ne fonctionne que pour les nombres....

Normal, quand tu lit la doc MSDN de la fonction Val:

Returns the numbers contained in a string as a numeric value of appropriate type.

si ça retourne un nombre, tu aura du mal a convertir "toto" en nombre

ensuite je ne comprend pas ton problème.
tu cherche à convertir une cellule Excel en Nombre,
pour la remettre dans un environnement de type string (textBox.text)... quels intérêt?

[Gualino]

Bonjour,
peut être un problème de Cast.
Principalement :

Genre :

Code :

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

1
2
        Dim castRange As xls.Range = CType(objFeuille.Cells(1, 3), xls.Range)
        Me.txtValeur.Text = Val(castRange.Value).ToString("F2")

A voir.

Merci çà fonctionne.