Trouver une valeur dans un fichier externe

Fermé
Anthony - 25 janv. 2011 à 08:49
 melanie1324 - 25 janv. 2011 à 12:38
Bonjour,

Voici le fichier
http://www.cijoint.fr/cjlink.php?file=cj201101/cijuRtZ1Fj.xls
la feuille série masquée appartient au fichier mais celle ci doit être sortie car elle sera mise à jour quotidiennement.
Il faudrait donc arriver à aller cherche le numéro de série sur la feuille n'appartenant plus à ce fichier excel (celui comportant le userform).
le fichier actualisé quotidiennement sera tjs au même endroit, avec le même nom. comment faire ?

J'ai essayé avec ça mais ça me demande de choisir le fichier alors qu'il faudrait que le fichier s'ouvre firectement et j'ai aussi le message qui me demande si je veux enregistrer les modif. bref pas top du tout. par contre l'avantage c'est que l'utilisateur ne voit pas qu'on utuilise l'autre fichier

Dim wb_B As Workbook
Dim ClasseurB As Variant
ChDrive ("C") 'lettre du lecteur sur lequel on cherche.
ChDir "C:\Users\thony\Desktop\"
ClasseurB = Application.GetOpenFilename("Classeur1,*.xls")
Set wb_B = Workbooks.Open(ClasseurB, , True)
wb_B.Windows(1).Visible = False
wb_B.Close

A voir également:

1 réponse

Bonjour,
le code pour ouvrir un fichier excel est le suivant :

Workbooks.Open ("C:\Users\thony\Desktop\Classeur1.xls")
classeurb = activeworkbooks.name

Si tu veux faire entrer des variables :
chemin = "C:\Users\thony\Desktop\"
classeurB = "Classeur1.xls
workbooks.open (chemin & classeurB)
0