Convertir en nombre après importation

Boostez vos compétences Excel avec notre communauté !

Rejoignez Excel Downloads, le rendez-vous des passionnés où l'entraide fait la force. Apprenez, échangez, progressez – et tout ça gratuitement ! 👉 Inscrivez-vous maintenant !

mikael2235

XLDnaute Occasionnel
Bonjour à tous,

Je suis entrain de faire une macro qui m'importe des données depuis un fichier vers une feuille excel avec l'option "xml to list".

J'ai dans 2 colonnes des nombres qui apparemment ne sont pas au bon format, puisque après l'importation, ces nombre sont au format texte. J'ai donc le petit triangle vert qui me propose pour chaque cellule de convertir en nombre.

Je peux le faire manuellement, mais je n'arrive pas via macro.

J'ai essayé ceci mais ça ne fonctionne pas.
Code:
Sub Macro_Extract()
'
' Macro1 Macro
'

'
    ChDir "Z:\"
    Workbooks.OpenXML Filename:="Z:\test_macro.cpf", LoadOption:= _
        xlXmlLoadImportToList
    Columns("A:BQ").Select
    Selection.Delete Shift:=xlToLeft

    Columns("O:O").Select
    Selection.Delete Shift:=xlToLeft
   
    Range("A1").Select
    j = Selection.End(xlDown).Row
    Rows("2:" & j - 1).Select
    Selection.Delete Shift:=xlUp
    
    Range("J65000").End(xlUp).Select
    k = ActiveCell.Row
    
    For i = 2 To k
        If IsEmpty(Cells(i, 10)) = False Then
        Cells(i, 10).Select
        Selection.Copy
        v = Selection.Value
        ActiveCell.ClearContents
        ActiveCell.Value = v
        End If
    Next

Merci pour votre aide.

Mikael
 
- Navigue sans publicité
- Accède à Cléa, notre assistante IA experte Excel... et pas que...
- Profite de fonctionnalités exclusives
Ton soutien permet à Excel Downloads de rester 100% gratuit et de continuer à rassembler les passionnés d'Excel.
Je deviens Supporter XLD

Discussions similaires

Réponses
4
Affichages
178
Réponses
5
Affichages
477
Réponses
2
Affichages
1 K
Réponses
9
Affichages
1 K
Réponses
13
Affichages
2 K
Retour