Collage spécial en VBA

Fermé
AHTOUATI - 22 nov. 2016 à 14:11
michel_m Messages postés 16603 Date d'inscription lundi 12 septembre 2005 Statut Contributeur Dernière intervention 16 décembre 2023 - 23 nov. 2016 à 08:39
Bonjour,
Worksheets("Feuil1").Range("A" & Rows.Count).End(xlUp).EntireRow.Copy Worksheets("SAVBD").Range("A" & Rows.Count).End(xlUp)(2)

maintenant lorsque je valide les chiffres sont portés sur la base de donné comme une valeur texte
exemple 5 000.00 dans la base de donné elle est porté 5 000.00 étant un texte, et elle ne sera prise comme chiffre que lorsque je tappe F2 à la cellule

ma question est de m'aidé SVP de trouver un code pour ne pas tappé à chaque fois F2

merci d'avance

A voir également:

1 réponse

michel_m Messages postés 16603 Date d'inscription lundi 12 septembre 2005 Statut Contributeur Dernière intervention 16 décembre 2023 3 310
23 nov. 2016 à 08:39
Bonjour

par exemple
Dim texte As String, nombre As Double
texte = Range("G4")
nombre = CDbl(Replace(texte, ".", ","))
--
 Michel
0