Mise à jour liste

P

papoow

Guest

• 21 Septembre 2004

• #2

C'est parti trop vite !

Bien entendu, Merci beaucoup pour votre aide

Cordialement Papoow

 

Vote positif 0 Vote négatif

H

Hervé

Guest

• 21 Septembre 2004

• #3

bonjour papoow

essaye ceci :

Option Explicit
Public Sub papoow()
Dim plage As Range
Dim cel As Range
Set plage = Sheets("source").Range("a2:a16")
For Each cel In plage
If cel.Value = Sheets("travail").Range("a13") Then
cel.Offset(0, 1) = Sheets("travail").Range("d13")
End If
Next cel

End Sub

salut
Hervé

 

Vote positif 0 Vote négatif

R

Robert

Guest

• 21 Septembre 2004

• #4

Salut Papoow, Hervé, le forum,

Sans grand intérêt puisque pratiquement à l'identique d'Hervé si ce n'est que j'ai placé la macro dans l'événement "Change" de l'onglet travail.

À plus,

Robert

 

Pièces jointes

• Helpme.zip

  9.4 KB · Affichages: 28
• Helpme.zip

  9.4 KB · Affichages: 20
• Helpme.zip

  9.4 KB · Affichages: 25

Vote positif 0 Vote négatif

C

CHti160

Guest

• 21 Septembre 2004

• #5

salut"papoow"
bonsoir aux participants
Bonsoir le "FORUM"
un petit fichier joint qui reprend le code de Hervé modifié
A voir
A+++
Jean Marie

 

Pièces jointes

• HelpmeV1.zip

  7.3 KB · Affichages: 20

Vote positif 0 Vote négatif

P

papoow

Guest

• 22 Septembre 2004

• #6

Bonjour le forum,

Merci, à Hervé pour sa rapidité, la macro proposée fonctionne sur l'exemple, je le mets en place sur mon fichier "travail" et vous tiens informé.

Merci, à Robert et Jean Marie, pour le complément!
Je regarde cela et vous donne mes commentaires (Je vais en réunion...).

Cette fonction, "mise à jour de liste" va me servir sur plusieurs fichiers.

Un grand merci pour votre aide, j'apprends chaque jour à mieux utiliser Excel.

A bientôt

 

Vote positif 0 Vote négatif

P

papoow

Guest

• 22 Septembre 2004

• #7

Bonjour le forum,

Robert, Jean Marie,

Ok, j'ai regardé vos propositions, approches différentes et/ou compléments aux codes d'Hervé !

Nickel, Merci,
Je n'hésiterai pas, à faire de nouveau appel à vous.

Bonne Soirée,

A bientôt sur ce super forum.

Papoow

 

Vote positif 0 Vote négatif