Bonjour,

Afin de transformer des nombres dont certains sont au format texte en chiffre, j'avais utilisé ce code :

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
Dim PNLE2 As Long, k As Byte, Account As Range
        PNLE2 = .Cells(.Rows.Count, 1).End(xlUp).Row
        k = 1
 
            For Each Account In .Range("B2:B" & PNLE2)
            Account.Value = Account.Value * k
                With Account.NumberFormat = General
                End With
            Next Account
Du coup, je l'ai remplacé par celui-ci, qui a l'avantage d'être plus rapide :

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
        Dim PNLE2 As Long
        PNLE2 = .Cells(.Rows.Count, 2).End(xlUp).Row
 
            With .Range("K2:K" & PNLE2)
                .Formula = "=VALUE(RC[-9])"
                .Value = .Value
                .Copy .Range("B2:B" & PNLE2)
                .ClearContents
            End With
Ca marche au niveau du résultat recheché, mais lors de cette ligne :

Code : Sélectionner tout - Visualiser dans une fenêtre à part
.Copy .Range("B2:B" & PNLE2)
La première valeur copiée commence en L3 (au lieu de B2)...

Savez-vous pourquoi et surtout pouvez-vous SVP m'aider à obtenir le résultat désiré ?

Je vous remercie énormément par avance (je suis dans le jus et ai peu de temps devant moi, toute aide sera énormément appréciée).