Bonjour à tous et toute,

Je me permet de vous contacter pour un problème que je n'arrive pas à résoudre.
Avec un VBS j'ai besoin d'ouvrir un fichier Excel, d'aller chercher une variable X, de récupérer ces coordonnées et de récupérer la valeur qui se trouve dans la colonne d'a coté.

Le problème c'est que la fonction Find ne fonctionne pas, ou je l'utilise très mal! Je débute donc soyez conciliant

Merci de votre aide

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 Xl 'as Excel.Application\par
Dim wk 'as Excel.workbook\par
set Xl = createobject("Excel.application")
Xl.Visible = true
Xl.enableevents = false
set Wk = Xl.workbooks.open("test.xlsx")
Dim plage
set plage = Xl.Range("B1;B22")
 
		Dim X
 
X = ("BC3204")
result= plage.Find("X").Select
 
'wk.close
'Xl.quit
merci de votre aide