Division automatique d'une colonne par 1000

Résolu
PAtrick -  
 PAtrick -
Bonjour,

Je dois souvent diviser des nombres par 1000. De manière générale, j'utilise le menu collage spécial mais cela prend du temps.
Ainsi, je souhaite créer un raccourci dans la barre supérieure d'excel afin de pouvoir diviser automatiquement par 1000 des cellules de mon choix?

Merci de votre aide



3 réponses

Réponse 1 / 3
eriiic Messages postés 24603 Date d'inscription   Statut Contributeur Dernière intervention   7 276
 
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
1
PAtrick
 
Merci de votre réponse.
Oui si c'est possible de faire une macro, c'est parfait. Mais je ne sais pas comment faire...

Merci d'avance
0
Réponse 2 / 3
eriiic Messages postés 24603 Date d'inscription   Statut Contributeur Dernière intervention   7 276
 
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
1
Réponse 3 / 3
PAtrick
 
merci de ton aide
1

Discussions similaires

Différence 1000 Mbit/s et 1 Gb/s
BurjKhalifa -
kaumune -

4 réponses