Conversion texte en nombre

[biarritz]

Bonjour
J'extrait de données de SAP
J'ai besoin de faire un tableau croisé dynamique qui me donnerait la somme de Val2 et la somme de VAL1 pour A et B
Le probleme est que mes datas ne sortent pas sous forme de chiffre
Ce qui me donne 0 en valeur dans le Tableau Croisé dynamique
est ce que qq'un aurait une idée svp pour convertir les datas val1 et val2 en chiffre ou en nombre
MerciVoir fichier joint

 

[Xoomer]

Re : Conversion texte en nombre

par contre je doit te dire qu'avec ma façon cela marchais, il transférait en nombre sauf avec un message d'erreur, et en suite quand je cliquais sur fin débogage, et bien mon nombre était correct dans ma feuille

 

[Xoomer]

Re : Conversion texte en nombre

Peu être que je pourrais inserer une macro dans mon bouton Validez qui convertirais NON ?

 

[Dranreb]

Re : Conversion texte en nombre

Déclarez Valeur As Variant, c'est tout.

 

[Xoomer]

Re : Conversion texte en nombre

Dranreb, cela fonctionne, j'ai juste un petit pépin, ma colonne A est sous format date, donc il m'affiche ne peu être converti en valeur Monétaire

 

[Xoomer]

Re : Conversion texte en nombre

voudrais-tu que j'insere mon fichiers test ?

 

[Xoomer]

Re : Conversion texte en nombre

voilà le fichiers

 

[Dranreb]

Re : Conversion texte en nombre

Ça n'a pas de rapport avec le format de la cellule destinatrice, encore qu'un format de date soit bizarre pour une valeur monétaire. Ça dépend seulement du contenu de la propriété Text de la TextBox. Celui ci est affiché entre doubles quottes dans le message.

Ah ok, mal compris le problème. Remplacer Text par Value alors.

 

[Xoomer]

Re : Conversion texte en nombre

je ne comprend ton dernier message, quand je clique sur Validez, dans ma feuille la date de s'inscris pas.

 

[Dranreb]

Re : Conversion texte en nombre

Mais qu'est-ce que vous avez fichu ? C'est toujours Ctrl qu'il faut employer dans le For Each et avec ses propriété Tag et Value, Valeur c'est une variable de travail supplémentaire.

 

[Xoomer]

Re : Conversion texte en nombre

A quel endroit inséré ton code alors?

 

[Xoomer]

Re : Conversion texte en nombre

si je comprend bien je ajouté un Dim Valeur As Variant?

 

[Dranreb]

Re : Conversion texte en nombre

Écoutez, avec des contrôles de natures différentes vous allez au devant de problèmes plus complexes que vous ne vous y attendiez, qui vont peut être nécessiter des modules de classe. Vous auriez meilleurs temps de vous rabattre sur un code simple que vous saurez maintenir, de ce genre, en tout premier jet :

Option Explicit

Private Sub CommandButton1_Click()
Dim V2(1 To 1, 1 To 5), DerLigne As Long
On Error GoTo Erreur
V2(1, 1) = Me.MonthView1.Value
V2(1, 2) = Me.ComboBox1.Text
V2(1, 3) = CCur(Me.TextBox1.Text)
V2(1, 5) = CCur(Me.TextBox2.Text)
With Worksheets("Base")
   DerLigne = .Cells(65000, "C").End(xlUp).Row + 1
   .[A:E].Rows(DerLigne).Value2 = V2
   End With
Exit Sub
Erreur: MsgBox Err.Description
End Sub

 

[Xoomer]

Re : Conversion texte en nombre

ca marche, je vais essayer maintenant dans le vrai classeur

Merci Dranreb!

 

[Xoomer]

Re : Conversion texte en nombre

Dranreb,

je tiens vraiment à te remercier, tout marche très bien, j'ai un formulaire avec 31 entrées de données, cela va être pas mal moins long à complété dans un formulaire.

Merci!