Décaage de chifrre vers autre colonne

[Aladin]

Bonjour le forum

J' ai un tableau excel avec une colonne comportant des chiffres
exemple 120 et cellule en dessous -80. J' aimerais savoir comment faire pour décaler d' une colonne les chiffres intitulé (-50) sans toucher aux autres céllules du tableau.
Merci à tous ceux qui pourront m' aider à trouver une solution

Aladin

 

[Robert]

Bonsoir Aladin, bonsoir le forum,

La macro ci-dessous décale les cellules négatives de C à D. Adapte-la à ton cas.

Sub Macro1()
'boucle sur toutes les cellule éditées de la colonne C
For Each cel In Range("C1:C" & Range("C65536").End(xlUp).Row)
'condition : si la cellule est négative
If cel.Value < 0 Then
cel.Offset(0, 1).Value = cel.Value 'la cellule à droite= la cellule
cel.Value = "" 'la cellule = vide
End If 'fin condition
Next cel 'prochaine cellule éditée de la colonne C
End Sub

À plus,

Robert

 

[Aladin]

Bonjour le forum

Merci Robert pour la macro car elle fonctionne impecable


Aladin

 

[dermience]

merci Robert j'ai également chargé la macro

excellente journée