Division automatique d'une colonne par 1000

Bonjour,

Tu veux réellement diviser par 1000 ?
Si oui et que collage-spécial te lasse ça sera en vba.

Sinon, si c'est pour l'affichage et que tu peux garder tes valeur tu peux te faire un format personnalisé : une espace après le format divise par 1000 (2 espaces par 1000000, etc)
Tu peux aussi ajouter l'unité dans le format, exemple :
0 " k€"

Si tu préféres une macro précise-le dans le prochain post

eric

Re,

Une macro à mettre dans la feuille ou dans un module :

Sub div1000() 
    Dim c As Range 
    If MsgBox("Division par 1000 des cellules de la sélection ?", vbYesNo + vbExclamation, "ATTENTION") = vbYes Then 
        For Each c In Selection 
            If IsNumeric(c) Then c = c / 1000 
        Next c 
    End If 
End Sub 

Sur le même modèle tu peux en faire une qui multiplie par 1000 en cas d'accident.
Sur une macro il n'y a pas d'annulation par excel.

eric

merci de ton aide