Bonjour,
J'ai cherché des tutos ou autres codes sources mais je saisis pas trop comment utiliser correctement la méthode find; surtout ses arguments en fait.

- J'ai une feuille Clients, dans laquelle il y a uniquement une liste de clients.
- Pour trouver un client jusqu'à maintenant j'utilisais le code suivant
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
 
Type Client
CID as integer
Nom as string
Pre as string
'Je continue pas c'est pas là l'imporant
End Type
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
 
dim PlageClients as Range
dim i, CID_Rech as Integer
dim Test as Client
 
Set PlageClients = sheets("Clients").Range("A1").CurrentRegion
 
for i = 1 to PlageClients.Rows.Count
if PlageClients.Cells(i, 1) = CID_Rech Then Exit For
next i
 
With PlageClients
Test.CID = .Cells(i, 1).Value
Test.Nom = .Cells(i, 2).Value
'Etc. j'abrège
End With
Voilà je voudrait savoir si avec une méthode Find le code serait plus léger ou si elle ne correspond à la limite pas à mon utilisation

Merci