Catégories
Macro VBA Maths & Stats Macros VBA

VBA Sgn() : macro pour indiquer le signe d’un nombre

Partager :

La fonction Sgn dans VBA permet de réaliser une macro pour pour indiquer le signe d'un nombre.

La fonction Sgn

La fonction VBA Sgn suit la syntaxe suivante :

Sgn(variable)

Le résultat prend les valeurs suivantes :

  • 0 lorsque la valeur est égale à zéro
  • 1 lorsque le valeur est positive (strictement supérieure à zéro)
  • -1 lorsque le valeur est négative (strictement inférieure à zéro)

Exemple de macro avec Sgn

La macro

Sub nommacro()

Dim c As Range 'Variable

For Each c In Range("A1:A5") 'Plage

'Cellule actuellement sélectionnée
ActiveCell.Offset(0, 0).FormulaR1C1 = _
Sgn(c)

'Cellule suivante située en bas
ActiveCell.Offset(1, 0).Select

Next c

End Sub

Les données sources

ABCDE
19
2-16
3-625
41024
50

Le résultat

ABCDE
191
2-16-1
3-625-1
410241
500