Supprimer les décimales des nombres, Excel VBA

Sub SupprimerDecimales() 
Dim lResult As Long
Dim lnumber As Double
Dim plagecell As Range
For Each plagecell In Selection
plagecell.Value = Int(plagecell)
plagecell.NumberFormat = "0"
Next plagecell 
End Sub

Ce code vous aidera simplement à supprimer toutes les décimais des nombres de la plage sélectionnée.

S’abonner
Notifier de
0 Commentaires
Inline Feedbacks
Voir tous les commentaires

Initiation à Excel

Fonctions Excel

Excel VBA

Macros VBA Utiles

Plus d'outils

Sur Facebook

Sur YouTube

0
Nous aimerions avoir votre avis, veuillez laisser un commentaire.x