Transcription dans l'ordre

Re : Transcription dans l'ordre

Bonjour,

Voir du côté des fonctions de conversion, CInt, Cdbl, Val etc....

Exemple:

Mettre les cellules au format désiré dans l'interface utilisateur ou

A+

Re : Transcription dans l'ordre

Re Hasco, le Forum

j'ai modifié avec CDBL et je n'ai plus d'astérisque. Mais j'ai toujours le problème de la transcription des valeurs sur la feuille.
La boucle ne doit pas correspondre à mon souhait.

Roby

Re : Transcription dans l'ordre

Re le forum

Personne peut m'aider sur mon problème posé

bonne fin de journée.

Re : Transcription dans l'ordre

Bonsoir le forum

ci-dessous le code qui me pose un problème:


Private Sub OK_Click()
'Bouton Valider
Dim n, NbTxt As Integer
If OptionButton1 = True Then 'Choix 1
NbTxt = (TextBox1.Value * 2) + 2
For n = 3 To NbTxt
ActiveCell.Offset(n - 3, 0) = Right(Me.Controls("TextBox" & n).Value, 6)
ActiveCell.Offset(n - 3, 1) = Right(Me.Controls("TextBox" & n + 1).Value, 6)
Next
Else 'Choix 2
NbTxt = (TextBox1.Value * 3) + 2
For n = 3 To NbTxt
ActiveCell.Offset(n - 3, 0) = Me.Controls("TextBox" & n).Value
ActiveCell.Offset(n - 3, 1) = Me.Controls("TextBox" & n + 1).Value
ActiveCell.Offset(n - 3, 2) = Me.Controls("TextBox" & n + 2).Value
Next
End If
Unload Me
End Sub


Les données sont décalées et je ne trouve pas la bonne formule pour ne faire apparaitre par ligne les saisies effectuées.
Merci par avance de votre patience.