probleme de macro

[sandra]

Ma feuille de calcul comporte 140 donnees dans une meme colonne qui sont de la forme pour 2 cellules successives:

1,00 3,32e+02,
2,00 -9,54e-10,

Je voudrais creer une macro qui me permet de retirer le chiffre (pour la cellule 1): 1,00 et egalement la virgule apres le chiffre : -3,32e+02, de meme pour la cellule 2, je voudrais retirer le chiffre 2,00 et la virgule apres le chiffres -9,54e-10 et ainsi de suite pour mes 140 donnees. Pouvez vous me dire exactement quel texte je dois taper dans la macro.

 

[KarlTheo]

Salut,

Cette macro devrait te coller en colonne B les infos désirées :

Sub KTH()
  With ActiveSheet
    For i = .Range('A65536').End(xlUp).Row To 1 Step -1
      .Cells(i, 2) = Mid(.Cells(i, 1), 1 + WorksheetFunction.Find(' ', .Cells(i, 1), 1), Len(.Cells(i, 1)) - WorksheetFunction.Find(' ', .Cells(i, 1), 1) - 1)
    Next i
  End With
End Sub

Mais pquoi une macro? Une formule aurait été plus simple (exemple pour la version US) :
=MID(A1;1+FIND(' ';A1;1);LEN(A1)-FIND(' ';A1;1)-1)

a+