Bonjour a tous,

J'ai un petit soucis avec le format de colonnes de mon tableau.
Ce tableau se remplit grâce a une moulinette Autocad.
Le problème que je rencontre est que dans certaines colonnes (D,H,I,J) j'ai des surfaces écrites de la manière suivante : '12.3 m2 donc pas possible de les utiliser pour faire des calculs.
J'ai bien réussis avec le code suivant a supprimer les m2, a remplacer le . par une , mais impossible de supprimer la "cote" devant le nombre.
Merci d'avance pour votre aide

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
Sub Macro2()
 
'Supprime m2
    Columns("D:D").Select
    Selection.Replace What:="m²", Replacement:="", LookAt:=xlPart, _
    SearchOrder:=xlByRows, MatchCase:=False, SearchFormat:=False, _
    ReplaceFormat:=False
 
'Remplace . par ,
    Range("D:D,H:H,I:I,J:J").Select
    Selection.Replace What:=".", Replacement:=",", LookAt:=xlPart, _
    SearchOrder:=xlByRows, MatchCase:=False, SearchFormat:=False, _
    ReplaceFormat:=False
 
End Sub