Bonjour,
Dans ma macro je souhaiterais arrondir mes montants a l unité lorsque la devise est JPY, mais je n arrive pas a creer le bout de code pour cela.
Pourriez vous m aider ?
Attention, il faut que le montant dans la cellule soit vraiment a l'unité (pas seulement un changement visuel du format)
J ai essayé cela mais ca ne fonctionne pas (en colonne D mes devises et en colonne E les montant):
Range("D5").Select
Do Until ActiveCell.Value = ""
If ActiveCell.Value = "JPY" Then
ActiveCell.Offset(0, 1) = Round(ActiveCell, 0)
End If
ActiveCell.Offset(1, 0).Activate
Loop
Dans ma macro je souhaiterais arrondir mes montants a l unité lorsque la devise est JPY, mais je n arrive pas a creer le bout de code pour cela.
Pourriez vous m aider ?
Attention, il faut que le montant dans la cellule soit vraiment a l'unité (pas seulement un changement visuel du format)
J ai essayé cela mais ca ne fonctionne pas (en colonne D mes devises et en colonne E les montant):
Range("D5").Select
Do Until ActiveCell.Value = ""
If ActiveCell.Value = "JPY" Then
ActiveCell.Offset(0, 1) = Round(ActiveCell, 0)
End If
ActiveCell.Offset(1, 0).Activate
Loop