Code VBA valeur absolue

Papou-net

XLDnaute Barbatruc

• 11 Juin 2013

• #2

Re : Code VBA valeur absolue

Bonsoir Pol,

S'il s'agit de convertir des cellules dans une plage sélectionnée, voici un exemple de code:

Code:

For Each cel In Selection
  cel.Value = CInt(cel.Value)
Next

Cordialement.

 

Vote positif 0 Vote négatif

P

Pol

XLDnaute Occasionnel

• 11 Juin 2013

• #3

Re : Code VBA valeur absolue

Bonsoir Merci papou-net mais la macro semble remplir les cellules vides par une zero alors que je souhaite remplacer les cellules négatives par des cellules positives,

si 4 en A1 et -4 en A2 je souhaite obtenir après exécution de la macro 4 en A1 et 4 en A2,

merci pour ton aide

 

Vote positif 0 Vote négatif

C

Compte Supprimé 979

Guest

• 11 Juin 2013

• #4

Re : Code VBA valeur absolue

Bonjour le fil

"CInt" n'a jamais été pour retournée une valeur absolue, mais une valeur entière
"Abs" en revanche, oui

Code:

For Each cel In Selection
  cel.Value = Abs(cel.Value)
Next

A+

 

Dernière modification par un modérateur: 11 Juin 2013

Vote positif 0 Vote négatif