Remplir liste en fontion donnees en x collone

lahtag · 9 Avril 2007

Bonjour,
J'ai une liste de donne compose de plusieurs colonne. Je cherche a ajouter une autre colonne dans la valeur dependera de la valeur d'une autre colonne.
Je join un exemple pour information.

Remerciements./.

bqtr · 9 Avril 2007

Re : Remplir liste en fontion donnees en x collone

Bonjour lahtag,

Une façon de faire :

Code:

Sub colRegion()
Dim cell As Range
For Each cell In Range("A4:A" & Range("A65536").End(xlUp).Row)
  Select Case cell.Value
   Case Is = "Branche001", "Branche002"
        cell.Offset(0, 4).Value = "Nord"
   Case Is = "Branche003", "Branche004"
        cell.Offset(0, 4).Value = "Est"
   Case Is = "Branche005"
        cell.Offset(0, 4).Value = "Centre"
   End Select
Next
End Sub

Bonne soirée

lahtag · 9 Avril 2007

Re : Remplir liste en fontion donnees en x collone

Cher Monsieur,

Vous etes un ange qui arrive du ciel. Merci infiniment pour votre precieuse aide. C'est exatement ce dont j'avais besoin. J'ai teste et ca marche tres bien.

Sinceres remerciements
Bonne soiree.

Remplir liste en fontion donnees en x collone

lahtag

Guest

Pièces jointes

bqtr

XLDnaute Accro

lahtag

Guest

Discussions similaires

Remplir liste en fontion donnees en x collone

lahtag

Guest

Pièces jointes

bqtr

XLDnaute Accro

lahtag

Guest

Discussions similaires

Privacy & Transparency

Privacy & Transparency