automatiser ???

C

Catrice

XLDnaute Barbatruc

• 16 Septembre 2008

• #2

Re : automatiser ???

Bonjour,

2 solutions ci-jointes.
Pour la 2 eme il y a une liste de validation

 

Pièces jointes

• interim.xls

  13.5 KB · Affichages: 68
• interim.xls

  13.5 KB · Affichages: 72
• interim.xls

  13.5 KB · Affichages: 69

Vote positif 0 Vote négatif

K

kjin

XLDnaute Barbatruc

• 16 Septembre 2008

• #3

Re : automatiser ???

Bonjour,
RechercheV en VBA, dans le module de la feuille1

Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Count > 1 Then Exit Sub
If Target.Column = 1 And Target.Row > 1 Then
On Error Resume Next
Target = Application.WorksheetFunction.VLookup(Target, Sheets(2).Range("A2:B5"), 2, 0)
End If
End Sub

Cliquez pour agrandir...

A+
kjin

 

Vote positif 0 Vote négatif

I

isa_nick

XLDnaute Nouveau

• 16 Septembre 2008

• #4

Re : automatiser ???

C'est effectivement une recherche que je souhaite mais je débute et votre réponse ne me dis pas grand chose... merci de m'éclairer...

 

Vote positif 0 Vote négatif

K

kjin

XLDnaute Barbatruc

• 16 Septembre 2008

• #5

Re : automatiser ???

Re,
J'ai rajouter une autre version
A+
kjin

 

Pièces jointes

• rechercheV_Find.zip

  15.6 KB · Affichages: 37

Vote positif 0 Vote négatif