Remplacement d'une valeur

JBOBO

XLDnaute Accro

• 12 Mai 2011

• #2

Re : Remplacement d'une valeur

Bonjour,

Un essai avec une formule à placer en D3 puis à tirer vers le bas :

=SI(B3="";"";SI(ESTNUM(CNUM(GAUCHE(B3;8)));B3;SIERREUR(EQUIV("6???????";B4;0);D2)))

Cliquez pour agrandir...

Puis faire un copier/collage spécial/Valeurs de la colonne D vers la colonne B

 

Vote positif 0 Vote négatif

Victor21

XLDnaute Barbatruc

• 12 Mai 2011

• #3

Re : Remplacement d'une valeur

Bonjour, Mathieu13950

Essaie :

VB:

Sub remplace()
Dim Cell As Range
For Each Cell In [B2:B45]
If Cell.Offset(0, -1) <> "" Then
Cell = Cell.Offset(-1, 0)
End If
Next

End Sub

 

Vote positif 0 Vote négatif

M

mathieu13950

XLDnaute Nouveau

• 12 Mai 2011

• #4

Re : Remplacement d'une valeur

Bonjour JBOBO et Victor21,

JBOBO , la formule marche pas : il me trouve bien le compte mais quand c'est un code au lieu de me mettre le compte il me met : NOM?.

Victor21, La formule marche parfaitement. Je vais l'arranger pour l'adapter à mes colonnes.

Merci en tout cas à tous les deux de vous être penché sur mon petit problème

Bonne fin de journée à vous 2...

Mathieu

 

Vote positif 0 Vote négatif

JBOBO

XLDnaute Accro

• 12 Mai 2011

• #5

Re : Remplacement d'une valeur

re,

Bizarre, chez moi ça fonctionne !

Voir Piece jonte !

 

Pièces jointes

• REMPLACER(1).xlsx

  11.4 KB · Affichages: 75

Vote positif 0 Vote négatif

M

mathieu13950

XLDnaute Nouveau

• 13 Mai 2011

• #6

Re : Remplacement d'une valeur

Re, JBOBO,

En fait ça marche...je sais pas pourquoi hier ça ne fonctionnait pas.

En tout cas merci

Bonne journée

 

Vote positif 0 Vote négatif

Victor21

XLDnaute Barbatruc

• 13 Mai 2011

• #7

Re : Remplacement d'une valeur

Re,

En plus court, toujours en D3 à recopier vers le bas:

=SI(A3="";B3;D2)

Cliquez pour agrandir...

 

Vote positif 0 Vote négatif